perm filename COMSCH.MSG[SCH,LSP]26 blob
sn#855612 filedate 1988-04-10 generic text, type C, neo UTF8
COMMENT ⊗ VALID 00230 PAGES
C REC PAGE DESCRIPTION
C00001 00001
C00039 00002
C00040 00003 ∂26-Apr-86 0738 @MC.LCS.MIT.EDU:JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU The generality of define
C00042 00004 ∂26-Apr-86 1816 @MC.LCS.MIT.EDU:JINX%OZ.AI.MIT.EDU@xx.lcs.mit.edu variata
C00048 00005 ∂27-Apr-86 1455 @MC.LCS.MIT.EDU:KMP@SCRC-STONY-BROOK.ARPA variata
C00057 00006 ∂27-Apr-86 1607 @MC.LCS.MIT.EDU:dcj%jacksun@SUN.COM SCOOPS, and GNU support question
C00060 00007 ∂28-Apr-86 1155 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA Re: variata
C00066 00008 ∂28-Apr-86 1340 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA Re: SCOOPS, and GNU support question
C00069 00009 ∂29-Apr-86 0743 @MC.LCS.MIT.EDU:JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU meaning of *global* define
C00073 00010 ∂30-Apr-86 1425 @MC.LCS.MIT.EDU:jcm@ORNL-MSR.ARPA Questions from a newcomer
C00076 00011 ∂30-Apr-86 2156 @MC.LCS.MIT.EDU:JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU Questions from a newcomer
C00078 00012 ∂05-May-86 1142 @MC.LCS.MIT.EDU:amn@LOCUS.UCLA.EDU getting C-Scheme running on HP workstations
C00080 00013 ∂05-May-86 1402 @MC.LCS.MIT.EDU:JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU one more message about CScheme
C00082 00014 ∂05-May-86 1910 @MC.LCS.MIT.EDU:serafini@ames-aero implementation roundup
C00083 00015 ∂05-May-86 1914 JAR@MC.LCS.MIT.EDU implementation roundup
C00086 00016 ∂22-May-86 0819 NET-ORIGIN@MC.LCS.MIT.EDU H, E, S, B, O, D, X
C00088 00017 ∂22-May-86 0900 NET-ORIGIN@MC.LCS.MIT.EDU LOAD
C00093 00018 ∂22-May-86 1016 @MC.LCS.MIT.EDU:andy@aids-unix Re: LOAD
C00097 00019 ∂22-May-86 1558 @MC.LCS.MIT.EDU:KMP@ELEPHANT-BUTTE.SCRC.Symbolics.COM Notes about (↑ revised 3) report
C00103 00020 ∂23-May-86 0957 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA Re: H, E, S, B, O, D, X
C00106 00021 ∂23-May-86 1013 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA Re: LOAD
C00109 00022 ∂25-May-86 0923 @MC.LCS.MIT.EDU:VERACSD@USC-ISI.ARPA Addition to Mailing-List
C00111 00023 ∂25-May-86 1237 @MC.LCS.MIT.EDU:VERACSD@USC-ISI.ARPA Addition to Mailing-List
C00113 00024 ∂26-May-86 1555 @MC.LCS.MIT.EDU:JAR@MX.LCS.MIT.EDU R↑3RS draft
C00116 00025 ∂27-May-86 1120 NET-ORIGIN@MC.LCS.MIT.EDU Remaining questions & remarks (1)
C00128 00026 ∂27-May-86 1339 @MC.LCS.MIT.EDU:cth%indiana.csnet@CSNET-RELAY.ARPA define (resend)
C00132 00027 ∂27-May-86 1844 @MC.LCS.MIT.EDU:JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU define (resend) (long)
C00140 00028 ∂28-May-86 0827 @MC.LCS.MIT.EDU,@KATHERINE.THINK.COM:gls@AQUINAS.THINK.COM Remaining questions & remarks (1)
C00142 00029 ∂28-May-86 0836 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA hash-consing
C00145 00030 ∂28-May-86 1137 @MC.LCS.MIT.EDU:andy@aids-unix Re: define
C00149 00031 ∂28-May-86 1241 @MC.LCS.MIT.EDU:dyb%indiana.csnet@CSNET-RELAY.ARPA Re: define (resend) (long) (short)
C00151 00032 ∂28-May-86 1736 @MC.LCS.MIT.EDU:JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU define (resend) (long) (short)
C00157 00033 ∂28-May-86 2216 @MC.LCS.MIT.EDU:gls@Think.COM Embedded DEFINE forms
C00159 00034 ∂28-May-86 2243 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA Re: Notes about (↑ revised 3) report
C00164 00035 ∂29-May-86 1417 NET-ORIGIN@MC.LCS.MIT.EDU define
C00170 00036 ∂29-May-86 1438 NET-ORIGIN@MC.LCS.MIT.EDU schedule
C00173 00037 ∂29-May-86 1450 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA define
C00176 00038 ∂29-May-86 1454 @MC.LCS.MIT.EDU:WAND%northeastern.edu@CSNET-RELAY.ARPA R3RS draft -- procedural
C00178 00039 ∂29-May-86 1545 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU R3RS draft -- procedural
C00180 00040 ∂29-May-86 1610 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA response to new draft report (long)
C00200 00041 ∂29-May-86 1610 @MC.LCS.MIT.EDU,@CSNET-RELAY.ARPA,@boethius.think.com:gls@AQUINAS.THINK.COM hash-consing
C00202 00042 ∂29-May-86 1706 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA Re: global definitions
C00207 00043 ∂30-May-86 1432 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA definitions APPEND! etc
C00214 00044 ∂30-May-86 1650 @MC.LCS.MIT.EDU:OXLEY%ti-csl.csnet@CSNET-RELAY.ARPA Re: Embedded DEFINE forms
C00218 00045 ∂30-May-86 1703 @MC.LCS.MIT.EDU:WAND%northeastern.edu@CSNET-RELAY.ARPA procedure (Tnx)
C00219 00046 ∂30-May-86 1703 @MC.LCS.MIT.EDU:WAND%northeastern.edu@CSNET-RELAY.ARPA define -- a modest proposal
C00224 00047 ∂31-May-86 0108 @MC.LCS.MIT.EDU:JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU define -- a modest proposal
C00229 00048 ∂31-May-86 0331 NET-ORIGIN@MC.LCS.MIT.EDU wanted: teaching do's and dont's
C00231 00049 ∂31-May-86 0539 @MC.LCS.MIT.EDU:JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU wanted: teaching do's and dont's
C00237 00050 ∂31-May-86 0738 @MC.LCS.MIT.EDU:dyb%indiana.csnet@CSNET-RELAY.ARPA sentiments
C00244 00051 ∂31-May-86 1608 @MC.LCS.MIT.EDU:JAR%MX.LCS.MIT.EDU@MC.LCS.MIT.EDU sentiments
C00255 00052 ∂31-May-86 2319 @MC.LCS.MIT.EDU:JAR%MX.LCS.MIT.EDU@MC.LCS.MIT.EDU define -- a modest proposal
C00278 00053 ∂01-Jun-86 0815 @MC.LCS.MIT.EDU:JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU define -- a modest proposal
C00288 00054 ∂01-Jun-86 2051 @MC.LCS.MIT.EDU:CPH@AI.AI.MIT.EDU schedule
C00290 00055 ∂01-Jun-86 2343 @MC.LCS.MIT.EDU:dyb%indiana.csnet@CSNET-RELAY.ARPA Re: sentiments
C00309 00056 ∂02-Jun-86 0730 @MC.LCS.MIT.EDU:JMILLER@OZ.AI.MIT.EDU Another Can of Worms?
C00313 00057 ∂02-Jun-86 1558 @MC.LCS.MIT.EDU:JAR%MX.LCS.MIT.EDU@MC.LCS.MIT.EDU sentiments
C00325 00058 ∂02-Jun-86 1604 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA DEFINE -- a concrete proposal
C00334 00059 ∂02-Jun-86 1803 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA Re: definitions APPEND! etc
C00337 00060 ∂03-Jun-86 0853 @MC.LCS.MIT.EDU:Asrivastava%ti-csl.csnet@CSNET-RELAY.ARPA
C00339 00061 ∂03-Jun-86 0953 @MC.LCS.MIT.EDU:JAR%MX.LCS.MIT.EDU@MC.LCS.MIT.EDU APPEND!
C00341 00062 ∂03-Jun-86 1010 @MC.LCS.MIT.EDU:JAR%MX.LCS.MIT.EDU@MC.LCS.MIT.EDU portability
C00349 00063 ∂03-Jun-86 1124 @MC.LCS.MIT.EDU:WAND%northeastern.edu@CSNET-RELAY.ARPA define
C00352 00064 ∂03-Jun-86 1441 @MC.LCS.MIT.EDU:Asrivastava%ti-csl.csnet@CSNET-RELAY.ARPA SCOOPS source
C00354 00065 ∂03-Jun-86 1554 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA Is BEGIN primitive?
C00357 00066 ∂03-Jun-86 2023 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU ftp-able r3rs.dvi
C00359 00067 ∂04-Jun-86 0554 @MC.LCS.MIT.EDU:JMILLER@OZ.AI.MIT.EDU Re: portability
C00361 00068 ∂04-Jun-86 1049 @MC.LCS.MIT.EDU:Asrivastava%ti-csl.csnet@CSNET-RELAY.ARPA Re: SCOOPS source
C00363 00069 ∂04-Jun-86 1623 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA Re: portability
C00366 00070 ∂05-Jun-86 0546 @MC.LCS.MIT.EDU:JMILLER@OZ.AI.MIT.EDU Re: portability
C00368 00071 ∂05-Jun-86 0935 @MC.LCS.MIT.EDU:dfried%indiana.csnet@CSNET-RELAY.ARPA Will's proposal
C00369 00072 ∂05-Jun-86 0939 @MC.LCS.MIT.EDU:dfried%indiana.csnet@CSNET-RELAY.ARPA named-lambda and rec
C00370 00073 ∂05-Jun-86 1055 @MC.LCS.MIT.EDU:CPH@AI.AI.MIT.EDU named-lambda and rec
C00372 00074 ∂06-Jun-86 0800 @MC.LCS.MIT.EDU:JAR%MX.LCS.MIT.EDU@MC.LCS.MIT.EDU portability
C00377 00075 ∂06-Jun-86 0806 @MC.LCS.MIT.EDU:dfried%indiana.csnet@CSNET-RELAY.ARPA add1 and sub1
C00379 00076 ∂06-Jun-86 1039 @MC.LCS.MIT.EDU:CPH@AI.AI.MIT.EDU add1 and sub1
C00381 00077 ∂06-Jun-86 2038 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA Re: portability
C00385 00078 ∂07-Jun-86 1658 @MC.LCS.MIT.EDU:dfried%indiana.csnet@CSNET-RELAY.ARPA macros.
C00386 00079 ∂07-Jun-86 1820 @MC.LCS.MIT.EDU:adams%tekchips.tek.csnet@CSNET-RELAY.ARPA Re: named-lambda and rec
C00388 00080 ∂07-Jun-86 1829 @MC.LCS.MIT.EDU:dyb%indiana.csnet@CSNET-RELAY.ARPA Re: add1 and sub1
C00390 00081 ∂08-Jun-86 1652 @MC.LCS.MIT.EDU:Swenson.Multics@MIT-MULTICS.ARPA Re: SCOOPS source
C00392 00082 ∂09-Jun-86 1643 @MC.LCS.MIT.EDU:JAR%MX.LCS.MIT.EDU@MC.LCS.MIT.EDU portability
C00399 00083 ∂10-Jun-86 0744 @MC.LCS.MIT.EDU:dyb%indiana.csnet@CSNET-RELAY.ARPA Re: portability
C00403 00084 ∂11-Jun-86 1021 @MC.LCS.MIT.EDU:TIM%upenn.csnet@CSNET-RELAY.ARPA Scheme for AI based CAI
C00410 00085 ∂11-Jun-86 1145 @MC.LCS.MIT.EDU:FAHLMAN@C.CS.CMU.EDU Scheme for AI based CAI
C00415 00086 ∂13-Jun-86 0956 @MC.LCS.MIT.EDU:mmeyer%tilde%ti-csl.csnet@CSNET-RELAY.ARPA Revised↑3 Draft Comment
C00417 00087 ∂15-Jun-86 1251 @MC.LCS.MIT.EDU:cth%indiana.csnet@CSNET-RELAY.ARPA Logic Continuations (Abstract)
C00420 00088 ∂17-Jun-86 1621 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA Number syntax
C00424 00089 ∂17-Jun-86 1909 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Number syntax
C00427 00090 ∂17-Jun-86 1912 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Policy on change-making
C00431 00091 ∂18-Jun-86 2144 @MC.LCS.MIT.EDU:dyb%indiana.csnet@CSNET-RELAY.ARPA Re: Number syntax
C00433 00092 ∂20-Jun-86 0202 @MC.LCS.MIT.EDU:JINX@OZ.AI.MIT.EDU Policy on change-making
C00435 00093 ∂23-Jun-86 1412 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Bibliography
C00437 00094 ∂26-Jun-86 2114 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Remaining questions & remarks (2)
C00459 00095 ∂27-Jun-86 0943 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA r3rs presentation
C00465 00096 ∂27-Jun-86 1115 @MC.LCS.MIT.EDU:gls@Think.COM Remaining questions & remarks (2)
C00470 00097 ∂27-Jun-86 1653 @MC.LCS.MIT.EDU:SGR@ELEPHANT-BUTTE.SCRC.Symbolics.COM [INGRIA@G.BBN.COM: Scheme for LISPM]
C00472 00098 ∂27-Jun-86 1930 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU typo
C00473 00099 ∂27-Jun-86 2142 @MC.LCS.MIT.EDU:dfried%indiana.csnet@CSNET-RELAY.ARPA Grandfathering Responses
C00492 00100 ∂28-Jun-86 1511 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU variable vs. identifier
C00494 00101 ∂28-Jun-86 1511 @MC.LCS.MIT.EDU:dfried%indiana.csnet@CSNET-RELAY.ARPA Grandfathering response
C00513 00102 ∂29-Jun-86 1205 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU [INGRIA@G.BBN.COM: Scheme for LISPM]
C00516 00103 ∂29-Jun-86 2140 @MC.LCS.MIT.EDU:dyb%indiana.csnet@CSNET-RELAY.ARPA Re: Remaining questions & remarks (2)
C00527 00104 ∂30-Jun-86 0741 @MC.LCS.MIT.EDU:dyb%indiana.csnet@CSNET-RELAY.ARPA Re: r3rs presentation (long)
C00536 00105 ∂01-Jul-86 1040 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA Call-with-current-continuation
C00540 00106 ∂01-Jul-86 1432 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA Re: Remaining questions & remarks (2)
C00555 00107 ∂01-Jul-86 1446 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA Re: Remaining questions & remarks (2)
C00577 00108 ∂02-Jul-86 0515 @MC.LCS.MIT.EDU:JMILLER@OZ.AI.MIT.EDU Re: Remaining questions & remarks (2)
C00579 00109 ∂02-Jul-86 0557 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA Call-with-current-continuation
C00583 00110 ∂02-Jul-86 1652 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Remaining questions & remarks (2)
C00586 00111 ∂07-Jul-86 0929 @MC.LCS.MIT.EDU:VERACSD@A.ISI.EDU CL Compatiblity Package
C00588 00112 ∂07-Jul-86 1254 @MC.LCS.MIT.EDU:cth%indiana.csnet@CSNET-RELAY.ARPA votes and things
C00594 00113 ∂08-Jul-86 0538 @MC.LCS.MIT.EDU:dyb%indiana.csnet@CSNET-RELAY.ARPA display and write-char
C00596 00114 ∂08-Jul-86 2347 @MC.LCS.MIT.EDU:WAND%northeastern.edu@CSNET-RELAY.ARPA remaining questions & remarks (2)
C00602 00115 ∂09-Jul-86 0340 @MC.LCS.MIT.EDU:HAL%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU mitch wand's comments
C00603 00116 ∂10-Jul-86 1015 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU number syntax
C00608 00117 ∂10-Jul-86 1016 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU call-with-*put-file --> call-with-*put-port
C00610 00118 ∂10-Jul-86 1228 @MC.LCS.MIT.EDU:MICHAEL@CS.COLUMBIA.EDU How big would a "minimal" scheme interpreter be?
C00611 00119 ∂10-Jul-86 1300 @MC.LCS.MIT.EDU:andy@sun3.ads.ARPA My comments on the R↑RS
C00630 00120 ∂10-Jul-86 1313 @MC.LCS.MIT.EDU:MICHAEL@CS.COLUMBIA.EDU [Michael van Biema <MICHAEL@CS.COLUMBIA.EDU>: How big would a "minimal" scheme interpreter be?]
C00633 00121 ∂10-Jul-86 1342 @MC.LCS.MIT.EDU:wagle%iuvax.indiana.edu@CSNET-RELAY.ARPA Re: Remaining questions & remarks (2)
C00637 00122 ∂10-Jul-86 1540 @MC.LCS.MIT.EDU:andy@sun3.ads.ARPA My answers to your thirty questions on R↑RS
C00647 00123 ∂10-Jul-86 1941 @MC.LCS.MIT.EDU:whill%hplabsc@hplabs.HP.COM Re: [Michael van Biema <MICHAEL@CS.COLUMBIA.EDU>: How big would a "minimal" scheme interpreter be?]
C00649 00124 ∂11-Jul-86 0336 @MC.LCS.MIT.EDU:bc@MEDIA-LAB.MIT.EDU MacScheme
C00651 00125 ∂11-Jul-86 0925 @MC.LCS.MIT.EDU:gls@Think.COM My comments on the R↑RS
C00660 00126 ∂11-Jul-86 0935 @MC.LCS.MIT.EDU:cscott@bfly-vax.bbn.com tiny scheme
C00662 00127 ∂11-Jul-86 1142 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA Re: My comments on the R↑RS
C00668 00128 ∂11-Jul-86 1642 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU test
C00669 00129 ∂12-Jul-86 1837 @MC.LCS.MIT.EDU:RPG@SU-AI.ARPA Compatibility with Common Lisp: A meta comment
C00674 00130 ∂13-Jul-86 1528 @MC.LCS.MIT.EDU:andy@sun3.ads.ARPA Scheme's DO construct
C00690 00131 ∂14-Jul-86 0252 @MC.LCS.MIT.EDU:adams%tekchips.tek.csnet@CSNET-RELAY.ARPA Flaws of form
C00697 00132 ∂14-Jul-86 0325 @MC.LCS.MIT.EDU:adams%tekchips.tek.csnet@CSNET-RELAY.ARPA Flaws of form
C00704 00133 ∂14-Jul-86 0641 @MC.LCS.MIT.EDU:OXLEY%ti-csl.csnet@CSNET-RELAY.ARPA Re: Compatibility with Common Lisp: A meta comment
C00706 00134 ∂14-Jul-86 0741 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA Common Lisp
C00709 00135 ∂14-Jul-86 1008 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU [ANDY: dedication]
C00711 00136 ∂14-Jul-86 1337 @MC.LCS.MIT.EDU:RPG@SU-AI.ARPA Use of DO in Common Lisp Code
C00715 00137 ∂14-Jul-86 1448 @MC.LCS.MIT.EDU:goodhart%cod@nosc.ARPA Scheme Request
C00717 00138 ∂14-Jul-86 1514 @MC.LCS.MIT.EDU:andy@sun3.ads.ARPA Scheme vs. Common Lisp, #1: Politics
C00731 00139 ∂14-Jul-86 1607 @MC.LCS.MIT.EDU:RPG@SU-AI.ARPA Politics
C00736 00140 ∂14-Jul-86 1702 @MC.LCS.MIT.EDU:dyb%iuvax.indiana.edu@CSNET-RELAY.ARPA call-with-xput-port vs. call-with-xput-file
C00741 00141 ∂14-Jul-86 1814 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Scheme Request
C00744 00142 ∂14-Jul-86 2156 @MC.LCS.MIT.EDU:dyb%iuvax.indiana.edu@CSNET-RELAY.ARPA the colon (:) in identifier syntax
C00746 00143 ∂14-Jul-86 2159 @MC.LCS.MIT.EDU:dyb%iuvax.indiana.edu@CSNET-RELAY.ARPA exp versus expt
C00748 00144 ∂15-Jul-86 0951 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU convergence
C00750 00145 ∂15-Jul-86 1807 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA Re: Scheme's DO construct
C00761 00146 ∂15-Jul-86 2019 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU rrrs-authors
C00765 00147 ∂15-Jul-86 2105 @MC.LCS.MIT.EDU:jleech@sun6.ads the rrrs authors
C00767 00148 ∂16-Jul-86 1731 @MC.LCS.MIT.EDU:brooks%tilde%TI-CSL.CSNET@CSNET-RELAY.ARPA Substring & friends
C00770 00149 ∂16-Jul-86 1732 @MC.LCS.MIT.EDU:Bartley%TI-CSL.CSNET@CSNET-RELAY.ARPA Re: number syntax
C00779 00150 ∂16-Jul-86 1921 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU July 15 draft sent
C00781 00151 ∂17-Jul-86 0851 @MC.LCS.MIT.EDU:CPH@AI.AI.MIT.EDU Substring & friends
C00784 00152 ∂17-Jul-86 1217 @MC.LCS.MIT.EDU:GJS%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU Re: Substring & friends
C00786 00153 ∂17-Jul-86 1412 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU [jtv%fingate.bitnet: Scheme Request]
C00788 00154 ∂17-Jul-86 1442 @MC.LCS.MIT.EDU:adams%tekchips.tek.csnet@CSNET-RELAY.ARPA Re: Substring & friends
C00791 00155 ∂18-Jul-86 0012 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA Re: Substring & friends
C00794 00156 ∂18-Jul-86 1428 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU [jtv%fingate.bitnet: Scheme Request]
C00796 00157 ∂21-Jul-86 0448 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA typos
C00799 00158 ∂21-Jul-86 0737 @MC.LCS.MIT.EDU:Mike←Wilson%CARLETON.BITNET@WISCVM.WISC.EDU Performance and Evaluation of Scheme Systems...
C00802 00159 ∂21-Jul-86 0808 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU schedule
C00805 00160 ∂21-Jul-86 0827 @MC.LCS.MIT.EDU:CLOWNEY@BLUE.RUTGERS.EDU Logic Continuations (Abstract)
C00807 00161 ∂21-Jul-86 1014 @MC.LCS.MIT.EDU:gls@Think.COM Scheme's DO construct
C00811 00162 ∂21-Jul-86 1057 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA Re: Performance and Evaluation of Scheme Systems...
C00815 00163 ∂21-Jul-86 1143 @MC.LCS.MIT.EDU:bc@MEDIA-LAB.MIT.EDU Bobcat scheme
C00817 00164 ∂21-Jul-86 1228 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Logic Continuations (Abstract)
C00834 00165 ∂21-Jul-86 1325 @MC.LCS.MIT.EDU:gls@Think.COM Re: Scheme's DO construct
C00836 00166 ∂21-Jul-86 1357 @MC.LCS.MIT.EDU:YEKTA@AI.AI.MIT.EDU Bobcat scheme
C00838 00167 ∂22-Jul-86 0710 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU title wars
C00841 00168 ∂22-Jul-86 0717 @MC.LCS.MIT.EDU:HAL%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU title wars
C00842 00169 ∂22-Jul-86 1143 @MC.LCS.MIT.EDU:CPH@AI.AI.MIT.EDU title wars
C00844 00170 ∂22-Jul-86 1157 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU title wars
C00846 00171 ∂22-Jul-86 1243 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA Re: title wars
C00848 00172 ∂22-Jul-86 1252 @MC.LCS.MIT.EDU,@YALE-BULLDOG.ARPA:hudak@YALE.ARPA Re: Performance and Evaluation of Scheme Systems...
C00854 00173 ∂22-Jul-86 1529 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA Re: title wars
C00857 00174 ∂22-Jul-86 1755 @MC.LCS.MIT.EDU:GJS%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU title
C00858 00175 ∂24-Jul-86 1244 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU call-with-xput-port vs. call-with-xput-file
C00863 00176 ∂25-Jul-86 0022 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA Re: July 15 draft sent
C00872 00177 ∂25-Jul-86 1026 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA Re: number syntax
C00881 00178 ∂25-Jul-86 1127 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU (eqv? #e1 #i1)
C00884 00179 ∂25-Jul-86 1346 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA July 15th draft
C00890 00180 ∂26-Jul-86 2137 @MC.LCS.MIT.EDU:cth%iuvax.indiana.edu@CSNET-RELAY.ARPA corrections and suggestions
C00898 00181 ∂28-Jul-86 0810 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA Fault logic in eq? comment
C00901 00182 ∂28-Jul-86 1616 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA Re: corrections and suggestions
C00907 00183 ∂29-Jul-86 1331 @MC.LCS.MIT.EDU:dyb@iuvax.indiana.edu critical problems with call---file, with---file
C00914 00184 ∂29-Jul-86 1423 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU schedule
C00917 00185 ∂29-Jul-86 1814 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA Re: critical problems with call---file, with---file
C00922 00186 ∂31-Jul-86 0732 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU rrrs authors meeting, lunch Tuesday
C00925 00187 ∂31-Jul-86 1111 @MC.LCS.MIT.EDU:fateman@DALI.BERKELEY.EDU Re: Performance and Evaluation of Scheme Systems...
C00927 00188 ∂04-Aug-86 0107 @MC.LCS.MIT.EDU:facility%cantuar.waterloo.edu@CSNET-RELAY.ARPA
C00929 00189 ∂04-Aug-86 0158 @MC.LCS.MIT.EDU:facility%cantuar.waterloo.edu@CSNET-RELAY.ARPA
C00931 00190 ∂06-Aug-86 0150 @MC.LCS.MIT.EDU:facility%cantuar.waterloo.edu@CSNET-RELAY.ARPA
C00933 00191 ∂07-Aug-86 0136 @MC.LCS.MIT.EDU:JAR%MX.LCS.MIT.EDU@MC.LCS.MIT.EDU non-list arguments
C00936 00192 ∂07-Aug-86 0301 @MC.LCS.MIT.EDU:Pase@DOCKMASTER.ARPA Scheme for the Atari ST
C00938 00193 ∂07-Aug-86 0730 @MC.LCS.MIT.EDU:jcm@ORNL-MSR.ARPA Re: Scheme for the Atari ST
C00942 00194 ∂08-Aug-86 0819 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU
C00947 00195 ∂08-Aug-86 1230 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU [Masinter.pa: synonym streams..]
C00949 00196 ∂08-Aug-86 1712 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA "Final" comments on RRRRS
C00952 00197 ∂11-Aug-86 0855 @MC.LCS.MIT.EDU,@MIT-MULTICS.ARPA:SRAUCH@UNBMVS1.BITNET Instructor's manual for S&ICP by Julie Sussman
C00954 00198 ∂13-Aug-86 0238 NET-ORIGIN@MC.LCS.MIT.EDU Re: define
C00957 00199 ∂14-Aug-86 1728 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA Minutes from lunch 5 August 1986
C00967 00200 ∂14-Aug-86 1855 @MC.LCS.MIT.EDU:ANDY@Sushi.Stanford.EDU Re: Minutes from lunch 5 August 1986
C00969 00201 ∂14-Aug-86 2053 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA substring indexes
C00972 00202 ∂14-Aug-86 2233 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA r-cubed syntax (nits)
C00975 00203 ∂15-Aug-86 0902 @MC.LCS.MIT.EDU:dyb%iuvax.indiana.edu@CSNET-RELAY.ARPA Re: Minutes from lunch 5 August 1986
C00976 00204 ∂15-Aug-86 1106 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU r-cubed syntax (nits)
C00979 00205 ∂15-Aug-86 1112 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU scheme report tar file
C00981 00206 ∂15-Aug-86 1223 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU "Final" comments on RRRRS
C00985 00207 ∂15-Aug-86 2150 @MC.LCS.MIT.EDU:CPH@AI.AI.MIT.EDU "Final" comments on RRRRS
C00989 00208 ∂18-Aug-86 0051 @MC.LCS.MIT.EDU:ram@YALE.ARPA Re: The generality of define
C00994 00209 ∂18-Aug-86 1650 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA define syntax (an apology)
C00998 00210 ∂20-Aug-86 2002 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA numbers
C01006 00211 ∂22-Aug-86 0555 @MC.LCS.MIT.EDU:dyb%iuvax.indiana.edu@CSNET-RELAY.ARPA a few more comments
C01010 00212 ∂22-Aug-86 1208 @MC.LCS.MIT.EDU,@SEBASTIAN.THINK.COM:gls@AQUINAS.THINK.COM 1986 Lisp conference bibliography
C01049 00213 ∂23-Aug-86 1738 @MC.LCS.MIT.EDU:GJS%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU Re: numbers
C01051 00214 ∂25-Aug-86 2008 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA Another nit my favorite numbers
C01056 00215 ∂28-Aug-86 0849 @MC.LCS.MIT.EDU:JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU Minutes from lunch 5 August 1986
C01058 00216 ∂28-Aug-86 0908 @MC.LCS.MIT.EDU:mhwu%hplmhw@hplabs.HP.COM Minutes/Standardize Graphics
C01060 00217 ∂28-Aug-86 2012 @MC.LCS.MIT.EDU:GJS%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU Re: Minutes from lunch 5 August 1986
C01062 00218 ∂29-Aug-86 1503 @MC.LCS.MIT.EDU:andy@ads.ARPA graphics for Scheme
C01067 00219 ∂02-Sep-86 1519 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU substring-vector-null-fill!, colitis, etc.
C01075 00220 ∂03-Sep-86 0424 @MC.LCS.MIT.EDU:ramsdell%faron@mitre-bedford.ARPA call-with-xxput-port
C01077 00221 ∂03-Sep-86 0625 @MC.LCS.MIT.EDU:JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU substring-vector-null-fill!, colitis, etc.
C01081 00222 ∂04-Sep-86 0858 @MC.LCS.MIT.EDU:F95THOMP%CARLETON.BITNET@WISCVM.WISC.EDU Scheme Books?
C01083 00223 ∂04-Sep-86 1828 @MC.LCS.MIT.EDU:wecker%cookie.DEC@decwrl.DEC.COM Please delete me from this distribution list, thanks - dave
C01084 00224 ∂05-Sep-86 1947 @MC.LCS.MIT.EDU:mh@BU-CS.BU.EDU list
C01085 00225 ∂08-Sep-86 0330 @MC.LCS.MIT.EDU:shneider%cui.unige.chunet%ubc.csnet@CSNET-RELAY.ARPA Beginners question: Advising methods in TI scheme
C01088 00226 ∂08-Sep-86 0826 @MC.LCS.MIT.EDU:philbin-jim@YALE.ARPA Re: [THOMAS: Scheme Books?]
C01090 00227 ∂08-Sep-86 0848 @MC.LCS.MIT.EDU:carr%utah-orion@utah-cs.arpa scoops
C01092 00228 ∂08-Sep-86 1334 @MC.LCS.MIT.EDU:shneider%cui.unige.chunet%ubc.csnet@CSNET-RELAY.ARPA Beginners question: Advising methods in TI scheme
C01095 00229 ∂08-Sep-86 1509 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Good & bad news
C01098 00230 ∂08-Sep-86 1614 @MC.LCS.MIT.EDU:wagle%iuvax.indiana.edu@CSNET-RELAY.ARPA substring-vector-null-fill!, coliti
C01100 ENDMK
C⊗;
∂26-Apr-86 0738 @MC.LCS.MIT.EDU:JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU The generality of define
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 26 Apr 86 07:38:32 PST
Received: from OZ.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 26 APR 86 10:38:14 EST
Date: 26 Apr 1986 10:38 EST (Sat)
Message-ID: <JINX.12201925541.BABYL@MIT-OZ>
From: Bill Rozas <JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU>
To: andy@AIDS-UNIX.ARPA (Andy Cromarty)
Cc: SCHEME@MC.LCS.MIT.EDU
Subject: The generality of define
In-reply-to: Msg of 23 Apr 1986 19:09-EST from andy at aids-unix (Andy Cromarty)
(define square (lambda (x) (* x x)))
at all, but rather to
(define square (rec square (lambda (x) (* x x))))
The new version of RRRS changes this.
(define (square x) (* x x))
will be equivalent to
(define square (lambda (x) (* x x)))
The self recursive form can be obtained by explicitely using LETREC or
wRECk.
∂26-Apr-86 1816 @MC.LCS.MIT.EDU:JINX%OZ.AI.MIT.EDU@xx.lcs.mit.edu variata
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 26 Apr 86 18:15:50 PST
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 26 Apr 86 21:16:52 EST
Received: from 5400000012 by CSNET-RELAY.ARPA id a000769; 26 Apr 86 21:04 EST
Received: from OZ.AI.MIT.EDU by XX.LCS.MIT.EDU via Chaosnet; 26 Apr 86 10:33-EST
Date: 26 Apr 1986 10:33 EST (Sat)
Message-ID: <JINX.12201924643.BABYL@MIT-OZ>
From: Bill Rozas <JINX%OZ.AI.MIT.EDU@xx.lcs.mit.edu>
To: David Bartley <Bartley%ti-csl.csnet@CSNET-RELAY.ARPA>
Cc: JAR%mc.lcs.mit.edu@CSNET-RELAY.ARPA,
RRRS-AUTHORS%mc.lcs.mit.edu@CSNET-RELAY.ARPA
Subject: variata
In-reply-to: Msg of 25 Apr 1986 19:04-EST from David Bartley <Bartley%ti-csl.csnet at CSNET-RELAY.ARPA>
To summarize:
-- We agree that (ELSE) is a no-no and that (COND) and (COND (ELSE exp))
are valid.
-- I feel that (BEGIN) should have the same meaning as (COND), but I
won't push the point.
I don't like this. Unfortunately JAR did not give me choice c (status
quo, where (COND (ELSE ...)) is legal, but (COND) is not), which I
like best. I object pretty strongly to (BEGIN) and somewhat less
strongly to (COND). The usual rationale is that it makes macros
easier to write, but this is just laziness of the same sort as using
(cdr (assq <something> <some-list>)) in a Lisp where (cdr '()) -> '().
(COND (ELSE ...)) although silly has a clear meaning (unless the ELSE
clause is empty, which should be an error, but we agree on this).
-- We agree on using EQV? for CASE.
I like JAR's proposal too.
-- We agree that (EQV? "" "") and (EQV? #() #()) are true, but I worry
about confusion when I mix Scheme and Common LISP programs.
I'm worried about gratuitous differences between EQ? and EQV?. I
would object (although not terribly strongly) to making
(eq? '#() '#()) be #T, but I think it is silly to have EQ? and EQV?
behave differently on this. The reason I object to (eq? '#() '#())
being #T is that inline coding of make-vector would become more
expensive. Make-vector is very cheap in our implementation and a good
candidate for inline coding (although we don't currently do it), and
having it intern 0 length vectors (strings) would make it more
expensive.
-- I like warning messages for things like (MAKE-VECTOR 0 exp) more
than you do. We can probably agree to provide declarations so you
won't refuse to buy my system!
I agree with JAR. I think that (MAKE-VECTOR 0 exp) is reasonable and
no error (warning) message should be given. I don't understand why
you object to it. Why not warn about reversing a list with less than 2
elements also?
-- I'm not apologetic about trying to avoid ``gratuitous''
differences with Common LISP, but I don't want to burden the
description of Scheme with constant references to it either.
I agree. Unless there is strong reason to do otherwise, we should not
differ from Common Lisp. This should probably be stated early (if we
all agree, of course), and assumed afterwards. A reference to this
remark in various places might be appropriate.
∂27-Apr-86 1455 @MC.LCS.MIT.EDU:KMP@SCRC-STONY-BROOK.ARPA variata
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 27 Apr 86 14:55:43 PDT
Received: from SCRC-STONY-BROOK.ARPA by MC.LCS.MIT.EDU 27 Apr 86 17:56:56 EDT
Received: from HUMMINGBIRD.SCRC.Symbolics.COM by SCRC-STONY-BROOK.ARPA via CHAOS with CHAOS-MAIL id 473339; Sun 27-Apr-86 17:54:24-EDT
Date: Sun, 27 Apr 86 17:55 EDT
From: Kent M Pitman <KMP@SCRC-STONY-BROOK.ARPA>
Subject: variata
To: JAR@MIT-MC.ARPA
cc: RRRS-AUTHORS@MIT-MC.ARPA
In-Reply-To: <[MC.LCS.MIT.EDU].895280.860425.JAR>
References: The message of 24 Apr 86 10:43-EST from Bartley%ti-csl.csnet@CSNET-RELAY.ARPA
Message-ID: <860427175526.2.KMP@HUMMINGBIRD.SCRC.Symbolics.COM>
I am absolutely opposed to making (COND) or (COND (ELSE)) or (BEGIN) or
(LAMBDA ()) illegal. I am content to make them return undefined values but
I insist that, for example, (LAMBDA () (BEGIN) 3) is a completely well-formed
expression that should neither cause the compiler to say anything nor cause
an error at runtime.
I am very opposed to requiring ELSE to be the last clause in a COND. It seems
to me that
(COND ((FOO)) (ELSE #T) ((BAR)))
is like like
(OR (FOO) #T (BAR)).
I hope no one is going to insist that the previous form should also be illegal
and/or that it should be warned about by a compiler. The call to BAR is
obviously not going to get reached for pragmatic reasons, but there may be
legitimate situations where program-writing programs could want to construct
something like this and I think we'd be shooting ourselves in the foot to
disallow such things. Also, I think it tends to make the grammar look more
graceful if ELSE can occur anyway. The particular case of interest is:
`(COND ,@FORMS (ELSE FOO))
where FORMS may be allowed to contain an ELSE clause. I object to having to
write:
`(COND ,@FORMS ,@(IF (AND FORMS (NOT (EQ (CAR (LAST FORMS)) 'ELSE)))
`((ELSE FOO))
`()))
If you decide to make any of the above forms legal, I wish to have my
reasons for disagreement cited.
I think CASE should be changed to use EQUAL?, which I think is in agreement
with a recent suggestion by you. This will get around a lot of confusion that
could otherwise result from the recent trend toward wanting to intern quoted
structure.
I'm fairly satisfied with the way things seem to be going in the EQ? and
EQV? discussion so will mostly decline from any comment for now on that
subject.
JAR: If people believe that it's important to be able to parse Scheme's
read syntax using only standard Common Lisp reader features, then by all
means we must allow (eq? '#() '#()) to be false, but we also have to
change the syntax of numbers, and make colon not be a constituent
character. But Scheme's eqv? could still deal with #() and "" as I
propose even if eq? doesn't.
Right.
JAR: It looks like I'll lose on this point, so I won't push it too hard.
I'm just resisting adding yet another clause which basically says "we
did this for compatibility with Common Lisp."
I am sympathetic to this position.
I strongly oppose requiring APPEND to do gratuitous copying. It's trivial to
adopt
Bartley (about APPEND): ... I'd like some discussion on this. It sounds
like something a LISP programmer could trip up on, especially those
who use (APPEND X '()) to copy X. Steele's book specifically mentions
that APPEND will work that way in Common LISP, but implies that it is
poor style. My inclination is to be compatible with Common LISP in
order to minimize frustration for the poor people we're trying to
win over to Scheme.
JAR: If this is what other people want I'm happy with it too (except
again for the fact that I'll have to insert another apology and another
reference to Common Lisp).
The fact that CL provides COPY-LIST is enough for me. I am strongly opposed
to continuing this lossage of forcing APPEND to do gratuitous copying. You're
falling down on your let's-not-be-gratuitously-compatible-with-CL maxim. CL
itself is really only doing it for compatibility, too. This is a case where
we're clearly right and ought not give in.
JAR: What about (let ((x (list 'a))) (eq? x (reverse x))) ?
Bartley: I feel strongly that REVERSE should always copy (unless its
argument is the empty list), since it is easier to remember that rule
than that it does so only when there's more than one element in the list.
Pragmatically, I often do something like (APPEND! (REVERSE X) Y), and
wouldn't want to side effect the original list in X if it had exactly
one element. (Note that this works correctly when X is the empty
list, so this is a pretty unusual boundary condition.)
JAR: I agree. (Except note that it doesn't copy empty lists....)
I am receptive to the idea of permitting the result of REVERSE to share with
its input. The idiom (APPEND! (REVERSE X) Y) should just be named. CL has
REVAPPEND and NRECONC. I believe we should just have APPEND-REVERSE and
APPEND-REVERSE! which do these common operations. This would reduce the need
to rely on copying. I think we should take a consistent stand on the idea
that REVERSE, APPEND, do not have to copy and that that's why we provide
COPY-LIST. People can always write their own COPY-LIST-REVERSE,
COPY-LIST-APPEND, etc. if they really need to intertwine the two operations
for some efficiency reason. The dumb routines are so easy to write yourself,
after all. The ones provided by the system should be the messy-to-write
super-optimizing ones.
∂27-Apr-86 1607 @MC.LCS.MIT.EDU:dcj%jacksun@SUN.COM SCOOPS, and GNU support question
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 27 Apr 86 16:07:16 PDT
Received: from sun.com by MC.LCS.MIT.EDU 27 Apr 86 19:06:04 EDT
Received: from snail.sun.com (snail-ptp) by sun.com (3.2-/SMI-3.0)
id AA13232; Sun, 27 Apr 86 16:01:26 PDT
Received: from jacksun.sun.uucp by snail.sun.com (3.2/SMI-3.0DEV4)
id AA28515; Sun, 27 Apr 86 16:04:42 PDT
Received: by jacksun.sun.uucp (1.1/SMI-3.0)
id AA11217; Sun, 27 Apr 86 16:04:02 PDT
Date: Sun, 27 Apr 86 16:04:02 PDT
From: dcj%jacksun@SUN.COM (Donald Clark Jackson)
Message-Id: <8604272304.AA11217@jacksun.sun.uucp>
To: scheme@mc.lcs.mit.edu
Subject: SCOOPS, and GNU support question
As a user of TI-SCHEME, I kind of like
the SCOOPS object-oriented package.
I have C-Scheme running on a Sun now, and
I would like to get SCOOPS running on it.
Is source for SCOOPS available, or is it
TI proprietary code? Is there something
similar available?
Also, while getting the "inferior scheme"
mode in GNU Emacs to work, I had to change the
following line in xscheme.el:
(make-shell "scheme" scheme-program-name nil "-emacs")
to
(make-shell "scheme" scheme-program-name)
What was the "-emacs" supposed to do?
I have GNU Emacs Version 17.61, and
MIT C-Scheme Version 6.1.
If this is the wrong mailing list for these
questions, please suggest a better forum.
Mail me your replies, if possible. I'll
summarize to this list if there is any
demand.
Thanks,
Don Jackson
djackson@sun.com
{ucbvax,decwrl,...}!sun!djackson
∂28-Apr-86 1155 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA Re: variata
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 28 Apr 86 11:54:22 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 28 Apr 86 14:55:35 EDT
Received: from ti-csl by csnet-relay.csnet id a002987; 28 Apr 86 14:49 EDT
Received: by tilde id AA15512; Mon, 28 Apr 86 13:40:42 cdt
Date: Mon 28 Apr 86 13:28:11-CDT
From: David Bartley <Bartley%ti-csl.csnet@CSNET-RELAY.ARPA>
Subject: Re: variata
To: JINX%OZ.AI.MIT.EDU%xx.lcs.mit.edu@CSNET-RELAY.ARPA
Cc: JAR%mc.lcs.mit.edu@CSNET-RELAY.ARPA,
RRRS-AUTHORS%mc.lcs.mit.edu@CSNET-RELAY.ARPA,
Bartley%ti-csl.csnet@CSNET-RELAY.ARPA
In-Reply-To: <JINX.12201924643.BABYL@MIT-OZ>
Message-Id: <12202480652.63.BARTLEY@CSC60>
>Date: 26 Apr 1986 10:33 EST (Sat)
>From: Bill Rozas <JINX%OZ.AI.MIT.EDU%xx.lcs.mit.edu@csnet-relay>
>
> [Bartley:]
> -- I like warning messages for things like (MAKE-VECTOR 0 exp) more
> than you do. We can probably agree to provide declarations so you
> won't refuse to buy my system!
>
>I agree with JAR. I think that (MAKE-VECTOR 0 exp) is reasonable and
>no error (warning) message should be given. I don't understand why
>you object to it. Why not warn about reversing a list with less than 2
>elements also?
I'm not objecting, just asking questions to clarify JAR's position and
to elicit comments from others with strong opinions. Let's see if I
can clarify both mine and yours:
-- I agree that (MAKE-VECTOR EXP1 EXP2) shouldn't be an error or
cause a warning at runtime should EXP1 evaluate to zero. I'm talking
about compile-time warnings (e.g. for a COMPILE-FILE) when EXP1 is a
literal zero. I oppose most, perhaps all, warnings during evaluation.
Sorry I wasn't more explicit -- I tend to think in terms of separate
compilation and I'm sure many of you are thinking primarily in terms
of interpretation.
-- Likewise, (REVERSE EXP3) obviously shouldn't cause a warning when
EXP3 evaluates to a list with fewer than two elements. But a
compile-time warning about (REVERSE '(A)) might be helpful (if it
weren't so unlikely!).
There's no real debate here. If I were to report `warnings,' as
opposed to actual `errors,' I'd do it only in a compilation mode where
they wouldn't be confused with the runtime behavior of the program and
only if the user asked for them by setting a flag. This is a
development environment issue, not a language issue.
> -- We agree that (ELSE) is a no-no and that (COND) and (COND (ELSE exp))
> are valid.
>
> -- I feel that (BEGIN) should have the same meaning as (COND), but I
> won't push the point.
>
>I don't like this. Unfortunately JAR did not give me choice c (status
>quo, where (COND (ELSE ...)) is legal, but (COND) is not), which I
>like best. I object pretty strongly to (BEGIN) and somewhat less
>strongly to (COND). The usual rationale is that it makes macros
>easier to write, but this is just laziness of the same sort as using
>(cdr (assq <something> <some-list>)) in a Lisp where (cdr '()) -> '().
>(COND (ELSE ...)) although silly has a clear meaning (unless the ELSE
>clause is empty, which should be an error, but we agree on this).
Actually, JINX and I seem to agree that (BEGIN) and (COND) are equally
meaningless. I offer to allow (COND) but feel (BEGIN) makes as much
sense. If there's a consensus against (COND), then I'm even happier.
I'm not all that motivated by wanting to write lazy macros or program-
generating programs for reasons similar to JINX's.
Regards,
David Bartley
-------
∂28-Apr-86 1340 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA Re: SCOOPS, and GNU support question
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 28 Apr 86 13:39:52 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 28 Apr 86 16:39:23 EDT
Received: from ti-csl by csnet-relay.csnet id a003922; 28 Apr 86 16:34 EDT
Received: by tilde id AA15837; Mon, 28 Apr 86 13:50:21 cdt
Date: Mon 28 Apr 86 13:42:05-CDT
From: David Bartley <Bartley%ti-csl.csnet@CSNET-RELAY.ARPA>
Subject: Re: SCOOPS, and GNU support question
To: dcj%jacksun%sun.com@CSNET-RELAY.ARPA,
scheme%mc.lcs.mit.edu@CSNET-RELAY.ARPA
Cc: Bartley%ti-csl.csnet@CSNET-RELAY.ARPA
In-Reply-To: <8604272304.AA11217sun.sun.uucp>
Message-Id: <12202483182.63.BARTLEY@CSC60>
> Date: Sun, 27 Apr 86 16:04:02 PDT
> From: Donald Clark Jackson <dcj%jacksun%sun.com@CSNET-RELAY.ARPA>
>
> As a user of TI-SCHEME, I kind of like
> the SCOOPS object-oriented package.
> I have C-Scheme running on a Sun now, and
> I would like to get SCOOPS running on it.
>
> Is source for SCOOPS available, or is it
> TI proprietary code? Is there something
> similar available?
I'll look into getting formal approval from our product group to
release the source for SCOOPS. The actual SCOOPS source for TI's PC
Scheme has some implementation-dependent efficiency hacks built in,
but we may be able to put together a sanitized portable version.
However, SCOOPS is built upon first-class environments, so it wouldn't
port to some dialects out there (including the standard).
If we get permission to give out the source, we will of course want to
make it non-proprietary, which works both ways: you owe us nothing and
we owe you nothing (well, very little!). I'll see what we can work
out and post the result.
David Bartley
-------
∂29-Apr-86 0743 @MC.LCS.MIT.EDU:JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU meaning of *global* define
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 29 Apr 86 07:43:13 PDT
Received: from XX.LCS.MIT.EDU by MC.LCS.MIT.EDU 29 Apr 86 10:44:21 EDT
Received: from OZ.AI.MIT.EDU by XX.LCS.MIT.EDU via Chaosnet; 29 Apr 86 10:42-EDT
Date: 29 Apr 1986 10:20 EDT (Tue)
Message-ID: <JINX.12202697723.BABYL@MIT-OZ>
From: Bill Rozas <JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU>
To: willc%tekchips%tektronix.csnet@CSNET-RELAY.ARPA
Cc: JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU, RRRS-Authors%mit-mc@XX.LCS.MIT.EDU
Subject: meaning of *global* define
In-reply-to: Msg of 15 Apr 1986 15:49-EST from willc%tekchips%tektronix.csnet at CSNET-RELAY.ARPA
What is the difference between having incorrect procedures all over
the place and having incorrect numbers, lists, strings, or vectors all
over the place?
It would be possible to fix other objects if in our system all objects
maintained a history of how they were created, and often I think that
this would be a very nice debugging environment. Unfortunately, for
efficiency reasons, they do not. Procedures, fortunately, contain the
environments where they are closed, and these include most of the
relevant information about their creation history. By modifying these
environments we can patch a running system in a way we cannot patch it
if the "wrong value" happens to be a vector or other "simple" data
structure. Just because we cannot provide a more general and powerful
debugging tool, it does not mean that we should not provide an
extremely useful (the most useful to me) special case.
In terms of implementation, there are various possible trade offs. I
can easily accept a system where incremental definition (when it does
not degenerate into assignment) causes a garbage-collection-like
process to occur to make all the references consistent. I am
perfectly willing to pay the price of a very powerful feature which I
use relatively often.
PS: Sorry about taking so long to answer this message. It was buried
in a large pile.
∂30-Apr-86 1425 @MC.LCS.MIT.EDU:jcm@ORNL-MSR.ARPA Questions from a newcomer
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 30 Apr 86 14:19:02 PDT
Received: from ORNL-MSR.ARPA by MC.LCS.MIT.EDU 30 Apr 86 17:18:30 EDT
Received: by ORNL-MSR.ARPA (4.12/4.9)
id AA16413; Wed, 30 Apr 86 16:38:46 edt
Date: Wed, 30 Apr 86 16:38:46 edt
From: jcm@ORNL-MSR.ARPA (James A. Mullens)
Message-Id: <8604302038.AA16413@ORNL-MSR.ARPA>
To: scheme@mc
Subject: Questions from a newcomer
Hi -
I would like to learn know about an implementation of Scheme which runs
on VAX VMS 4.x and an implementation which runs on a 68000 machine
(especially Amiga, Macintosh Plus, Sage/Stride, or Atari 1040ST). I
have seen a reference to Scheme 312 which sounded interesting.
I have also seen a reference to "Chez Scheme" for VAX BSD 4.2++ which I
would like to know more about.
I am especially interested "native" implementations (not implemented on
top of another Lisp), versions with a compiler, and versions which are
public domain. I have purchased TI's PC Scheme for my IBM AT.
I am interested in Scheme because I think it may run reasonably well on
a micro I can afford to have at home. I have a Sage II now, but I am
considering another 68000 machine. I am also hoping that Scheme will
be a simple, easy to implement Lisp which is not thundering towards
commercialization.
I tried Golden Common Lisp on ATs and was disappointed in the
unwieldiness.
We have Common Lisp (DEC Lisp and NIL) on the VAXen I use at work,
but I would like to investigate Scheme as an alternative.
- Thanks
jim mullens
oak ridge national laboratory
∂30-Apr-86 2156 @MC.LCS.MIT.EDU:JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU Questions from a newcomer
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 30 Apr 86 21:56:39 PDT
Received: from OZ.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 1 MAY 86 00:55:49 EDT
Date: 1 May 1986 00:43 EDT (Thu)
Message-ID: <JINX.12203116956.BABYL@MIT-OZ>
From: Bill Rozas <JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU>
To: jcm@ORNL-MSR.ARPA (James A. Mullens)
Cc: scheme@MC.LCS.MIT.EDU
Subject: Questions from a newcomer
In-reply-to: Msg of 30 Apr 1986 16:38-EDT from jcm at ORNL-MSR.ARPA (James A. Mullens)
MIT CScheme runs on a wide variety of machines with C compilers. In
particular it runs on some 68000 systems (mostly unices) and on VMS.
It currently does not have a compiler, but will have one by the end of
the summer (the VAX back end may not be ready at that time, however).
It is public domain.
∂05-May-86 1142 @MC.LCS.MIT.EDU:amn@LOCUS.UCLA.EDU getting C-Scheme running on HP workstations
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 5 May 86 11:42:26 PDT
Received: from LOCUS.UCLA.EDU by MC.LCS.MIT.EDU 5 May 86 14:40:34 EDT
Date: Mon, 5 May 86 11:26:40 PDT
From: Arthur Newman <amn@LOCUS.UCLA.EDU>
To: scheme@mc.lcs.mit.edu
Subject: getting C-Scheme running on HP workstations
Message-ID: <860505.182640z.03031.amn@ZEUS.LOCUS.UCLA.EDU>
By just installing the student version we would get the following bug:
trying to set! an undefined variable would cause a bus error and kick
you out of Scheme back to the system prompt.
I recompiled Scheme using the normal.bin file, and eval'ed
(enable-language-features). Now trying to set! undefined variables
just gives an error message.
Are there any reasons why we had trouble with set! in the student system
that you can think of?
Thanks for any help,
Arthur Newman
∂05-May-86 1402 @MC.LCS.MIT.EDU:JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU one more message about CScheme
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 5 May 86 14:02:15 PDT
Received: from OZ.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 5 MAY 86 17:01:34 EDT
Date: 5 May 1986 16:26 EDT (Mon)
Message-ID: <JINX.12204337135.BABYL@MIT-OZ>
From: Bill Rozas <JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU>
To: scheme@MC.LCS.MIT.EDU
Subject: one more message about CScheme
Please, send bug reports about MIT CScheme to
bug-cscheme%oz@mit-mc, not to this (scheme@mit-mc) mailing list.
bug-scheme%oz@mit-mc is not good either. There is more than one
implementation at MIT, and bug-scheme does not refer to CScheme.
General questions about CScheme should be sent to
info-cscheme%oz@mit-mc.
Thanks.
PS: When answering bug reports incorrectly sent to this mailing list I
have tried not to send the reply here. If you have run across similar
bugs, and have not received a reply, send mail to bug-cscheme, since
they have probably been fixed. Notices of bug fixes, etc, are sent to
info-cscheme.
∂05-May-86 1910 @MC.LCS.MIT.EDU:serafini@ames-aero implementation roundup
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 5 May 86 19:09:55 PDT
Received: from ames-aero.ARPA by MC.LCS.MIT.EDU 5 May 86 21:41:26 EDT
Date: 5 May 86 18:32:00 PST
From: DAVE SERAFINI <serafini@ames-aero>
Subject: implementation roundup
To: scheme <scheme@mit-mc.arpa>
Reply-To: DAVE SERAFINI <serafini@ames-aero>
Has anyone compiled a list of the various implementations of scheme extant,
and could I be send a copy?
advTHANKSance
Dave Serafini
------
∂05-May-86 1914 JAR@MC.LCS.MIT.EDU implementation roundup
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 5 May 86 19:13:36 PDT
Date: Mon, 5 May 86 22:12:44 EDT
From: Jonathan A Rees <JAR@MC.LCS.MIT.EDU>
Subject: implementation roundup
To: serafini@AMES-AERO.ARPA
cc: SCHEME@MC.LCS.MIT.EDU
In-reply-to: Msg of 5 May 86 18:32:00 PST from DAVE SERAFINI <serafini at ames-aero>
Message-ID: <[MC.LCS.MIT.EDU].904409.860505.JAR>
Date: 5 May 86 18:32:00 PST
From: DAVE SERAFINI <serafini at ames-aero>
Has anyone compiled a list of the various implementations of scheme extant,
and could I be send a copy?
There's a list of implementations, with brief descriptions, in the file
"SCHEME;SCHEME IMPLS" on MIT-MC. I compiled it from messages sent to
this mailing list. I don't think MC's FTP server requires passwords to
log in; if you are asked to supply a user name or password, give
arbitrary strings like GUEST and ARPA.
People who don't have Internet access and want a copy of this file
should send a message to JAR@MC (not to SCHEME@MC!) requesting it. I'll
batch requests, except that if I get more than ten requests I'll simply
send the file out to the entire Scheme mailing list. It's about 12K
bytes so I'll have to mail it in two pieces (MC's mailer is limited to
10 or 11K).
Jonathan
∂22-May-86 0819 NET-ORIGIN@MC.LCS.MIT.EDU H, E, S, B, O, D, X
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 22 May 86 08:19:24 PDT
Received: from LIVE-OAK.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 22 MAY 86 11:17:45 EDT
Received: from JOE-LOUIS.LCS.MIT.EDU by MIT-LIVE-OAK.ARPA via CHAOS with CHAOS-MAIL id 1619; Thu 22-May-86 11:18:03-EDT
Date: Thu, 22 May 86 11:18 EDT
From: Jonathan A Rees <JAR@MIT-AI.ARPA>
Subject: H, E, S, B, O, D, X
To: rrrs-authors@MIT-MC.ARPA
Message-ID: <"860522111800.2.jar@AI"@JOE-LOUIS.LCS.MIT.EDU>
Has anyone implemented number output formats in their entirety? A
number of people have requested the the following minor change: that
the keywords which are now single letters be spelled out. E.g.
EXPRESSED and SUPPRESSED instead of E and S.
We can discuss the details separately. If some people think such a
change is a bad idea at this point then the change shouldn't be made.
But if no one has implemented it and people like the idea then I think
it can be done pretty painlessly.
The letters in question are H, E, S, B, O, D, and X. If you don't know
what they mean that simply attests to the desirability of spelling them
out.
Jonathan
∂22-May-86 0900 NET-ORIGIN@MC.LCS.MIT.EDU LOAD
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 22 May 86 08:54:27 PDT
Received: from LIVE-OAK.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 22 MAY 86 11:53:10 EDT
Received: from JOE-LOUIS.LCS.MIT.EDU by MIT-LIVE-OAK.ARPA via CHAOS with CHAOS-MAIL id 1622; Thu 22-May-86 11:51:29-EDT
Date: Thu, 22 May 86 11:51 EDT
From: Jonathan A Rees <JAR@MIT-AI.ARPA>
Subject: LOAD
To: rrrs-authors@MIT-MC.ARPA
Message-ID: <"860522115129.3.jar@AI"@JOE-LOUIS.LCS.MIT.EDU>
I would like to either remove LOAD from the report or change the way in
which it is presented.
Reasons:
(a) A LOAD procedure is equipotent with EVAL, and EVAL isn't documented.
The same reasons that applied to kick out EVAL apply here.
(b) It seems to me a perfectly reasonable idea to create Scheme systems
that don't have a LOAD procedure. I can imagine at least two completely
different kinds of implementations in which LOAD wouldn't make sense.
One kind of implementation would be in the style of most implementations
of PASCAL, FORTRAN, etc., where one runs programs by configuring entire
environments at once. This avoids all the semantic stickiness of LOAD
and EVAL by making configuration a meta-issue. Second, at the opposite
extreme, in an Interlisp-like implementation where one actually edits
"in core", and files don't generally come into play, LOAD is pretty
meaningless.
(c) It seems to me that LOAD is a user interface/programming environment
issue. We don't talk about read-eval-print loops, or entering or
exiting scheme, or logging in, or editing files; how is this different?
Alternative solutions:
(1) Omit it entirely without saying anything.
(2) Mention somewhere (e.g. in the introduction) that Scheme is
"usually" an interactive language with a read-eval-print loop and
support for things like interactive debugging and dynamic program
loading.
(3) Reclassify LOAD as being part of the syntax of a file. I.e., like
DEFINE, it can only occur at top level in a file.
(4) Leave it alone, but put it in a "user interface" section along with
TRANSCRIPT-ON and TRANSCRIPT-OFF (and maybe TRACE, DEBUG, and EDIT?),
instead of classifying it as an input procedure. Make a disclaimer that
these things are only guaranteed to work "at top level" (whatever that
is).
(5) Some combination of (3) and (4) [allow it both in files and at
command loops].
Feedback solicited.
-Jonathan
-----
KMP: please send a message making a case for a (LOAD-SILENTLY x).
∂22-May-86 1016 @MC.LCS.MIT.EDU:andy@aids-unix Re: LOAD
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 22 May 86 10:16:06 PDT
Received: from ads-grape.ARPA by MC.LCS.MIT.EDU 22 May 86 13:14:03 EDT
Date: Thu, 22 May 86 10:13:20 pdt
From: andy@aids-unix (Andy Cromarty)
To: JAR@MIT-AI.ARPA
Subject: Re: LOAD
Cc: rrrs-authors@mit-mc
1. Numbers: I agree with full naming. Even when I was actively working
on a full numbers package I couldn't remember what these were
wiuthout looking them up. Perhaps implementations should be free
to support single-letter names in "not recommended" status for
the sake of downward compatibility.
2. LOAD: This is sticky. The beast probably should not exist in this
or any other language, because files themselves are a bad idea
left over from the early days of computer science when we didn't
know any better and allowed hardware to dominate software design.
The problem is that not having LOAD available requires that we
have an alternative available, which means either (a) having a
transparent or essentially transparent object filing system or (b)
having a non-transparent object filing system with an explicit
object-writing operator (e.g. WRITE or some variant would have to
be able to render permanent any arbitrary object, such as functions
that make lexical reference to variables from an enclosing scope
and similar LISP objects that can have very messy state in a
lexically scoped environment).
If we have LOAD available but we don't document it, we have simply
ignored the problem, rather than either solving it or admitting we
can't yet. The fact is that, unlike EVAL, LOAD is something that
everyone will have to use, including newcomers; it's not esoterica,
even if it does interfere with intellectual cleanliness. The means
to address such cleanliness issues is probably design, not selective
non-documentation.
A good compromise might be to add a paragraph of comment,
something like what appears in the RRRS for macros, stating that
this is currently a difficult area in LISP design and that LOAD
is provided but that work on alternatives (e.g. object filing systems)
is encouraged.
asc
∂22-May-86 1558 @MC.LCS.MIT.EDU:KMP@ELEPHANT-BUTTE.SCRC.Symbolics.COM Notes about (↑ revised 3) report
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 22 May 86 15:58:13 PDT
Received: from ELEPHANT-BUTTE.SCRC.Symbolics.COM by MC.LCS.MIT.EDU 22 May 86 18:55:22 EDT
Received: from RIO-DE-JANEIRO.SCRC.Symbolics.COM by ELEPHANT-BUTTE.SCRC.Symbolics.COM via CHAOS with CHAOS-MAIL id 6687; Thu 22-May-86 18:53:41 EDT
Date: Thu, 22 May 86 18:53 EDT
From: Kent M Pitman <KMP@SCRC-STONY-BROOK.ARPA>
Subject: Notes about (↑ revised 3) report
To: JAR@MIT-MC.ARPA
cc: KMP@SCRC-STONY-BROOK.ARPA, RRRS-AUTHORS@MIT-MC.ARPA
Message-ID: <860522185327.2.KMP@RIO-DE-JANEIRO.SCRC.Symbolics.COM>
On p30, while reading the description of READ, the following questions
occurred to me, the answers to which are in some cases probably dependent
upon the answers to the others in order to assure useful consistency:
* Does the stream become closed as a side-effect of hitting eof?
* Is it an error to read from a closed stream, or does eof just keep
getting returned?
* Can you read the eof object twice at the end of a file using READ ?
How about if using READ-CHAR ? PEEK-CHAR ?
* Is it possible to detect whether a file is closed?
* Is it acceptable for close on certain streams to not really close the file?
For example, I could imagine implementing terminal streams or streams into
editor buffers in a way such that they just always claimed to be open and
close was a no-op.
Also on p30, it seems to me that the notion of CHAR-READY? is not a useful one.
It's subject to timing errors in multi-processed systems and/or systems which
allow asynchronous interrupts. The Lisp Machine's TYI-NO-HANG paradigm is much
better, since it has a more test-and-set feel to it and is more easy to use
reliably. I suggest that CHAR-READY? should be flushed and replaced by a
READ-CHAR? which returns either a character if one is ready, or NIL otherwise.
This gets you out of the bind with rubbing out stuff that CHAR-READY? has
noticed, which is really an awful crock. I believe that TYI-NO-HANG will
interact satisfactorily with Lispm-style rubout handlers.
On p30, the issue with LOAD is that if we're going to define it, we need to give
it a standard meaning so it can be usefully used on different systems. If we
don't say it either types out or doesn't, then people can't use it in their
programs for fear it will screw up the display (this exact problem arose in real
situations in my work with Common Lisp). I feel that a LOAD which does
no typeout is a useful interface to the operating system and a necessary
feature for bootstrapping other code. The absence to provide it will mean that
either every user will have to type in a definition of load at the keyboard
or every system will have to provide it anyway. Obviously, this translates
to that every system will provide one, since no one's going to force the user
to type it in. If every system is going to provide it, we might as well
standardize on it so people can know what they're getting. If particular
dialects want to offer additional options, well, ... you're no doubt aware
of my feelings on this issue and i'll spare the cc'd folks for now.
∂23-May-86 0957 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA Re: H, E, S, B, O, D, X
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 23 May 86 09:57:07 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 23 May 86 12:54:49 EDT
Received: from ti-csl by csnet-relay.csnet id a004166; 23 May 86 12:35 EDT
Received: by tilde id AA21938; Fri, 23 May 86 10:21:49 cdt
Date: Fri 23 May 86 10:06:06-CDT
From: David Bartley <Bartley%ti-csl.csnet@CSNET-RELAY.ARPA>
Subject: Re: H, E, S, B, O, D, X
To: JAR%ai.ai.mit.edu@CSNET-RELAY.ARPA,
rrrs-authors%mc.lcs.mit.edu@CSNET-RELAY.ARPA
Cc: Bartley%ti-csl.csnet@CSNET-RELAY.ARPA
In-Reply-To: <"860522111800.2.jar@AI"@JOE-LOUIS.LCS.MIT.EDU>
Message-Id: <12208997463.23.BARTLEY@CSC60>
We have implemented the number output formats in PC Scheme. I like
the idea of spelling out the keywords and won't "vote" against it, but
there are two troublesome aspects:
(1) We already have a product out that supports the abbreviated style,
so we'd have to grandfather it. That's always a minor pain.
(2) My experience is that not one programmer in ten can spell both
EXPRESSED and SUPPRESSED correctly (sorry about that!). What should
NUMBER->STRING do with EXPRESED or SUPRESSED? [Of course, there are
plenty of other opportunities for misspellings to trip one up!]
Seriously, I recommend that we retain the single letter abbreviations
as an option if we switch to full names for these keywords.
Regards,
David Bartley
-------
∂23-May-86 1013 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA Re: LOAD
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 23 May 86 10:12:57 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 23 May 86 13:08:09 EDT
Received: from ti-csl by csnet-relay.csnet id ab04166; 23 May 86 12:36 EDT
Received: by tilde id AA21281; Fri, 23 May 86 10:06:37 cdt
Date: Fri 23 May 86 09:54:59-CDT
From: David Bartley <Bartley%ti-csl.csnet@CSNET-RELAY.ARPA>
Subject: Re: LOAD
To: JAR%ai.ai.mit.edu@CSNET-RELAY.ARPA,
rrrs-authors%mc.lcs.mit.edu@CSNET-RELAY.ARPA
Cc: Bartley%ti-csl.csnet@CSNET-RELAY.ARPA
In-Reply-To: <"860522115129.3.jar@AI"@JOE-LOUIS.LCS.MIT.EDU>
Message-Id: <12208995440.23.BARTLEY@CSC60>
My first thought is that LOAD should be retained, but not as an
essential procedure. That would help a programmer avoid some name
conflicts, since most implementations of Scheme and Lisp have a LOAD.
My second thought is to wonder why we have included non-essential
procedures in the Report. Is it to warn a programmer that the given
identifier should be considered "reserved" or is it to guide
implementors toward consistent extensions to the essential language?
In the first case, I'd say that the programmer should be referring
primarily to the manual for his implementation, not to the Report, and
that that manual should take care to warn him of portability issues.
In the second case, I'd say that our coverage of "suggested"
extensions is so patchy that it's almost irrelevant whether LOAD is
mentioned or not. After all, where are COMPILE and EVAL, two obvious
names for extended features?
So, my inclination is to let JAR do whatever he likes. This is a
pragmatic issue. Ideally, we'd have an appendix that discusses these
things, but that may be Pandora's box.
--db--
-------
∂25-May-86 0923 @MC.LCS.MIT.EDU:VERACSD@USC-ISI.ARPA Addition to Mailing-List
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 25 May 86 09:23:11 PDT
Received: from USC-ISI.ARPA by MC.LCS.MIT.EDU 25 May 86 12:18:59 EDT
Date: 25 May 1986 12:18-EDT
Sender: VERACSD@USC-ISI.ARPA
Subject: Addition to Mailing-List
From: VERACSD@USC-ISI.ARPA
To: scheme@MC.LCS.MIT.EDU
Cc: veracsd@USC-ISI.ARPA
Message-ID: <[USC-ISI.ARPA]25-May-86 12:18:05.VERACSD>
Please add me to your Scheme Mailing-List.
I am presently running MacScheme, and have used it to work
through the examples in the Abelson & Sussman book, define a
Common Lisp compatibility package, and implement a PROLOG.
I am particularly interested in using continuations and macros in
Scheme. I have a great general interest in logic-programming,
and the imple- mentation of logic-programming languages.
Thanks.
-- Cris Kobryn
∂25-May-86 1237 @MC.LCS.MIT.EDU:VERACSD@USC-ISI.ARPA Addition to Mailing-List
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 25 May 86 12:37:32 PDT
Received: from USC-ISI.ARPA by MC.LCS.MIT.EDU 25 May 86 15:14:26 EDT
Date: 25 May 1986 12:18-EDT
Sender: VERACSD@USC-ISI.ARPA
Subject: Addition to Mailing-List
From: VERACSD@USC-ISI.ARPA
To: scheme@MC.LCS.MIT.EDU
Cc: veracsd@USC-ISI.ARPA
Message-ID: <[USC-ISI.ARPA]25-May-86 12:18:05.VERACSD>
ReSent-To: scheme@MC.LCS.MIT.EDU
ReSent-From: VERACSD at USC-ISI.ARPA
ReSent-Date: 25 May 1986
Please add me to your Scheme Mailing-List.
I am presently running MacScheme, and have used it to work
through the examples in the Abelson & Sussman book, define a
Common Lisp compatibility package, and implement a PROLOG.
I am particularly interested in using continuations and macros in
Scheme. I have a great general interest in logic-programming,
and the imple- mentation of logic-programming languages.
Thanks.
-- Cris Kobryn
∂26-May-86 1555 @MC.LCS.MIT.EDU:JAR@MX.LCS.MIT.EDU R↑3RS draft
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 26 May 86 15:55:20 PDT
Received: from MX.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 26 MAY 86 18:54:42 EDT
Date: Mon, 26 May 86 18:54:00 EDT
From: Jonathan A Rees <JAR@MX.LCS.MIT.EDU>
Subject: R↑3RS draft
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <[MX.LCS.MIT.EDU].921583.860526.JAR>
I have mailed / given out copies of the latest draft of the report (22
May). People in Boston and New Haven should have either received one
from me or should stop by and pick one up. A copy went to Tektronix by
special courier. People with Internet access AND Latex AND something
that will read Unix "tar" files should FTP to MIT-PREP, using user
Scheme and null password if necessary, and get the file
"/u/jar/r3rs.tar". If FTP doesn't seem to work, then try telnetting to
PREP and logging in as Scheme (no password needed). The login shell is
FTP. Send the abovementioned file to your machine. Extract all the
files somewhere and run Latex on the file "rrrs.tex". If you don't have
something that will read tar files, use FTP to get all the files on the
directory /u/jar/r3rs.
On Friday I mailed one copy to Dan Friedman and one copy to Dave
Bartley, so people at Indiana and TI should get extra copies from them.
Anyone else who wants one mailed should let me know right away (although
I think that everyone has been taken care of).
There is a cover letter, too, relevant parts of which I'll send
electronically.
Jonathan.
∂27-May-86 1120 NET-ORIGIN@MC.LCS.MIT.EDU Remaining questions & remarks (1)
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 27 May 86 11:19:24 PDT
Received: from LIVE-OAK.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 27 MAY 86 14:18:40 EDT
Received: from ROCKY-GRAZIANO.LCS.MIT.EDU by MIT-LIVE-OAK.ARPA via CHAOS with CHAOS-MAIL id 1808; Tue 27-May-86 14:18:17-EDT
Date: Tue, 27 May 86 14:19 EDT
From: Jonathan A Rees <JAR@MIT-AI.ARPA>
Subject: Remaining questions & remarks (1)
To: rrrs-authors@MIT-MC.ARPA
Message-ID: <"860527141917.1.jar@AI"@ROCKY-GRAZIANO.LCS.MIT.EDU>
I included the following with the reports I sent and gave out. Here it
is again for those people who don't have it already. It enumerates most
of the remaining nits I have. Don't be intimidated by the number of
items; none are serious. Many of these questions have been discussed
and some have been resolved already. For those items that stay
unresolved, I'll take the conservative position and leave the new report
in agreement with the old report.
I'll send a second, more recent set of nits separately.
- Jonathan
-----
Questions on LANGUAGE
I left CASE as is, using EQV? as the comparison, and I explicitly stated
that the object ought to be boolean, character, number, or symbol. But
shouldn't it allow empty lists, vectors, and strings, too?
May structure be shared in cases like (APPEND '(A B) '()) , or should APPEND
be Common Lisp compatible? [Bartley says sharing would be a gratuitous
incompatibility with CL, I'm invlined to agree.]
Should APPEND and APPEND! explicitly allow any object as last argument
(CL compatible)?
Should APPEND! disallow () as other than last argument?
I decided that allowing GCD, etc. of Gaussian integers was probably
premature. I'll put them in if someone writes the documentation
(including examples).
Can we decide on what to do about number exactness on input? How about:
inexact if there are digits following a decimal point, or if exponential
notation is used. Otherwise exact.
Can we specify that DISPLAY of a character does the same thing as
WRITE-CHAR?
What should be said, if anything, about the desirability and/or legality
of EQUAL? failing to terminate? Rozas thinks an implementation with
this property is in error.
In light of the vagaries of CALL-WITH-xxPUT-FILE, perhaps it
would be a good idea to explicitly state that closing a closed port
should be a no-op instead of an error.
-----
Questions on PRESENTATION
Should the various examples which use DEFINE be changed to use the
(define (foo ...) ...) syntax instead of (define foo (lambda ...))?
Several people have told me that all those LAMBDA's could unnecessarily
intimidate SIGPLAN readers.
There are two places (in descriptions of let* and letrec) where it is
necessary to create a lambda body in a context (such as the tail of a
BEGIN) where there isn't one already. What is the cleanest way to do
this? Is (let () ...) ok, or would ((lambda () ...)) or something else
be better?
Is the word ``promise'' all right for objects returned by DELAY?
Should the complete presentation of FORCE appear up front with DELAY, or
delayed until the place where the entry for FORCE appears?
-----
Notes on LANGUAGE
The selectors in a CASE expression must be distinct.
I have left CASE and COND syntax as in RRRS: there must be at least one
clause, but it may be an ELSE clause.
BOOLEAN? is essential.
No agreement on COND or BEGIN. I have left them as in RRRS.
[To do: fix the BNF to agree!]
The RRRS explicitly allows internal definitions in the body of a LETREC.
They are scoped to the body only, not to the entire expression. I can
flush this "feature" if a movement arises to do so; it seems sufficient
to me to permit only expressions (not definitions) in the body.
The list to which the rest argument gets bound must be newly allocated.
Making LET* be essential was suggested, but there was resistance to
this, so I left it as is.
There was strong sentiment both for removing REC and for removing
NAMED-LAMBDA. However, the sentiment was not unanimous. I don't
understand why it should have matterred so much, since neither is an
essential feature. If these are present, shouldn't everyone's favorite
features be present too? ... Supporters of REC included Kent Dybvig and
Dan Friedman. Supporters of NAMED-LAMBDA included Jim Miller and Henry
Wu. In addition, Bill Rozas insisted that if REC stayed, then
NAMED-LAMBDA must stay too, but he was willing to see both go.
APPEND! necessarily clobbers its arguments (other than the last and
empty ones).
Many people wanted the number predicates pruned (i.e. choose between <
and <?). No agreement here, so both stay.
The BNF says that ALL random symbols, including ELSE, =>, UNQUOTE, and
UNQUOTE-SPLICING, are reserved and may not be used as variable names. I
hope this is OK with everyone.
Note that the grammar for numbers allows one to write things like 23##
for inexact numbers. This was implicit in last summer's report, and I
thought it wouldn't make sense if this was allowed on output but not on
input.
The case sensitivity issue was a very sensitive one (so to speak). I
did not change the report's stance of symbol case insensitivity.
-----
Notes on PRESENTATION
I listed myself as "editor" of this version. I probably should just
remain a coauthor, but the report needs an editor in order to look like
the Algol 60 report.
I eliminated the term ``special form.'' I introduced phrases like ``IF
expression'' in a couple of places; things like IF and CASE are not
referred to as active agents (keywords don't refer to particular
things---it's the evaluator that actively interprets expressions having
certain special syntactic forms). I removed statements like
``<expression> is evaluated but <variable> is not.''
At Pitman's request, I changed ``guard'' to ``test'' in the description
of COND because ``guard'' has inappropriate connotations; COND doesn't
really implement a Dijkstra guarded conditional.
The term "variable" now refers the name itself, not the binding or the
location. This is in accordance with the way logicians (including
Alonzo Church) use the term.
I decided not to add an appendix describing S&ICP differences. The most
important difference, I think, was RRRS's lack of DELAY and FORCE. I no
longer find the presence of SEQUENCE distasteful.
I removed the apologetic statement that went with the description of T
and NIL. (Some people actually like T and NIL.)
The sentence ``This procedure can be very confusing if used
indiscriminately'' in the descriptions of set-car! and set-cdr! was
struck at Chris Hanson's request; it seemed gratuitous.
There are at least sixteen different references to Common Lisp. I'm
going to try to remove some of them. We have to make it very clear that
Scheme is 11 years old and originated some of CL's ideas --- not the
other way around!
∂27-May-86 1339 @MC.LCS.MIT.EDU:cth%indiana.csnet@CSNET-RELAY.ARPA define (resend)
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 27 May 86 13:38:40 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 27 May 86 16:37:57 EDT
Received: from indiana by csnet-relay.csnet id a009297; 27 May 86 15:40 EDT
Date: Tue, 27 May 86 12:20:15 EST
From: Chris Haynes <cth%indiana.csnet@CSNET-RELAY.ARPA>
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: define (resend)
We have one great difficulty with the RRRS as it stands: DEFINE can not make
global bindings when used locally and still be consistent with the report.
Much has been said about the pros and cons of the "MIT style" local define,
and it is clear that a consensus is not possible, so a compromise is in
order. Simply making MIT style optional is not acceptible: optional syntax,
if implemented, must conform to a single semantics. Thus DEFINE semantics is
preempted as the report is currently written.
Using a different keyword, such as DEFINE-GLOBAL, to make global definitions
from lexically nested positions is not acceptible to us. We have tried to
live with such arrangements for some months now, and have found them
intolerable.
A compromise position would be to include a form such as DEFINE-GLOBAL in
the report, hopefully as a required special form, and make an explicit
exception in the case of DEFINE to the rule that optional features, if
implemented, always have a single semantics. The idea is that it should be
possible, in any "standard" Scheme that supports some kind of macro package,
to get *either* style of lexical DEFINE by simply loading the appropriate
macro package. Failing that, it should at least be *possible* for a
Scheme implementation to provide such packages, and allow either package to
be loaded without stepping outside of the "standard".
This compromise is not something that anyone would love, but it is most
sincerely hoped that it is something that everyone can live with. Then
no one will feel bad about being associated with the RRRS.
Chris Haynes
Dan Friedman
Kent Dybvig
∂27-May-86 1844 @MC.LCS.MIT.EDU:JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU define (resend) (long)
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 27 May 86 18:44:40 PDT
Received: from OZ.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 27 MAY 86 21:44:00 EDT
Date: 27 May 1986 21:43 EDT (Tue)
Message-ID: <JINX.12210162108.BABYL@MIT-OZ>
From: Bill Rozas <JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU>
To: Chris Haynes <cth%indiana.csnet@CSNET-RELAY.ARPA>
Cc: rrrs-authors@MC.LCS.MIT.EDU
Subject: define (resend) (long)
In-reply-to: Msg of 27 May 1986 13:20-EDT from Chris Haynes <cth%indiana.csnet at CSNET-RELAY.ARPA>
I'm afraid that we have a real disagreement here.
Much has been said about the pros and cons of the "MIT style" local define,
and it is clear that a consensus is not possible, so a compromise is in
order.
I disagree. Much has been said about MIT's INCREMENTAL DEFINE (which
T also has), but not much has been said at all about (static and local)
INTERNAL DEFINE, which is the only one which appears on the report.
This happened mostly for compatibility with S&ICP, not because the
people from MIT were trying to force it on anybody else (after all, we
cheerfully accepted LETREC, which we did not have before).
Using a different keyword, such as DEFINE-GLOBAL, to make global definitions
from lexically nested positions is not acceptible to us. We have tried to
live with such arrangements for some months now, and have found them
intolerable.
DEFINE-GLOBAL does not make sense for either T or MIT-Scheme. Neither
really has a global environment distinguished from the rest, thus
there is no environment where these definitions could be made. The
closest we (MIT) can come to this is making the definition occur in
the innermost environment created by means of MAKE-ENVIRONMENT (the
innermost locale in the case of T), but this seems arbitrary in our
case, to say the least, since all environments are created equal. In
T this is not the case, so this is a viable option. We would still do
it if everybody else agreed to it, but we'd rather not, since there
are other options (see below).
The idea is that it should be
possible, in any "standard" Scheme that supports some kind of macro package,
to get *either* style of lexical DEFINE by simply loading the appropriate
macro package.
What about Schemes that do not have macros at all? Does this mean
that they have to choose one of the two styles, and thus have no
possibility of running the "portable" code written using the other? I
disagree very strongly with having a feature with two possible
inconsistent semantics. The only option would be to remove its
optional status, and therefore remove it from the report completely.
Thus nobody would be able to use DEFINE at all in portable code.
Changing semantics now, besides being unacceptable to us, would mean
being purposely incompatible with S&ICP, and gratuitously incompatible
with the previous version of the report.
What is it that you do not like about DEFINE-GLOBAL? The name is too
long? Use DEFINE! or DEF instead. The first was suggested at the meeting
in Brandeis. Is the problem that it is not even in the report, so you
can't use it because it is not portable? I'm pretty convinced that we
(MIT) could be convinced of accepting it for the sake of consensus
after a little arm twisting (very little needed).
Note that there is a portable way of achieving the effect of
DEFINE-GLOBAL:
(define foo) ; or (define foo '*)
(define bar) ; or (define bar '*)
(let ((<local-state>))
(set! foo <whatever you want 1>))
(set! bar <whatever you want 2>)))
We often do this (although we have and use alternatives) to "export"
values to outer environments, but this gives us more control than
DEFINE-GLOBAL, since we can just place the DEFINEs in the environment
where we want the definitions to occur.
If you do not like the assignments, there is the following
alternative:
(with-exports (foo bar)
(let ((<local-state>))
(define-export foo <whatever you want 1>)
(define-export bar <whatever you want 2>)))
which would just be pretty syntax for the previous choice. Note that
DEFINE-EXPORT (or DEFINE!, or anything you want to call it) is nothing
special, since it trivially turns into SET!.
Note that the (FOO BAR) list could be made optional, meaning "trap"
all DEFINE-EXPORTs.
∂28-May-86 0827 @MC.LCS.MIT.EDU,@KATHERINE.THINK.COM:gls@AQUINAS.THINK.COM Remaining questions & remarks (1)
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 28 May 86 08:26:59 PDT
Received: from Godot.Think.COM by MC.LCS.MIT.EDU 28 May 86 11:21:41 EDT
Received: from KATHERINE.THINK.COM by Godot.Think.COM; Wed, 28 May 86 10:42:51 edt
Date: Wed, 28 May 86 10:43 EDT
From: Guy Steele <gls@Think.COM>
Subject: Remaining questions & remarks (1)
To: JAR@MIT-AI.ARPA
Cc: rrrs-authors@MIT-MC.ARPA
In-Reply-To: <"860527141917.1.jar@AI"@ROCKY-GRAZIANO.LCS.MIT.EDU>
Message-Id: <860528104332.1.GLS@KATHERINE.THINK.COM>
Date: Tue, 27 May 86 14:19 EDT
From: Jonathan A Rees <JAR@MIT-AI.ARPA>
...
There are at least sixteen different references to Common Lisp. I'm
going to try to remove some of them. We have to make it very clear that
Scheme is 11 years old and originated some of CL's ideas --- not the
other way around!
That's right! Good for you.
--Guy
∂28-May-86 0836 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA hash-consing
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 28 May 86 08:36:45 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 28 May 86 11:33:21 EDT
Received: from ti-csl by csnet-relay.csnet id aj17147; 28 May 86 11:08 EDT
Received: by tilde id AA18724; Wed, 28 May 86 09:55:46 cdt
Date: Wed 28 May 86 09:45:51-CDT
From: David Bartley <Bartley%ti-csl.csnet@CSNET-RELAY.ARPA>
Subject: hash-consing
To: RRRS-Authors%mit-mc@CSNET-RELAY.ARPA
Cc: Bartley%ti-csl.csnet@CSNET-RELAY.ARPA
Message-Id: <12210304495.60.BARTLEY@CSC60>
Has anyone had any experience with systems that use hashing CONS? I
remember the idea was in vogue 15 or 20 years ago as a way to lower
memory consumption, speed up EQUAL, and for theoretical (heretical?)
reasons. The idea is to use hashing techniques to make pairs that are
EQUAL? also be EQ?.
The disadvantages seem to be (1) slower CONS, (2) unclear semantics
for SET-CAR! and SET-CDR!, (3) separate spaces or tags (or something)
if both hashed and regular CONS exist, and (4) GC complications. Are
there any experimental results that demonstrate any significant
compensating advantages? If so, what are the circumstances?
The definition of CONS in the RRRRS guarantees that every pair
returned is unique, so hashing would seem to be out of the question.
However, I wonder if a HASH-CONS procedure has any merit.
Regards,
David Bartley
-------
∂28-May-86 1137 @MC.LCS.MIT.EDU:andy@aids-unix Re: define
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 28 May 86 11:37:37 PDT
Received: from ads-grape.ARPA by MC.LCS.MIT.EDU 28 May 86 14:36:14 EDT
Date: Wed, 28 May 86 08:04:09 pdt
From: andy@aids-unix (Andy Cromarty)
To: JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU, cth%indiana.csnet@CSNET-RELAY.ARPA
Subject: Re: define
Cc: rrrs-authors@MC.LCS.MIT.EDU
If we are casting votes on DEFINE, I would observe that of the
half-dozen or so of us here who are directly involved in our Scheme
effort, only one of us favors any legitimate status for "global"
DEFINEs. (He happens to come from Indiana, BTW, and we may have
succeeded in changing even his mind on this issue.) The rest of us
have from the outset found Scheme-84's global DEFINE semantics to be
an abhorrent violation of the principles of lexical scope. In fact,
we assumed it was a compiler bug when we first ran across it.
Even where there is a most global environment, we are hard-pressed
to see what could justify advocacy of a special form that reaches
into it specially from an enclosed scope to destructively manipulate
its state. If we (collectively) need an extension of Scheme to achieve
this effect, let's promote binding environments to first-class objects and
define a destructor that treats them uniformly. (I believe, however,
that it is possible to write substantive, efficient, and above all,
elegant Scheme programs without the inclusion of such a destructor.)
I have always felt that the global DEFINE in Scheme-84 was a profound
design flaw that must be attributable to the unfortunate influence of
the Franz environment (both software and intellectual) in which Scheme-84
was constructed. I understand that there is a substantial difference of
opinion on this issue, but we find it difficult to see how global DEFINEs
are even arguably compatible with what we take to be fundamental design
principles of Scheme. In fact, as evidence of our objection to Scheme-84's
global DEFINE semantics, we have done some work on ripping this feature out
of a copy of the Scheme-84 compiler, replacing it with S&ICP's internal
DEFINE.
asc
p.s. My apologies for blitzing you with such a strong opinion; we hashed
this one out locally until it was beaten to death some time ago,
and our opinions have admittedly become somewhat calcified....
∂28-May-86 1241 @MC.LCS.MIT.EDU:dyb%indiana.csnet@CSNET-RELAY.ARPA Re: define (resend) (long) (short)
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 28 May 86 12:41:36 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 28 May 86 15:40:20 EDT
Received: from indiana by csnet-relay.csnet id ab19262; 28 May 86 15:35 EDT
Date: Wed, 28 May 86 13:30:30 est
From: Kent Dybvig <dyb%indiana.csnet@CSNET-RELAY.ARPA>
To: jinx@MC.LCS.MIT.EDU
Subject: Re: define (resend) (long) (short)
Cc: rrrs-authors@MC.LCS.MIT.EDU
It is too much to ask everyone who has learned to use "define" the
way we know and love it here to switch to either a new word or a
new meaning for internal definitions. We feel that we have given it
our best shot over the past year, having tried both "define!" and
"global-define". What it boils down to is that (1) the same name
should be used inside as out to define global variables and (2) the
right name is define.
You mentioned the possibility of omitting internal define altogether.
We would be satisfied with that. The report should say something to
the effect of portable code should only use the define/set! form (or
appropriate sugaring). This seems to be the only viable solution.
∂28-May-86 1736 @MC.LCS.MIT.EDU:JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU define (resend) (long) (short)
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 28 May 86 17:36:26 PDT
Received: from OZ.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 28 MAY 86 20:34:54 EDT
Date: 28 May 1986 20:34 EDT (Wed)
Message-ID: <JINX.12210411645.BABYL@MIT-OZ>
From: Bill Rozas <JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU>
To: Kent Dybvig <dyb%indiana.csnet@CSNET-RELAY.ARPA>
Cc: rrrs-authors@MC.LCS.MIT.EDU
Subject: define (resend) (long) (short)
In-reply-to: Msg of 28 May 1986 14:30-EDT from Kent Dybvig <dyb%indiana.csnet at CSNET-RELAY.ARPA>
What it boils down to is that (1) the same name
should be used inside as out to define global variables and (2) the
right name is define.
Again, this does not make any sense in MIT Scheme, where user code
runs by default in an environment which inherits the "global"
bindings, rather than the one were the bindings actually exist. Top
level DEFINEs do not define in the global environment, but in whatever
environment the code is loaded. The default top level environment is
an environment with an empty top frame, and whose parent frame
contains the initial accessible bindings of the system. Our system
(local and incremental DEFINE) is perfectly consistent, since DEFINE
always acts on the environment where the definition is evaluated.
There is no difference between top level and inner environments. As a
matter of fact, top level is changed at various times, and thus top
level DEFINE acts on different environments at different times.
Indiana style DEFINE sounds horrendous to me because the evaluation
happens in one environment, while the "assignment" happens in another,
without making this explicitely visible. Nevertheless, I'm willing to
have it added it to the report as long as it has a different name
(DEF?). Note that if DEF is implemented, it will also "work" at top
level, so you can always use the same name.
You mentioned the possibility of omitting internal define altogether.
We would be satisfied with that. The report should say something to
the effect of portable code should only use the define/set! form (or
appropriate sugaring). This seems to be the only viable solution.
Again, this is being gratuitously different from the previous version
of the report, and S&ICP. We are keeping T and NIL, #!TRUE and
#!FALSE, just to be backwards compatible. Removing DEFINE would allow
implementations (like you) to have semantics completely incompatible
with the previous report.
Look guys, I hate BEGIN with all my guts. I am not fighting against
it. We had a vote at Brandeis and it WON (I cast the only vote
against it). I (and JAR, and GJS, who hate it almost as much as I do)
abide by that decision (although I occasionally grumble about it, as
well as about REC). I would very much like to see it out, but if
everybody does this we will never agree on anything, because everybody
will find something they do not like. I'm afraid that DEFINE must
stay the way it is, and I (and the rest of the Scheme people at MIT,
plus others, I'm sure) will oppose any changes to it. You are
reopening a can of worms which was closed at Brandeis. Since we are
at it, why don't we argue again about when CALL-WITH-INPUT-FILE closes
the file or whether the name should be LETREC or LABELS?
∂28-May-86 2216 @MC.LCS.MIT.EDU:gls@Think.COM Embedded DEFINE forms
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 28 May 86 22:16:13 PDT
Received: from Godot.Think.COM by MC.LCS.MIT.EDU 29 May 86 01:14:55 EDT
Received: by Godot.Think.COM; Thu, 29 May 86 01:14:45 edt
Date: Thu, 29 May 86 01:14:45 edt
From: gls@Think.COM (Guy Steele)
Message-Id: <8605290514.AA08588@Godot.Think.COM>
To: rrrs-authors@mc
Subject: Embedded DEFINE forms
I have watched the controversy going on for quite some
time, and it seems to me that at this late date, on the
eve, apparently, of widespread publication of a standard
for SCHEME, that there is not consensus in the SCHEME
community on the subject of embedded DEFINE forms.
If the community cannot agree, nor even agree to agree
on some arbitrary choice, then the matter should not be
standardized.
I see no harm in the standard not defining what happens to
embedded DEFINE forms. This would allow the various camps
to be upward-compatible extensions of the standard (though
of course not with each other in this regard). RRRS might
even have, as a footnote or appendix, descriptions of the
competing proposals.
--Guy
∂28-May-86 2243 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA Re: Notes about (↑ revised 3) report
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 28 May 86 22:43:32 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 29 May 86 01:17:54 EDT
Received: from tektronix by csnet-relay.csnet id ak02235; 29 May 86 1:04 EDT
Received: by tektronix.TEK (5.31/6.12)
id AA09772; Tue, 27 May 86 13:03:39 PDT
Received: by tekchips (5.31/5.14)
id AA07744; Tue, 27 May 86 13:07:54 PDT
Message-Id: <8605272007.AA07744@tekchips>
To: KMP@SCRC-STONY-BROOK.ARPA
Cc: JAR@MC.LCS.MIT.EDU, RRRS-AUTHORS@MC.LCS.MIT.EDU,
willc%tekchips.tektronix.csnet@CSNET-RELAY.ARPA
Subject: Re: Notes about (↑ revised 3) report
In-Reply-To: Your message of Thu, 22 May 86 18:53 EDT.
<860522185327.2.KMP@RIO-DE-JANEIRO.SCRC.Symbolics.COM>
Date: 27 May 86 13:07:52 PDT (Tue)
From: willc%tekchips.tek.csnet@CSNET-RELAY.ARPA
Here are the answers I prefer to KMP's starred questions; words within
brackets were edited by me.
* Does the [port] become closed as a side-effect of hitting eof?
No.
* Is it an error to read from a closed [port], or does [an eof-object]
just keep getting returned?
It is an error.
* Can you read the eof object twice at the end of a file using READ ?
How about if using READ-CHAR ? PEEK-CHAR ?
Yes. Yes. Yes.
* Is it possible to detect whether a [port] is closed?
Impossible using only the procedures documented in R↑3RS. I'd like the
language to remain silent on whether a closed port is still a port.
* Is it acceptable for close on certain [ports] to not really close the
[port]? For example, I could imagine implementing terminal [ports] or
[ports] into editor buffers in a way such that they just always claimed
to be open and close was a no-op.
Yes.
KMP:
Also on p30, it seems to me that the notion of CHAR-READY? is not a
useful one. It's subject to timing errors in multi-processed systems
and/or systems which allow asynchronous interrupts. The Lisp Machine's
TYI-NO-HANG paradigm is much better, since it has a more test-and-set
feel to it and is more easy to use reliably. I suggest that CHAR-READY?
should be flushed and replaced by a READ-CHAR? which returns either a
character if one is ready, or NIL otherwise. This gets you out of the
bind with rubbing out stuff that CHAR-READY? has noticed, which is really
an awful crock. I believe that TYI-NO-HANG will interact satisfactorily
with Lispm-style rubout handlers.
To some extent I agree with this, but I don't think READ-CHAR? by itself
is any better for multi-processing than CHAR-READY?.
Peace, Will
∂29-May-86 1417 NET-ORIGIN@MC.LCS.MIT.EDU define
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 29 May 86 14:16:32 PDT
Received: from MX.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 29 MAY 86 17:04:56 EDT
Received: from ROCKY-GRAZIANO.LCS.MIT.EDU by MX.LCS.MIT.EDU via Chaosnet; 29 MAY 86 16:14:05 EDT
Date: Thu, 29 May 86 16:13 EDT
From: Jonathan A Rees <JAR@MIT-AI.ARPA>
Subject: define
To: cth%indiana.csnet@CSNET-RELAY.ARPA, rrrs-authors@MIT-MC.ARPA
In-Reply-To: The message of 27 May 86 13:20-EDT from Chris Haynes <cth%indiana.csnet@CSNET-RELAY.ARPA>
Message-ID: <"860529161305.5.jar@AI"@ROCKY-GRAZIANO.LCS.MIT.EDU>
I didn't want to make any changes to the report as fundamental as this.
A change to DEFINE also seems infeasible given how constroversial the
topic is and always has been. I am trying to sidestep controversies
right now, so that I can get something done. Maybe in next year's
revision (??) we can address this question.
As we agreed at Brandeis, few of us wholeheartedly like internal
definitions, but they should be described ("nonessentially") because
S&ICP uses them. This was a difficult compromise for us to arrive at,
and I think it would be much too painful at this point to retract it.
And now we have another reason to leave them in, which is compatibility
with the RRRS.
T originally had the semantics that you prefer for DEFINE (although
definitions aren't "globally" effective, they're scoped to the innermost
lexical contour which is willing to accept it). Many users found it to
be a very nice feature, for the same reasons you do. However, I have
recommended to the current T implementors that they remove the feature,
for several reasons:
(a) It makes it more difficult for humans & programs to scan a file
to find its definitions.
(b) It's not always obvious which environment it is intended the
definitions go in; like MIT Scheme, T has no notion of "top level."
(c) It really confuses anyone who has ever seen S&ICP or MIT Scheme.
The old meaning will be retained in T, probably under some other name
(or anonymously, since T has anonymous special form types). Kent and
others still stand by the old meaning.
Here is how I think I would put the functionality that "global define"
provides into a language like Scheme. (A better language than Scheme
might do it better.) Invent a special form (or macro) called something
like EXPORT or PROVIDE or MODULE which works as follows:
(provide <var1> <var2> ...)
is equivalent to
(lambda (<temp>)
(case <temp>
((<var1>) <var1>)
((<var2>) <var2>)
...
(else <error>)))
where <temp> is a variable different from <var1>, <var2>, ....
Then instead of
(let ((state ...))
(define-global reader ...)
(define-global writer ...)
...)
you can write
(define i/o-system
(letrec ((state ...)
(reader ...)
(writer ...)
...)
(provide reader writer ...)))
(define reader (i/o-system 'reader))
(define writer (i/o-system 'writer))
...
The PROVIDE special form would be useful for many other applications as
well (e.g. object-oriented programming).
If this is too verbose for you, I think other kinds of macros could
almost as easily be designed which like the above raise no new semantic
questions.
- Jonathan
∂29-May-86 1438 NET-ORIGIN@MC.LCS.MIT.EDU schedule
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 29 May 86 14:38:38 PDT
Received: from MX.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 29 MAY 86 17:35:14 EDT
Received: from ROCKY-GRAZIANO.LCS.MIT.EDU by MX.LCS.MIT.EDU via Chaosnet; 29 MAY 86 14:37:56 EDT
Date: Thu, 29 May 86 14:36 EDT
From: Jonathan A Rees <JAR@MIT-AI.ARPA>
Subject: schedule
To: rrrs-authors@MIT-MC.ARPA
Message-ID: <"860529143648.3.jar@AI"@ROCKY-GRAZIANO.LCS.MIT.EDU>
Thanks to everyone who has read the draft report so carefully. But
don't stop -- keep those cards and letters coming. I called Wexelblat
about the production schedule for August and September SIGPLAN. He said
he has to have it in his hands by June 13 (needs a page count sooner) if
it's to go into the August issue (which gets mailed out the first week
of August). So this gives us a little more time. However: the August
issue is getting to be pretty full; if we think it's urgent that it be
published, it's possible to get it in, but he would prefer if it waited
for the September issue. I told him that some of the coauthors were
ancy to get the thing published and that I'd ask them what they thought.
Note that it won't get out to people before the Lisp conference in any
case.
I'm inclined to try to push and get it into the August issue, but if
people think we should spend more time arguing about things (I had no
idea so much controversy would arise at this late date), then we can
wait.
Jonathan
∂29-May-86 1450 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA define
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 29 May 86 14:48:07 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 29 May 86 17:39:12 EDT
Received: from ti-csl by csnet-relay.csnet id aa00976; 29 May 86 13:21 EDT
Received: by tilde id AA23409; Thu, 29 May 86 11:09:54 cdt
Date: Thu 29 May 86 10:35:51-CDT
From: David Bartley <Bartley%ti-csl.csnet@CSNET-RELAY.ARPA>
Subject: define
To: RRRS-Authors%mit-mc@CSNET-RELAY.ARPA
Cc: Bartley%ti-csl.csnet@CSNET-RELAY.ARPA
Message-Id: <12210575742.48.BARTLEY@CSC60>
There is clearly no chance of a consensus on the meaning of an
internal DEFINE. It seems fair to let the current draft go through
without changes from the previous one, since that was the
understanding at Brandeis.
The only viable solutions for the future are to remove internal
DEFINEs entirely (as Guy suggests) or to persuade the Indiana folk to
choose a new name. (I thought `DEFINE!' was appropriate--whatever
happened to it?)
I prefer the second option. Now that Scheme systems are being broadly
distributed, it is important for us to show a united front. I would
understand a user's anger if he could not find compatible
implementations for his range of machines.
I understand IU's feelings, but I think a compromise with DEFINE! or
DEF or whatever is in the same spirit as all of us have solved similar
inconsistencies in the past.
Regards,
David Bartley
-------
∂29-May-86 1454 @MC.LCS.MIT.EDU:WAND%northeastern.edu@CSNET-RELAY.ARPA R3RS draft -- procedural
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 29 May 86 14:54:17 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 29 May 86 17:40:14 EDT
Received: from northeastern by csnet-relay.csnet id a001585; 29 May 86 14:20 EDT
Date: Thu, 29 May 86 10:32 EST
From: MITCHELL WAND <WAND%northeastern.edu@CSNET-RELAY.ARPA>
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: R3RS draft -- procedural
I have been looking at the draft of the R3RS which was distributed (dated 22
May). There are certainly a number of issues (some serious) which need to be
resolved. In addition, there are many places in the report (marked by open
brackets) which have not yet been filled in, and where the completion is
substantive, rather than presentational.
In view of this situation, I think it would be a serious mistake to "mail it
to SIGPLAN June 1 come hell or high water". I think those of us whose names
will appear as authors of the report deserve to see a CLEAN draft before it is
submitted. The document is too important not to get it right.
I will send out my other comments in some other messages.
Mitch Wand
∂29-May-86 1545 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU R3RS draft -- procedural
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 29 May 86 15:44:21 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 29 MAY 86 18:42:11 EDT
Date: Thu, 29 May 86 18:42:02 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: R3RS draft -- procedural
To: WAND%northeastern.edu@CSNET-RELAY.ARPA
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Thu 29 May 86 10:32 EST from MITCHELL WAND <WAND%northeastern.edu at CSNET-RELAY.ARPA>
Message-ID: <[AI.AI.MIT.EDU].48143.860529.JAR>
Date: Thu, 29 May 86 10:32 EST
From: MITCHELL WAND <WAND%northeastern.edu at CSNET-RELAY.ARPA>
In view of this situation, I think it would be a serious mistake to "mail it
to SIGPLAN June 1 come hell or high water". I think those of us whose names
will appear as authors of the report deserve to see a CLEAN draft before it is
submitted. The document is too important not to get it right.
OK.
∂29-May-86 1610 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA response to new draft report (long)
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 29 May 86 16:10:17 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 29 May 86 16:06:56 EDT
Received: from ti-csl by csnet-relay.csnet id aa00186; 29 May 86 11:51 EDT
Received: by tilde id AA21997; Thu, 29 May 86 10:35:56 cdt
Date: Thu 29 May 86 10:19:27-CDT
From: David Bartley <Bartley%ti-csl.csnet@CSNET-RELAY.ARPA>
Subject: response to new draft report (long)
To: RRRS-Authors%mit-mc@CSNET-RELAY.ARPA
Cc: Bartley%ti-csl.csnet@CSNET-RELAY.ARPA, JAR%ai.ai.mit.edu@CSNET-RELAY.ARPA
Message-Id: <12210572757.48.BARTLEY@CSC60>
Here are my (hasty) comments on the new draft Report.
COMMENTS ON THE TEXT OF THE DOCUMENT:
[page 1]
My name is "David Bartley", but "D.H.Bartley" is better than "D.Bartley".
Why use zero-origin indexing for section numbers?
[page 2]
Use italics and capitalization for consistency in "revised report
[29]" in 2nd paragraph of Background.
The term "coalescing" in the 2nd-to-last paragraph is not defined
anywhere.
[page 4]
Remove "will" from "Italicized names will stand for..."
Pluralize "argument" in "the append procedure is being passed zero or
more list argument."
Add "be" in "this report explicitly does not specify what value should
[be] returned." at end of 0.2.2.
Change "Upper and lower case letters are never distinguished..." in 1
to something like "Upper and lower case forms of a letter are never
distinguished...". Surely `A' is distinct from `b'.
Are #t and #f considered identifiers?
[page 5]
In 1st paragraph of 1.1: "Whitespace may occur..., but not within a
token." Is a string containing a space a token? The character `#\ '?
Typo: change `occuring' to `occurring'.
The statement "Backslash isn't used by Scheme except within string
constants" is awkward and negative.
Remove "are not used in Scheme right now but" from "... curly braces
are not used in Scheme right now but are reserved...".
Change "Like Algol or Pascal" to "Like Algol and Pascal".
[page 6]
In 2.1, the words "most values count as true, but a few--notably #f--
count as false" should be tightened up, since section 5.0 on page 13
makes it clear that only #f and the empty list count as false IN
CONDITIONAL EXPRESSIONS. (Is "in conditional expressions" a
qualifier???)
[page 7]
Fix "see section refdefine" in 3.0.2.
Is 3.0.2 a good place to take note that () is not a good procedure call?
What is meant by "here we will ASSUME that <body> is simply a sequence
of one or more expressions" in 3.0.3?
[page 8]
Please change the descriptions of COND and CASE to be what they were
in the RRRS (modulo the small changes we seem to have consensus on).
I see no reason to get carried away with describing the permissible
types for <datum> in a CASE key list. Just define CASE as using MEMV
(or EQV?) and let the implications hang out!
[page 10]
The first LET* example at the top left of the page is confusing, since
the first <binding> is decomposed into <variable> and <init> and the
others are not.
At the bottom of the first column, change the second instances of
<variable1> and <init1> to have subscript 2.
The words "... are variables which do not occur in the original LETREC
expression..." are confusing. Would a new binding of the identifier
(or is it variable) <temp1> be an occurrence of <temp1>? Similar
wording appears elsewhere in the document (e.g. with DO).
[page 11]
Specify that <name> in named LET must be an identifier (or is it
"variable").
[page 12]
Section 3.1.4: The wording "(for example, by a call to the FORCE
procedure)" begs for elaboration. I think it makes sense to postpone
most of the discussion to page 27ff, as JAR does, so let's use a
"white lie" here and mention only FORCE as a way to collect on a
promise. All other ways are extensions.
[page 13]
Change the last line of 4.1.0 from "Global definitions are essential;
all Scheme implementations must support them." to something like "This
semantics for top level definitions is essential." What does "global
definition" mean? The clause after the ";" is redundant.
I feel uncomfortable about using the term "lambda body" to include the
"body" of a LET or DEFINE expression, as is done in 4.2.
Why not retitle section 5 to be something like "Standard Procedures"
instead of "Initial Environment"? The text makes it clear that these
procedures are the standard bindings of variables in the initial
environment, so it doesn't have to be emphasized in the title. A
person looking at the table of contents on page 1 is likely to be
confused.
[page 14]
How about adding (EQ? NIL 'NIL) ==> #F as another example at the end
of 5.0 to hammer the point home?
Add "in the same order" at the end of "Two procedures are
operationally equivalent iff ... they return the same value and
perform the same side-effects." (Or is that implied by `having the
same side-effects'?)
The wording "it will always err on the conservative side" seems to say
that EQV? tries to do the "right" "wrong thing"!
[page 15]
Change "Objects of distinct types WILL NEVER BE operationally
equivalent, BUT FALSE and the empty list are permitted to be
identical..."
to "Objects of distinct types ARE NEVER operationally equivalent,
EXCEPT THAT #F and the empty list are permitted to be
identical...".
The second sentence of the description of EQUAL? should say that EQV?
is used for all objects except pairs, vectors, and strings.
[page 16]
Change "same" to "equivalent" in the comparison of (a b c d e) and its
dotted form.
[page 17]
APPEND! always side-effects all but its last argument.
[page 18]
Change "(in the sense of EQV? and EQ?)" to "(in the sense of EQ?)" or
"(in the sense of EQV?)". (Why mention both?)
What is meant by "returned" in the second and third sentences of the
description of SYMBOL->STRING? How about "created"?
[page 19]
The previous Report used all caps for the words NUMBER, COMPLEX, ...,
for EXACT and INEXACT, and [page 23ff] INT, RAT, FIX, FLO, ... . I
think that is less confusing than using the same typeface used for
Scheme identifiers.
[page 20]
Change the title of 5.4.2 from "Syntax" to something like "Number syntax".
Rephrase "to make all user populations happy". >I'm< not happy with
having both forms (e.g., both = and =?) and I'd settle for EITHER ONE!
[page 25]
JAR has omitted an important paragraph in the previous Report's
discussion of strings. The sixth paragraph on page 51 of the RRRS,
beginning "In phrases such as...", clarified in one place how
substring START and END work. The descriptions of SUBSTRING (etc)
don't make this clear at all.
[page 26]
If we only have SUBSTRING-MOVE-RIGHT! to support text editors, let's
flush it! This is only the tip of the iceberg when it comes to handy
little utility functions for building editors.
[page 27]
The dual use of VECTOR in the example starting (LET ((VECTOR (VECTOR...
is confusing.
For consistency, change ELTS in LIST->VECTOR to LIST.
[page 28]
Change "they" to "to" in "but they illustrate the property that the
value of a promise is computed at most once."
The second "bullet" at the top of the second column is not an
extension but an implementation issue (I think).
[page 29]
Restore the mention of the alternate name CALL/CC at the end of the
rationale for CALL-WITH-CURRENT-CONTINUATION.
[page 39ff]
Add index entries for `identifier' and `variable'.
------------------------------------------------
[Following are my responses to JAR's specific questions on language and
presentation. His question is left adjusted, my response is preceded
by ` ******* '.] I've omitted some questions/proposals I agree with
or have no comment on.
Questions on LANGUAGE
I left CASE as is, using EQV? as the comparison, and I explicitly stated
that the object ought to be boolean, character, number, or symbol. But
shouldn't it allow empty lists, vectors, and strings, too?
******* Define it in terms of EQV? and define (EQV? '() '()) ==> #T.
******* This is consistent with Common Lisp's CASE, which uses EQL.
May structure be shared in cases like (APPEND '(A B) '()) , or should APPEND
be Common Lisp compatible? [Bartley says sharing would be a gratuitous
incompatibility with CL, I'm invlined to agree.]
******* Don't share structure with any argument but the last.
Should APPEND and APPEND! explicitly allow any object as last argument
(CL compatible)?
******* Yes.
Should APPEND! disallow () as other than last argument?
******* No.
Can we specify that DISPLAY of a character does the same thing as
WRITE-CHAR?
******* Yes.
What should be said, if anything, about the desirability and/or legality
of EQUAL? failing to terminate? Rozas thinks an implementation with
this property is in error.
******* Leave it as it is. It is `an error' not to terminate.
In light of the vagaries of CALL-WITH-xxPUT-FILE, perhaps it
would be a good idea to explicitly state that closing a closed port
should be a no-op instead of an error.
******* Yes.
-----
Questions on PRESENTATION
Should the various examples which use DEFINE be changed to use the
(define (foo ...) ...) syntax instead of (define foo (lambda ...))?
Several people have told me that all those LAMBDA's could unnecessarily
intimidate SIGPLAN readers.
******* LAMBDA is what it's all about; but I don't really care.
There are two places (in descriptions of let* and letrec) where it is
necessary to create a lambda body in a context (such as the tail of a
BEGIN) where there isn't one already. What is the cleanest way to do
this? Is (let () ...) ok, or would ((lambda () ...)) or something else
be better?
******* Use (LET () ...).
Should the complete presentation of FORCE appear up front with DELAY, or
delayed until the place where the entry for FORCE appears?
******* It's OK where it is, but see my comments above.
-----
Notes on LANGUAGE
The selectors in a CASE expression must be distinct.
******* OK.
I have left CASE and COND syntax as in RRRS: there must be at least one
clause, but it may be an ELSE clause.
******* Yes--I don't like the rewrite in the new draft.
BOOLEAN? is essential.
******* I suppose so.
No agreement on COND or BEGIN. I have left them as in RRRS.
[To do: fix the BNF to agree!]
******* Yes, but keep `test' instead of `guard'.
The RRRS explicitly allows internal definitions in the body of a LETREC.
They are scoped to the body only, not to the entire expression. I can
flush this "feature" if a movement arises to do so; it seems sufficient
to me to permit only expressions (not definitions) in the body.
******* Allow them.
The list to which the rest argument gets bound must be newly allocated.
******* Yes. Common Lisp screwed this up.
There was strong sentiment both for removing REC and for removing
NAMED-LAMBDA. However, the sentiment was not unanimous. I don't
understand why it should have matterred so much, since neither is an
essential feature. If these are present, shouldn't everyone's favorite
features be present too? ... Supporters of REC included Kent Dybvig and
Dan Friedman. Supporters of NAMED-LAMBDA included Jim Miller and Henry
Wu. In addition, Bill Rozas insisted that if REC stayed, then
NAMED-LAMBDA must stay too, but he was willing to see both go.
******* Keep them both.
APPEND! necessarily clobbers its arguments (other than the last and
empty ones).
******* Yes. It's meaningless otherwise.
Many people wanted the number predicates pruned (i.e. choose between <
and <?). No agreement here, so both stay.
******* I still can't understand why we can't get agreement, but
******* having both forms is OK until we do. I'll live with either form.
The case sensitivity issue was a very sensitive one (so to speak). I
did not change the report's stance of symbol case insensitivity.
******* Let's remain case-insensitive.
-----
Notes on PRESENTATION
******* I agree with (or don't care about) the rest of the issues.
-------------------------------------------------
BTW, I generally agree with Will's answers to KMP's questions.
Regards,
David Bartley
-------
∂29-May-86 1610 @MC.LCS.MIT.EDU,@CSNET-RELAY.ARPA,@boethius.think.com:gls@AQUINAS.THINK.COM hash-consing
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 29 May 86 16:10:42 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 29 May 86 17:40:28 EDT
Received: from [30732002700] by CSNET-RELAY.ARPA id a003087; 29 May 86 16:54 EDT
Received: from BOETHIUS.THINK.COM by Godot.Think.COM; Thu, 29 May 86 16:50:11 edt
Date: Thu, 29 May 86 16:50 EDT
From: Guy Steele <gls@GODOT.THINK.COM>
Subject: hash-consing
To: Bartley%ti-csl.csnet@CSNET-RELAY.ARPA,
RRRS-Authors%mit-mc@CSNET-RELAY.ARPA
Cc: gls@AQUINAS.THINK.COM
In-Reply-To: <12210304495.60.BARTLEY@CSC60>
Message-Id: <860529165056.1.GLS@BOETHIUS.THINK.COM>
Dr. Eiichi Goto has done the greatest amount of work on hash-consing;
I think he may have invented the idea. See the bibliography of the
paper by Goto et al. in the 1982 Lisp conference.
--Guy
∂29-May-86 1706 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA Re: global definitions
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 29 May 86 17:05:52 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 29 May 86 18:47:48 EDT
Received: from tektronix by csnet-relay.csnet id a003857; 29 May 86 18:45 EDT
Received: by tektronix.TEK (5.31/6.12)
id AA25806; Thu, 29 May 86 15:24:54 PDT
Received: by tekchips (5.31/5.14)
id AA13361; Thu, 29 May 86 15:29:04 PDT
Message-Id: <8605292229.AA13361@tekchips>
To: rrrs-authors@MC.LCS.MIT.EDU
Cc: willc%tekchips.tektronix.csnet@CSNET-RELAY.ARPA
Subject: Re: global definitions
Date: 29 May 86 15:29:02 PDT (Thu)
From: willc%tekchips.tek.csnet@CSNET-RELAY.ARPA
Though I spent time in Indiana, I must join with JINX and Andy in
protest against the very idea of global definitions. If we must
have global definitions, I propose that the syntax be
(SETF (SYMBOL-FUNCTION 'FOO) ...)
so as to avoid gratuitous differences between Scheme and Common Lisp.
As prelude to more serious comments, let me summarize the status quo:
INCREMENTAL DEFINE: Not in the report, but appears in S&ICP. Supported
only by MIT Scheme, though T has something similar.
INTERNAL DEFINE: Optional in the report, pervasive in S&ICP. Alternative
syntax for LETREC. Supported by MIT Scheme, PC Scheme, and MacScheme.
TOP-LEVEL DEFINE: Essential in the report. It is up to the programming
environment whether top-level definitions are implemented as global
bindings, incremental bindings, or assignments; it makes very little
semantic difference. Supported by everyone.
I don't want to give in to Guy's suggestion that internal definitions be
dropped entirely because it would return us to the days when we couldn't
read each other's code. The implementations that support internal
definitions for compatibility with S&ICP would go on supporting them,
while people using Chez Scheme and Scheme-84 would write syntactically
identical code that does something completely different. If everyone
could agree not to use DEFINE except at top level I might agree with Guy,
but that just isn't going to happen. (For instance, the idea of dropping
internal DEFINE wouldn't even have come up if the people at Indiana
weren't so insistent on using the word DEFINE at places other than top
level.)
Though I once programmed in the Indiana style, I have found it easy to
switch to the new idiom:
(define foo)
(define bar)
(let (<local state>)
(set! foo ...)
(set! bar ...))
I am partly in the dark because I have not yet received Chris Haynes's
message, but I suspect that folks at Indiana have not really given the
above idiom a chance because the one message I have received says only
that both "define!" and "global-define" were tried.
In short, I'm not a fan of the internal definition syntax, but I vote in
favor of keeping it in the report so as to prevent the syntax from being
used with two incompatible semantics.
Peace, Will
∂30-May-86 1432 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA definitions; APPEND!; etc
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 30 May 86 14:31:48 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 30 May 86 17:30:31 EDT
Received: from tektronix by csnet-relay.csnet id ac00463; 30 May 86 17:19 EDT
Received: by tektronix.TEK (5.31/6.12)
id AA16726; Fri, 30 May 86 12:04:15 PDT
Received: by tekchips (5.31/5.14)
id AA21283; Fri, 30 May 86 12:08:30 PDT
Message-Id: <8605301908.AA21283@tekchips>
To: rrrs-authors@MC.LCS.MIT.EDU
Cc: jar@MC.LCS.MIT.EDU
Subject: definitions; APPEND!; etc
Date: 30 May 86 12:08:29 PDT (Fri)
From: willc%tekchips.tek.csnet@CSNET-RELAY.ARPA
Since the report won't appear in SIGPLAN Notices until after the Lisp
conference, I too favor waiting another month.
----------------------------------------------------------------
At Brandeis we agreed that (BEGIN (DEFINE ...) (DEFINE ...)) would be
flattened when it appeared at the beginning of a lambda body, but I
forgot to mention that in the RRRS. It seems simplest to extend that
flattening to apply to the top level as well by changing the formal
syntax of <definition> to be
<definition> --> (define <variable> <expression>)
| (define (<pattern> <formalz>) <body>)
| (begin <definition>+)
This still rules out things like
(begin (define up)
(define down)
(let ((n 0))
(set! up (lambda () (set! n (1+ n)) n))
(set! down (lambda () (set! n (-1+ n)) n))))
After writing the new syntax for <program> that would be needed
to allow this, I decided it isn't worth it.
----------------------------------------------------------------
I prefer dropping both NAMED-LAMBDA and REC to leaving them both
in.
----------------------------------------------------------------
I have a few remarks to add to some of David Bartley's comments.
>Add "in the same order" at the end of "Two procedures are
>operationally equivalent iff ... they return the same value and
>perform the same side-effects." (Or is that implied by `having the
>same side-effects'?)
There is still considerable research directed toward formulating
a satisfactory notion of operational equivalence for procedures
with side effects in the presence of concurrency, or even in the
presence of asynchronous interrupts. To see that the definition
on page 14 is inadequate, consider that
(lambda (x) (set! x (1+ (1+ x))) x)
and
(lambda (x) (set! x (1+ x)) (set! x (1+ x)) x)
are operationally equivalent but
(lambda (y) (set! x (1+ (1+ y))) x)
and
(lambda (y) (set! x (1+ y)) (set! x (1+ x)) x)
are not.
>APPEND! always side-effects all but its last argument.
No, APPEND! should not be required to perform side effects. This is not
as silly as it may sound. In an implementation using the Hewitt-Lieberman
gc algorithm, for example, side effects to sufficiently old structures are
likely to be more expensive than consing. APPEND! should be free to decide
for itself which technique is fastest.
I would feel differently if APPEND! returned an unspecified value, as
does VECTOR-SET!.
>Rephrase "to make all user populations happy". >I'm< not happy with
>having both forms (e.g., both = and =?) and I'd settle for EITHER ONE!
I have been one of the main holdouts here, but I too am now willing to
settle for either one.
>If we only have SUBSTRING-MOVE-RIGHT! to support text editors, let's
>flush it! This is only the tip of the iceberg when it comes to handy
>little utility functions for building editors.
I agree. I think we should write other documents, however, to describe
the portable Scheme libraries that people have written, and we should
work on improving portability and availability.
peace, Will
∂30-May-86 1650 @MC.LCS.MIT.EDU:OXLEY%ti-csl.csnet@CSNET-RELAY.ARPA Re: Embedded DEFINE forms
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 30 May 86 16:49:47 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 30 May 86 19:48:45 EDT
Received: from ti-csl by csnet-relay.csnet id ab01528; 30 May 86 19:37 EDT
Received: by tilde id AA15347; Fri, 30 May 86 17:50:20 cdt
Date: Fri 30 May 86 17:42:25-CDT
From: Don Oxley <OXLEY%ti-csl.csnet@CSNET-RELAY.ARPA>
Subject: Re: Embedded DEFINE forms
To: gls%Think.COM@CSNET-RELAY.ARPA, rrrs-authors%mc@CSNET-RELAY.ARPA
In-Reply-To: <8605290514.AA08588@Godot.Think.COM>
Message-Id: <12210915540.62.OXLEY@CSC60>
I have generally avoided getting into these discussions as David has
represented our viewpoints very effectively. However, I am becoming
concerned about what looks like a potentially destructive argument over
DEFINE.
It seems to me that it is unlikely that very many users outside of the
aficionados at MIT and IU are likely to use embedded DEFINE at all -
except as they may have seen it in S&ICP. I would hate to see
"outsiders" back away from using SCHEME because they see a religious war
going on within the community.
My first suggestion is to leave it as we decided at Brandeis - based on
the notion that we had agreement (even if grudging) and we do not have
an agreement on a change. Possibly better is Guy's suggestion to
leave it undefined (which I think is roughly equivalent to letting the
dominant dialect win).
I would be very hesitant for us to have to change PC Scheme in an
incompatible direction. I'll hazard a guess that PCS is or is close to
becoming the most widely used Scheme today, so we are trying to be
somewhat careful about compatibility (although as I said, I doubt if
this will affect very many users). Either leaving the position as it is
or making it undefined would leave PCS alone.
Please, let's not let this become a divisive issue that hurts the spread
of Scheme to those who don't care about so technical an issue and
merely what to know what the langauge does and does not do.
--Don
-------
∂30-May-86 1703 @MC.LCS.MIT.EDU:WAND%northeastern.edu@CSNET-RELAY.ARPA procedure (Tnx)
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 30 May 86 16:58:49 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 30 May 86 19:57:43 EDT
Received: from northeastern by csnet-relay.csnet id ac01577; 30 May 86 19:48 EDT
Date: Fri, 30 May 86 10:04 EST
From: MITCHELL WAND <WAND%northeastern.edu@CSNET-RELAY.ARPA>
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: procedure (Tnx)
Thanks to Jonathan for so promptly accepting my suggestion that we delay
publication until these issues are resolved.
-- Mitch
∂30-May-86 1703 @MC.LCS.MIT.EDU:WAND%northeastern.edu@CSNET-RELAY.ARPA define -- a modest proposal
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 30 May 86 17:03:39 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 30 May 86 19:59:54 EDT
Received: from northeastern by csnet-relay.csnet id ae01577; 30 May 86 19:49 EDT
Date: Fri, 30 May 86 10:40 EST
From: MITCHELL WAND <WAND%northeastern.edu@CSNET-RELAY.ARPA>
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: define -- a modest proposal
I think it is clear that we do not have a consensus on the semantics of
internal DEFINE. My understanding of the compromise reached at Brandeis was
that lexically nested DEFINE would retain the MIT semantics, whereas
the IU semantics could be obtained by using DEFINE! . The current report
does not appear to be compatible with that compromise, because it would appear
necessary to do a
(define foo 'hunoz)
at top-level before one can legally do a set! on foo from an interior scope.
Analyzing this situation, there are two operations involved in a define:
1. Binding the identifier to some location.
2. Storing a value in that location.
The latter operation is clearly doable by set!, so the only issue is #1.
The MIT semantics has DEFINE performing #1 on the current scope. The
advantage of this proposal is that it is uniform on both "top-level" and
interior scopes. The disadvantage is that it essentially creates a new scope
(region) in the program which is not delimited by parentheses. [Perhaps the
grammar could be fixed to recognize this new, non-list-structure phrase?].
This is an unpleasantness at the top level which I do not think we understand.
[Perhaps we should separate DEFINE into two procedures:
(make-local-variable 'foo)
(set! foo value)
[shades of GNU Emacs-Lisp!!]]
[Another, separate, argument against including internal define as an optional
feature in the report is that, unlike the other optional features in the
report, it requires pervasive modifications in many other sections of the
report].
Nevertheless, I am not yet arguing for elimination of internal defines from
the report, in keeping with the compromise reached at Brandeis.
What I will argue for is the following:
An implementation may have a top level (initial, whatever) environment in
which every possible identifier is bound (though only some are initialized).
This would allow programs in that implementation to do a set! on a global
variable (excuse me, a variable in the current top-level environment) from an
internal scope without having to explicitly bind the variable in the initial
scope. It would also allow MIT-style define to proceed, as it does not
require the existence of a distinguished global environment.
I think this proposal retains the spirit of the Brandeis agreement on this
issue.
Mitchell Wand
∂31-May-86 0108 @MC.LCS.MIT.EDU:JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU define -- a modest proposal
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 31 May 86 01:08:38 PDT
Received: from OZ.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 31 MAY 86 00:34:03 EDT
Date: 31 May 1986 00:32 EDT (Sat)
Message-ID: <JINX.12210979336.BABYL@MIT-OZ>
From: Bill Rozas <JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU>
To: MITCHELL WAND <WAND%northeastern.edu@CSNET-RELAY.ARPA>
Cc: rrrs-authors@MC.LCS.MIT.EDU
Subject: define -- a modest proposal
In-reply-to: Msg of 30 May 1986 11:40-EDT from MITCHELL WAND <WAND%northeastern.edu at CSNET-RELAY.ARPA>
I may have misunderstood your message, but I'm afraid you are still
confusing (local static) INTERNAL DEFINE with (dynamic, horrible
semantically) INCREMENTAL DEFINE. They have nothing in common (except
sharing the keyword).
INTERNAL DEFINE does NOT create a new scope. The scope is created by
the surrounding LAMBDA, LET, or LETREC expression, and is therefore
bounded by parentheses.
(let ()
(define foo ...)
(define bar ...)
<some expression>)
should be exactly equivalent to
(letrec ((foo ...)
(bar ...))
<some expression>)
As a matter of fact, I originally implemented LETREC in MIT-Scheme
(and it is still implemented in this way in MIT CScheme, I believe),
by transforming the second expression into the first.
Thus, the (INTERNAL) DEFINEs do not establish the context. The
context is established by LET.
Your proposal of separating DEFINE into
(make-local-variable 'foo)
(set! foo value)
seems to violate this semantics. It appears to be advocating for
INCREMENTAL DEFINE, which is NOWHERE on the report. Indeed, MIT
Scheme has a primitive procedure which implements INCREMENTAL DEFINE,
on top of which MAKE-LOCAL-VARIABLE could be implemented trivially,
but we are certainly not advocating for a feature we don't feel
comfortable with ourselves.
INTERNAL DEFINE is purely declarative, it does not involve ANY side
effects. INCREMENTAL DEFINE, on the other hand, is mostly imperative,
and involves side effecting environments.
As far as I know (please correct me on this), INTERNAL DEFINE has no
semantic problems, its only problem is purely syntactic: it makes the
evaluator (compiler, syntaxer, code walker, whatever) harder to write
since it has to collect all the definitions which occur in a scope
before processing the expressions. Since the report only allows
definitions as the very first thing in a block (it's the only place
where they make sense), collecting them is trivial.
∂31-May-86 0331 NET-ORIGIN@MC.LCS.MIT.EDU wanted: teaching do's and dont's
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 31 May 86 03:31:21 PDT
Received: from MX.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 31 MAY 86 06:25:28 EDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 23 Dec 85 15:20:57 EST
Received: from bostonu by csnet-relay.csnet id ae01055; 23 Dec 85 15:15 EST
Received: by bu-cs.ARPA (4.12/4.7)
id AA22857; Mon, 23 Dec 85 14:41:29 est
Date: Mon, 23 Dec 85 14:41:29 est
From: Edward Sciore <sciore%bostonu.csnet@CSNET-RELAY.ARPA>
To: SCHEME@mit-mc.ARPA
Subject: wanted: teaching do's and dont's
I will be teaching from the "Structure and Interpretation..." book
spring semester. Students will be sophmores/juniors with at least 2
semesters of Pascal behind them. Does anybody know of things that I
should be wary of? How fast should I go in order to get through chapter
4? Will their previous programming experience allow the students to
handle the material more easily? Any tips people have discovered
will be appreciated. Thanks.
Ed Sciore
Boston University CS Dept
sciore@bostonu.CSNET
∂31-May-86 0539 @MC.LCS.MIT.EDU:JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU wanted: teaching do's and dont's
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 31 May 86 05:38:57 PDT
Received: from OZ.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 31 MAY 86 08:34:33 EDT
Date: 31 May 1986 08:33 EDT (Sat)
Message-ID: <JINX.12211066871.BABYL@MIT-OZ>
From: Bill Rozas <JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU>
To: Edward Sciore <sciore%bostonu.csnet@CSNET-RELAY.ARPA>
Cc: SCHEME@MC.LCS.MIT.EDU
Subject: wanted: teaching do's and dont's
In-reply-to: Msg of 23 Dec 1985 14:41-EST from Edward Sciore <sciore%bostonu.csnet at CSNET-RELAY.ARPA>
Our experience at MIT is that it is often the case that students with
previous programming experience suffer MORE in the course than
students without such experience, since the latter are not biased.
In particular, students familiar with BASIC and FORTRAN (and probably
PASCAL) tend to have a hard time adapting to the functional style
encouraged by Scheme. They view DEFINE as assignment, which it isn't,
and even if they get used to the functional style, when assignment
(SET!) is finally introduced, they often revert to the ugly imperative
style. They sometimes have this crazy notion that imperative style is
more efficient. Interestingly enough, code with side effects is often
LESS efficient in T and in MIT Scheme with the new compiler.
Although Pascal is, like Scheme, lexically scoped, students do not
have a really hard time accepting this, so I'm not sure it's a real
advantage.
Obvious potential stumbling blocks, beyond style:
Absence of VAR parameters, used sometimes to "return" multiple values in
Pascal. This is usually done in Scheme (in dialects without multiple
values) in one of two ways: returning a data structure (list or
vector) with the appropriate contents, or passing an explicit
continuation with many parameters to the procedure that wants to
return multiple values, which will, instead of returning, invoke its
explicit continuation with the multiple "returned" values.
Absence of iteration constructs. Standard Scheme has DO, but it is
not used in S&ICP, in fact, we did not even have it in MIT Scheme
until the report describing Standard Scheme came about. Iteration has
to be achieved through syntactic recursion. One of the reasons for
not having syntactic sugar in MIT Scheme (originally) was to emphasize
this point, and force students to deal with the issue.
Absence of explicit allocation. Memory management in Scheme is
automatic, rather than manual.
Eventually, the fact that thanks to tail recursion and first class
procedures (and worse, cwcc, but this is not covered in S&ICP), Scheme
is a completely unstructured language (in the sense of "structured
programming"). Procedures (lambda expressions) are labels, and
application is GOTO, and any arbitrary control structure can be built
on top of this.
PS: There is a teacher's manual for S&ICP written by Juile Sussman.
It is very good. It contains more examples, more problems, and a very
detailed description of where students go wrong in various places, and
what points need further emphasis. I believe (HAL or GJS can correct
me here) that it can be obtained through McGraw Hill.
∂31-May-86 0738 @MC.LCS.MIT.EDU:dyb%indiana.csnet@CSNET-RELAY.ARPA sentiments
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 31 May 86 07:37:52 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 31 May 86 10:37:01 EDT
Received: from indiana by csnet-relay.csnet id aa06940; 31 May 86 10:36 EDT
Date: Fri, 30 May 86 15:34:53 est
From: Kent Dybvig <dyb%indiana.csnet@CSNET-RELAY.ARPA>
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: sentiments
Cc: jar@MC.LCS.MIT.EDU
I believe I must explain to you why I am as upset about internal-define
as I am. This report has been a long time in coming and as it approaches
its final form, it begins to look quite splendid. So much so that I
believe that its potential for generating converts will be quite
substantial. That was, in fact, one of its goals. However, we Schemer's
have had the freedom for several years of writing code for papers and
books in just about any dialect we felt the audience could/would follow.
Scheme has been a fabulous tool for that purpose. The simplicity of the
language and the elegance of its definition attracted us and I am sure
many of you towards it. How simple was it? In the presence of macro
expansion, we needed the following 4 special forms: "quote", "lambda",
"if", and "set!". Many implementations began to exist on micros. One
of my students, Mark Meyer, implemented an entire Scheme system including
engines, macros, a compiler, the run time support in 5k bytes on a
IBM PC. He did this as an undergraduate in the 5 weeks following my
undergraduate programming languages course. Now it was the case that
"set!" assigned to the closest lexical "rib" and we assumed that the
bottom rib had all known identifers assigned to either "unbound" or,
in the case of +, to some value. This really was simple. With this view,
define was merely an alias for set!. However, define's value was its
first argument and set!'s value was its second argument.
This is how things were prior to the Brandeis meeting. As I recall the
feeling at the Brandeis meeting most of us were willing to go along with
the idea of limiting the use of "define" internally to the semantics of
SI&CP. This was in the interest of good feeling about not undermining
their book. I hope everyone understands that I do not want to undermine
their book, although I would like to see them rewrite it without internal
defines. However, when I went along with this view I had underestimated
how damaging this decision would be to the characterization of Scheme being
a simple language. I was expecting a "comment" in the report that stated
that "use of define within the text of a program would be restricted to
the use as given in SI&CP." Instead, the definition of "lambda" got changed.
Instead, begin must be added to the list of special forms. Instead the
macro for "letrec" must be conscious of it by having the body be
"(let () <body>)" where it should be <body>. Instead define must be added to
the list of special forms. Instead the semantics of "set!" are weakened
so that it is not possible to just get by with "set!" and ignore "define".
Instead we must do something "special" with "lambda", "named-lambda",
"let", "let*", and "letrec".
We have taken a rather elegant language and made it elitest. I wanted
all of my students to be able to implement "Scheme" when they walked out
of my course, now that is no longer possible. It was a great beauty of
Scheme that the four mentioned special forms along with identifiers and
application were the only syntax. It was wonderful that a CPS interpreter
for Scheme was all that was necessary to come to grips with in order to
understand the run-time architecture of Scheme.
My argument with internal-define is not that it is good or bad, but
that the subtlety of its definition is unnecessary with judicious use
of letrec and letrec should be a trivial macro. What happened?
I have never liked internal defines. I thought they were harmless
until I saw what havoc they introduced to the Report. I am trying
desperately to convince everyone that we made a mistake and we should
do everything in our power before we go public on this Report to
wait until we impose internal defines on everyone.
Dan
∂31-May-86 1608 @MC.LCS.MIT.EDU:JAR%MX.LCS.MIT.EDU@MC.LCS.MIT.EDU sentiments
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 31 May 86 16:08:15 PDT
Received: from MX.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 31 MAY 86 19:07:29 EDT
Date: Sat, 31 May 86 18:53:02 EDT
From: Jonathan A Rees <JAR%MX.LCS.MIT.EDU@MC.LCS.MIT.EDU>
Subject: sentiments
To: dfried%indiana.csnet@CSNET-RELAY.ARPA
cc: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <[MX.LCS.MIT.EDU].923375.860531.JAR>
Date: Fri, 30 May 86 15:34:53 est
From: Dan Friedman
Sent-by: Kent Dybvig
... define was merely an alias for set! ...
This is how things were prior to the Brandeis meeting.
This is how things were AT INDIANA prior to the Brandeis meeting. At
Yale and MIT they somewhat different (although not as different as you
suppose) and had been since at least 1981. Your quest for elegance is
noble but please try not to equate your own version of Scheme with
Scheme.
As I recall the feeling at the Brandeis meeting most of us were
willing to go along with the idea of limiting the use of "define"
internally to the semantics of SI&CP. This was in the interest of
good feeling about not undermining their book. I hope everyone
understands that I do not want to undermine their book, although I
would like to see them rewrite it without internal defines.
However, when I went along with this view I had underestimated how
damaging this decision would be to the characterization of Scheme
being a simple language. I was expecting a "comment" in the report
that stated that "use of define within the text of a program would
be restricted to the use as given in SI&CP." Instead, the
definition of "lambda" got changed.
I don't understand. Is it really the case that S&ICP never ever uses
internal defines in the body of a lambda? I'll check. In any case, if
internal definitions exist at all, LAMBDA is the ONLY form that's
affected, after macro expansion.
Instead, begin must be added to the list of special forms.
Not true, and I'm don't understand why you think so. Note that I
clearly put BEGIN in the "derived expression types" section. I will
include the usual expansion of it in a future draft; I forgot to note
that this was on my list of things to do.
Instead the macro for "letrec" must be conscious of it by having the
body be "(let () <body>)" where it should be <body>.
I proposed flushing internal definitions in the body of a letrec for
exactly this reason. But I don't see this as increasing the complexity
of LETREC significantly, and I was wrong to draw attention to it. I'll
try to figure out how to make this smoother.
Instead define must be added to the list of special forms.
What do you mean? Definitions aren't even expressions!
Instead the semantics of "set!" are weakened so that
it is not possible to just get by with "set!" and ignore "define".
As has been explained innumerable times, there is no way to avoid this
and have a language which is at all coherent with T and MIT Scheme.
Note that in all programming languages of the Algol/Pascal/C variety it
is an error to assign to an undeclared variable. That MIT Scheme and T
(and thus RRRS Scheme) also have this property is not coincidence.
Instead we must do something "special" with "lambda",
"named-lambda", "let", "let*", and "letrec".
Certainly the report is muddled, and I must accept the blame for some of
this muddle. I introduced a lot of the nonsense you're complaining
about into this version of the report in a quest for accuracy. I agree
with your complaint that internal definitions are intrusive, and I'll do
what I can to remedy the situation.
We have taken a rather elegant language and made it elitest.
I don't understand this use of that term.
I wanted all of my students to be able to implement "Scheme" when
they walked out of my course, now that is no longer possible.
This is false. Internal defines are not essential. If by "Scheme" you
mean absolutely everything described in the report, I would expect that
internal definitions (which can be implemented with a very small amount
of code) would be the least of any implementor's worries. What about
number I/O?
It was a great beauty of
Scheme that the four mentioned special forms along with identifiers and
application were the only syntax. It was wonderful that a CPS interpreter
for Scheme was all that was necessary to come to grips with in order to
understand the run-time architecture of Scheme.
Why isn't this still true?
My argument with internal-define is not that it is good or bad, but
that the subtlety of its definition is unnecessary with judicious use
of letrec and letrec should be a trivial macro. What happened?
How do internal definitions make LETREC more complicated? The (LET ()
...) (which would otherwise be a (BEGIN ...)) is trivial compared to
the rest of what LETREC has to do, and doesn't even have to be there at
all if you're not implementing the full language.
I have never liked internal defines.
Thanks for telling me, I hadn't figured this out.
I thought they were harmless
until I saw what havoc they introduced to the Report. I am trying
desperately to convince everyone that we made a mistake and we should
do everything in our power before we go public on this Report to
wait until we impose internal defines on everyone.
I'll do what I can to fix the presentation; I can at least certainly
make internal definitions less intrusive than they were in the RRRS. I
hope that will be sufficient. Personally, I wouldn't mind removing
internal definitions from the language, although special treatment of
definitions at top level of a file (which is another story altogether)
must stay. If you can convince everyone, including Sussman and Abelson,
that internal definitions should be flushed, then I'll flush them. If
you must persue this, I suggest you talk to Sussman on the telephone
about this; he isn't reachable by electronic mail until June 20, I
think. I'll try to find his phone number at Princeton or HP or wherever
he is.
Why does this question arise at this moment? I am angered by the
untimeliness of this debate. Why didn't it come up when the idea of
printing the report in SIGPLAN was first mentioned? This part of the
language hasn't changed.
Jonathan
∂31-May-86 2319 @MC.LCS.MIT.EDU:JAR%MX.LCS.MIT.EDU@MC.LCS.MIT.EDU define -- a modest proposal
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 31 May 86 23:19:38 PDT
Received: from MX.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 1 JUN 86 02:18:12 EDT
Date: Sun, 1 Jun 86 02:03:01 EDT
From: Jonathan A Rees <JAR%MX.LCS.MIT.EDU@MC.LCS.MIT.EDU>
Subject: define -- a modest proposal
To: WAND%northeastern.edu@CSNET-RELAY.ARPA
cc: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <[MX.LCS.MIT.EDU].923455.860601.JAR>
Date: Fri, 30 May 86 10:40 EST
From: MITCHELL WAND <WAND%northeastern.edu at CSNET-RELAY.ARPA>
I think it is clear that we do not have a consensus on the semantics
of internal DEFINE.
This isn't clear to me. I thought we had always agreed that internal
definitions were just sugar for LETREC (see Will's message of 11 November
84, excerpted below).
My understanding of the compromise reached at
Brandeis was that lexically nested DEFINE would retain the MIT
semantics, whereas the IU semantics could be obtained by using
DEFINE! . The current report does not appear to be compatible with
that compromise, because it would appear necessary to do a
(define foo 'hunoz)
at top-level before one can legally do a set! on foo from an interior scope.
At first I thought that you had misremembered, but I just went back to
the archives, and you are right. However, DEFINE! was later flushed --
without any liberalization of SET! . The discussion was obviously
incomplete (as you can tell by reading it), and we're completing it now.
Will did the right thing since he flushed features that not everyone
wanted, namely (a) DEFINE! and (b) an environment in which SET! could
cause unbound variables to become bound. See the Appendix to this
message for the exchange.
I was moderately happy with how that turned out and implicitly assumed
that if people had serious troubles with the RRRS they would have spoken
up ages ago. My attempts to clarify things have apparently drawn
attention to issues which have been peacefully asleep for over a year.
Analyzing this situation, there are two operations involved in a define:
1. Binding the identifier to some location.
2. Storing a value in that location.
The latter operation is clearly doable by set!, so the only issue is #1.
The MIT semantics has DEFINE performing #1 on the current scope. The
advantage of this proposal is that it is uniform on both "top-level" and
interior scopes. The disadvantage is that it essentially creates a new scope
(region) in the program which is not delimited by parentheses.
This is true, the region is only the <body> of the LET or whatever
expression, not the entire expression, so the region isn't delimited by
left and right parentheses. The region of a definition at top level of
a file is similarly not delimited by parentheses, although for a
slightly different reason. I wouldn't say the definition creates the
scope, I'd say that the scope is created by the expression in whose body
the definition appears. But what is so unusual about this? The region
of a binding created by LET is also not delimited by parentheses; it's
not the entire LET expression.
[Perhaps the
grammar could be fixed to recognize this new, non-list-structure phrase?].
What change do you suggest? Why don't <body> and <program> foot the
bill? A <body> is exactly the region of the bindings specified by
internal definitions which begin it. A <program> (which, I suppose, is
the concatenation of all the files comprising a running Scheme program,
or something like that) is the region of bindings created by top level
definitions.
This is an unpleasantness at the top level which I do not think we
understand.
I guess I'm losing track of what you're saying. I agree that there is
much unpleasantness, but to which one are you referring?
In Algol 60 a <program> is a <block> or a <compound expression>, so
Algol 60 has the property you want, that regions are always fully
parenthesized (by BEGIN ... END). I always rationalized Scheme's lack
of "outermost parentheses" by the fact that there would be no point in
having them if you would always have to write them -- they would be
redundant. I imagine that those parentheses are there, just outside the
edge of my files, providing a region for my files' top level bindings to
live in. (The T compiler actually puts the parentheses there, treating
a file boundary as a sort of a macro.)
The main unpleasantness I see is the syntactic oddity that a <program>
is a sequence of intermixed <expression>s and <definition>s (it's very
important that <definition>s aren't <expression>s!), whereas a <body> is
a sequence of <definition>s followed by a sequence of <expression>s. I
think I suggested fixing this a while ago (whether to people at MIT or
to RRRS-Authors I don't remember), so that <program>s and <body>s could
have the same syntax and semantics (if internal definitions were
supported at all, that is), but this suggestion was not well received.
This change would make Scheme like Algol 68, which also allows one to
intersperse statements and declarations within a "series" (the region
("range") of a declaration includes previous statements and declarations
in its "series"). The other way to resolve the inconsistency is to be
like Algol 60 and require that all the definitions in a program go at
the top, before any statements (expressions), but somehow I don't think
people would buy that.
[Perhaps we should separate DEFINE into two procedures:
(make-local-variable 'foo)
(set! foo value)
A reasonable idea. In MIT Scheme, (make-local-variable 'foo) is written
(define foo). (Or do you really mean a procedure?) If people like this
feature (which causes the variable to become bound but unassigned, like
in LETREC) I'd be happy to see it go into the report. It is bothersome
that one has to specify an initial value, and this seems as good a way
as any to avoid having to do so.
[Another, separate, argument against including internal define as an
optional feature in the report is that, unlike the other optional
features in the report, it requires pervasive modifications in many
other sections of the report].
I agree that the presentation is bad. This is a real problem which, as
I said in my message to Dan, I think I can fix, by going back to
something closer to Will's approach, which was much less intrusive. I
take full responsibility for having screwed this up.
What I will argue for is the following:
An implementation may have a top level (initial, whatever) environment in
which every possible identifier is bound (though only some are initialized).
This would allow programs in that implementation to do a set! on a global
variable (excuse me, a variable in the current top-level environment)
[Can you define "current"?]
from an
internal scope without having to explicitly bind the variable in the initial
scope. It would also allow MIT-style define to proceed, as it does not
require the existence of a distinguished global environment.
I think this proposal retains the spirit of the Brandeis agreement on this
issue.
If people generally think it's OK if this is documented as an optional
language feature (as was DEFINE! previously), I don't have too much
problem with putting it in the report, if it's accompanied by some
mention of the fact that some implementations have principled reasons
for not having this feature. (Dan has complained to me, however, that
he doesn't want the report to contain advertisements for random features
of various dialects, so I wouldn't know quite how to do this.) My main
complaint is that it would be nice to be able to support as many as
possible of the report's non-essential features in T and MIT Scheme, and
it would be a substantial amount of work to implement this particular
feature in T and MIT Scheme; causing assigned variables to become bound
in an appropriate contour involves a bothersome non-local code
transformation.
The MIT Scheme and T designers have worked hard to implement truly
block-structured languages which, like Algol, have no distinguished
top-level environments. (Algol 68's "standard prelude" and its
mechanism of "particular-programs" is block structure to the max -- can
someone tell me what would correspond to the proposed SET! extension in
Algol 68?) Legitimizing binding-from-a-distance (or environments in
which all variables are bound, which amounts to the same thing) in the
Scheme report is a threat to the pedagogical and engineering effort
we've put in. Of course, de-legitimizing unprepared SET!'s is
apparently a threat to your investment. I thought the compromise in the
RRRS was a good one considering how different our world views were.
With apologies to you and Dan for the angry tone & the abundance of
parenthetical remarks. I'm tired.
Jonathan.
------
APPENDIX. Historical record of the DEFINE! and SET! debate.
Clinger, 11 Nov 84, preliminary report on the workshop:
(DEFINE id expr) allows top-level definitions of variables. Its
semantics at top level are similar to the semantics of
(SET! id expr). The difference is that if id is not already
bound to a location, then the DEFINE form binds id before
performing the assignment, whereas it would be a mistake to
perform a SET! on an unbound identifier.
Optionally, (DEFINE! id expr) is equivalent to (DEFINE id expr)
when typed at the top level. Within code, (DEFINE! id expr) is
equivalent to (SET! id expr) unless id is unbound, in which case
the DEFINE! form creates a new top level binding for id before
performing the assignment.
Optionally, DEFINE may be used for internal definitions as in MIT
Scheme and in the book by Abelson and Sussman. If allowed at
all, internal definitions are permitted only in the bodies of
LAMBDA, LET, LETREC, and similar binding constructs. Furthermore
they must precede the rest of the body. With these restrictions,
the semantics of internal definitions can be explained in terms
of LETREC. For example, ...
Pitman, 6 Dec 84:
The term "top-level binding" is ... completely vague in DEFINE!'s
definition.
Rees, 14 March 85:
... And incidentally, I don't remember the rationale for having both
DEFINE! and DEFINE. I understand why DEFINE shouldn't have hairy
syntax, but what does DEFINE! give you that the stripped-down DEFINE
doesn't?
Clinger, 18 March 85, "final" draft of report:
(define! var expr) special form
If var is bound, then the define! form is equivalent to the
corresponding set!. If var is unbound, however, define! binds
var in the global environment before performing the assignment.
Haynes and Friedman, 27 Mar 85:
DEFINE! and DEFREC! should go away. (Yes, We were among those who
wanted them originally, but they aren't worth it.) We're not fond of
DEFINE either and wish it could go the same way, or at least be
optional.
Bartley, 29 March 85:
I'm willing to lose DEFINE! and DEFREC!, as Chris and Dan suggest.
Rozas, 27 March 85:
How am I supposed to define things if both DEFINE! and DEFINE
go away?
Haynes, 29 March 85, answering Rozas:
With SET!, provided one assumes that all identifiers are initially bound in
the global environment, or that SET! can extend the global environment.
With the exception of MIT's Scheme, this is what existing systems do. If MIT
is unwilling to change this, then we are reluctantly stuck with DEFINE.
Hanson, 30 March 85, answering Haynes:
This is a terrible idea. It seems that the ability to have many
different environments in which to perform incremental definitions has
been consistently overlooked by almost everyone except MIT Scheme and
T. Anyone who has ever tried to program a BIG system, and by that I
mean something over 500-1000 pages of code, knows that this kind of
packaging is **ESSENTIAL**!! So please don't try to take this away.
Haynes, 31 March 85, answering Hanson:
We grant the importance of such a facility, and are not trying to take it
way; but there is no concensus on how to provide such a facility, so it
is too soon to standardize on one. (Similarly, syntactic extensions
are **ESSENTIAL** to the kind of thing we do here; but it is also too soon
to standardize on a syntactic extension mechanism.)
We were simply debating whether SET! should be required to extend the
global environment if its identifier is unbound (or equivalently, have
everything bound in the global environment to begin with). This would
make DEFINE unessential, though it might still be optional. It has
nothing to do with multiple environments for incremental definition,
except that MIT uses DEFINE for both purposes.
Hanson, 2 April 85, answering Haynes:
What I wanted to say was: if SET! extends the "global" environment,
then that environment has become special in that it is the ONLY
environment that can be extended by interactive definition. This
would seem to preclude the existence of many such environments.
DEFINE eliminates the problem, because it specifies, very precisely,
the environment in which the name is bound.
Clinger, 20 April 85:
define! and defrec! will be flushed altogether.
Note: no one at Indiana replied to Hanson's message, even though it
isn't conclusive. (I don't even think it's true; there could be
multiple "global" environments, and SET!'s could be associated with them
lexically.) Did they assume that SET! would be changed?
∂01-Jun-86 0815 @MC.LCS.MIT.EDU:JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU define -- a modest proposal
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 1 Jun 86 08:14:48 PDT
Received: from OZ.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 1 JUN 86 11:13:41 EDT
Date: 1 Jun 1986 11:10 EDT (Sun)
Message-ID: <JINX.12211357535.BABYL@MIT-OZ>
From: Bill Rozas <JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU>
To: Jonathan A Rees <JAR%MX.LCS.MIT.EDU@MC.LCS.MIT.EDU>
Cc: rrrs-authors@MC.LCS.MIT.EDU, WAND%northeastern.edu@CSNET-RELAY.ARPA
Subject: define -- a modest proposal
In-reply-to: Msg of 1 Jun 1986 02:03-EDT from Jonathan A Rees <JAR%MX.LCS.MIT.EDU at MC.LCS.MIT.EDU>
In Algol 60 a <program> is a <block> or a <compound expression>, so
Algol 60 has the property you want, that regions are always fully
parenthesized (by BEGIN ... END). I always rationalized Scheme's lack
of "outermost parentheses" by the fact that there would be no point in
having them if you would always have to write them -- they would be
redundant. I imagine that those parentheses are there, just outside the
edge of my files, providing a region for my files' top level bindings to
live in. (The T compiler actually puts the parentheses there, treating
a file boundary as a sort of a macro.)
In MIT Scheme, the syntaxer (a program which translates s-expressions
into Scode, shared by the interpreter and the compiler) "puts" the
parantheses there by building an Scode object called an open-block
around the "top level".
The main unpleasantness I see is the syntactic oddity that a <program>
is a sequence of intermixed <expression>s and <definition>s (it's very
important that <definition>s aren't <expression>s!), whereas a <body> is
a sequence of <definition>s followed by a sequence of <expression>s. I
think I suggested fixing this a while ago (whether to people at MIT or
to RRRS-Authors I don't remember), so that <program>s and <body>s could
have the same syntax and semantics (if internal definitions were
supported at all, that is), but this suggestion was not well received.
This change would make Scheme like Algol 68, which also allows one to
intersperse statements and declarations within a "series" (the region
("range") of a declaration includes previous statements and declarations
in its "series"). The other way to resolve the inconsistency is to be
like Algol 60 and require that all the definitions in a program go at
the top, before any statements (expressions), but somehow I don't think
people would buy that.
I object to mixing internal definitions and expressions. I also
object to mixing top level definitions and expressions although I
admit to being guilty of laziness and occasionally doing the latter.
I never (as far as I can remember) mix them internally, and try to
avoid mixing top level ones also. I would not mind (and might even
applaud) a decision forcing top-level definitions to come first, which
would make the intenal and external cases more symmetric.
[Perhaps we should separate DEFINE into two procedures:
(make-local-variable 'foo)
(set! foo value)
A reasonable idea. In MIT Scheme, (make-local-variable 'foo) is written
(define foo). (Or do you really mean a procedure?) If people like this
feature (which causes the variable to become bound but unassigned, like
in LETREC) I'd be happy to see it go into the report. It is bothersome
that one has to specify an initial value, and this seems as good a way
as any to avoid having to do so.
It is completely unacceptable if it is a procedure (which was my
understanding given the wording and the QUOTE). This would imply
runtime definition (INCREMENTAL DEFINE), rather than static definition
(INTERNAL DEFINE). It also has the problem that if it is a procedure,
it needs the environment where the definition must occur as an
argument. Procedures cannot pick it up at run time.
If it is a special form, the QUOTE is not needed (nor the environment,
which is available at evaluation time), and it could be made static
(as I would expect everyone to want), but then it is exactly internal
DEFINE, so why change names?
I agree that (define foo) is reasonable, although only needed at top
level. I use it often in MIT-Scheme. In particular I use it as an
idiom indicating that the this variable is going to be assigned. I
specify an initial value only when it will not change. It is not
needed elsewhere (in MIT Scheme) because
(let ((foo))
...)
gives me a local binding for FOO which I can then assign.
Note: no one at Indiana replied to Hanson's message, even though it
isn't conclusive. (I don't even think it's true; there could be
multiple "global" environments, and SET!'s could be associated with them
lexically.) Did they assume that SET! would be changed?
JAR, I can't believe YOU have the bad taste to consider this (using
SET! to bind) seriously. One of the features that I dislike the most
from MacLisp and Franz (which is a poor clone of MacLisp), is that
SETQ is used to bind variables. I always use DEFCONST and DEFVAR
before assigning anything. Making this the standard (eliminating
DEFINE) would guarantee that I would never write in the standard
dialect. I'm sure that other people at MIT find this proposal as
distasteful as I do. I don't object to a system (like MacScheme, for
example) where SET! "works", but under no circumstances will I
accept a situation where it is the only way to do it. On such
systems, top-level DEFINE would be a NO-OP, which is fine with me, as
long as it is available.
∂01-Jun-86 2051 @MC.LCS.MIT.EDU:CPH@AI.AI.MIT.EDU schedule
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 1 Jun 86 20:51:03 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 1 JUN 86 23:49:28 EDT
Date: Sun, 1 Jun 86 23:49:21 EDT
From: Chris Hanson <CPH@AI.AI.MIT.EDU>
Subject: schedule
To: JAR@AI.AI.MIT.EDU
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Thu 29 May 86 14:36 EDT from Jonathan A Rees <JAR at MIT-AI.ARPA>
Message-ID: <[AI.AI.MIT.EDU].49879.860601.CPH>
I would vote for waiting a little longer before publishing, to get it
done right. It's not terribly important to me that it happen
immediately.
∂01-Jun-86 2343 @MC.LCS.MIT.EDU:dyb%indiana.csnet@CSNET-RELAY.ARPA Re: sentiments
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 1 Jun 86 23:42:59 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 2 Jun 86 00:59:17 EDT
Received: from indiana by csnet-relay.csnet id a005855; 2 Jun 86 0:57 EDT
Date: Sun, 1 Jun 86 16:21:30 est
From: Kent Dybvig <dyb%indiana.csnet@CSNET-RELAY.ARPA>
To: jar@MC.LCS.MIT.EDU
Subject: Re: sentiments
Cc: dfried%indiana.csnet@CSNET-RELAY.ARPA, rrrs-authors@MC.LCS.MIT.EDU
Date: Fri, 30 May 86 15:34:53 est
From: Dan Friedman
Sent-by: Kent Dybvig
First, let me apologize that the note from Dan looked like it was
coming from me. I did "su dfried" and resent the note for him
after his first try failed. I thought that it would put his name
on the note. I also apologize for the length of this note, which
is due primarily to the fact that I have included the entirety of
Jonathan's response to Dan's note.
... define was merely an alias for set! ...
This is how things were prior to the Brandeis meeting.
This is how things were AT INDIANA prior to the Brandeis meeting. At
Yale and MIT they somewhat different (although not as different as you
suppose) and had been since at least 1981. Your quest for elegance is
noble but please try not to equate your own version of Scheme with
Scheme.
This is how things were in the first two Scheme reports, in several
Indiana Schemes, in one North Carolina Scheme, and probably in other
Schemes as well as of the Brandeis meeting.
As I recall the feeling at the Brandeis meeting most of us were
willing to go along with the idea of limiting the use of "define"
internally to the semantics of SI&CP. This was in the interest of
good feeling about not undermining their book. I hope everyone
understands that I do not want to undermine their book, although I
would like to see them rewrite it without internal defines.
However, when I went along with this view I had underestimated how
damaging this decision would be to the characterization of Scheme
being a simple language. I was expecting a "comment" in the report
that stated that "use of define within the text of a program would
be restricted to the use as given in SI&CP." Instead, the
definition of "lambda" got changed.
I don't understand. Is it really the case that S&ICP never ever uses
internal defines in the body of a lambda? I'll check. In any case, if
internal definitions exist at all, LAMBDA is the ONLY form that's
affected, after macro expansion.
I quickly scanned S&ICP and I found two uses of define within let
(pp. 234 and 238), and a mention of the use of a lambda-expression
translator to support internal definitions (p. 440). The obvious
implication to the thoughtful reader is that the authors intend to
allow definitions at the front of a lambda body; however, it might
also be reasonable to only effect "define" (and "let" if the few uses
are considered enough reason to complexify it).
Instead, begin must be added to the list of special forms.
Not true, and I'm don't understand why you think so. Note that I
clearly put BEGIN in the "derived expression types" section. I will
include the usual expansion of it in a future draft; I forgot to note
that this was on my list of things to do.
That begin must be a core special form results from the fact that in
the report, (begin (define ...) ...) must not open up a new scope;
i.e., (begin x y ...) must not be defined as ((lambda () x y ...)),
or the more traditional form ((lambda (t) (begin y ...)) x) where t
does not appear free in (begin y ...). I think of this as the "usual
expansion".
Instead the macro for "letrec" must be conscious of it by having the
body be "(let () <body>)" where it should be <body>.
I proposed flushing internal definitions in the body of a letrec for
exactly this reason. But I don't see this as increasing the complexity
of LETREC significantly, and I was wrong to draw attention to it. I'll
try to figure out how to make this smoother.
You are right, it is not much, but any added complexity is a shame,
especially when the added complexity is to support an innessential
feature (other than the one being described, of course).
Instead define must be added to the list of special forms.
What do you mean? Definitions aren't even expressions!
I wouldn't brag about this! Having already expanded Scheme from
expressions and functions to statements and procedures, we are now
adding declarations. What happened to simplicity?
Instead the semantics of "set!" are weakened so that
it is not possible to just get by with "set!" and ignore "define".
As has been explained innumerable times, there is no way to avoid this
and have a language which is at all coherent with T and MIT Scheme.
Note that in all programming languages of the Algol/Pascal/C variety it
is an error to assign to an undeclared variable. That MIT Scheme and T
(and thus RRRS Scheme) also have this property is not coincidence.
Algol, Pascal, and C are not (typically) interactive languages, nor
do they have such nice features as first-class functions that allow
one to form modules of functions sharing local state/help functions.
I think that it would be possible in any system to have a notion of
a "top-level" lexical environment which implicitly contains bindings
for all things not bound elsewhere. This could be a per-user or
per-module thing; it need not be the outermost lexical environment.
Instead we must do something "special" with "lambda",
"named-lambda", "let", "let*", and "letrec".
Certainly the report is muddled, and I must accept the blame for some of
this muddle. I introduced a lot of the nonsense you're complaining
about into this version of the report in a quest for accuracy. I agree
with your complaint that internal definitions are intrusive, and I'll do
what I can to remedy the situation.
We have taken a rather elegant language and made it elitest.
I don't understand this use of that term.
I don't either, but I think what he means is that only a handful of
experienced implementors will understand how a full Scheme system is
implemented.
I wanted all of my students to be able to implement "Scheme" when
they walked out of my course, now that is no longer possible.
This is false. Internal defines are not essential. If by "Scheme" you
mean absolutely everything described in the report, I would expect that
internal definitions (which can be implemented with a very small amount
of code) would be the least of any implementor's worries. What about
number I/O?
Dan was referring, I'm sure, to the core of the language, which he
feels must now not only include lambda, set!, quote, if, identifiers,
and applications but also begin and define, not to mention the added
complexity of lambda.
It was a great beauty of
Scheme that the four mentioned special forms along with identifiers and
application were the only syntax. It was wonderful that a CPS interpreter
for Scheme was all that was necessary to come to grips with in order to
understand the run-time architecture of Scheme.
Why isn't this still true?
My argument with internal-define is not that it is good or bad, but
that the subtlety of its definition is unnecessary with judicious use
of letrec and letrec should be a trivial macro. What happened?
How do internal definitions make LETREC more complicated? The (LET ()
...) (which would otherwise be a (BEGIN ...)) is trivial compared to
the rest of what LETREC has to do, and doesn't even have to be there at
all if you're not implementing the full language.
I think you misunderstood his point completely here. He was merely
wondering of what use internal define is if you have letrec, and noted
that you can get letrec trivially with lambda and set!, if you like.
I have never liked internal defines.
Thanks for telling me, I hadn't figured this out.
I thought they were harmless
until I saw what havoc they introduced to the Report. I am trying
desperately to convince everyone that we made a mistake and we should
do everything in our power before we go public on this Report to
wait until we impose internal defines on everyone.
I'll do what I can to fix the presentation; I can at least certainly
make internal definitions less intrusive than they were in the RRRS.
I hope that will be sufficient. Personally, I wouldn't mind removing
internal definitions from the language, although special treatment of
definitions at top level of a file (which is another story altogether)
must stay.
I agree in principle with this idea. It makes sense that define at
top level should be treated specially, and nested definitions such as
those given throughout S&ICP are quite handy and encourage modularity
in a nice way. Since this treatment would not affect lambda or let,
it would be easy to understand and easy to implement. I would agree
to using something totally different for definitions or perhaps use
the define/set! combinations for our interpretation of internal define
if we all agreed that define were only to be used at top level, with
the nested syntax. I would even agree to making top-level, nested
define a required feature, and to requiring that define not be used
anywhere else.
If you can convince everyone, including Sussman and Abelson,
that internal definitions should be flushed, then I'll flush them. If
you must persue this, I suggest you talk to Sussman on the telephone
about this; he isn't reachable by electronic mail until June 20, I
think. I'll try to find his phone number at Princeton or HP or wherever
he is.
Why does this question arise at this moment? I am angered by the
untimeliness of this debate. Why didn't it come up when the idea of
printing the report in SIGPLAN was first mentioned? This part of the
language hasn't changed.
We are all very sorry for the lateness of the debate, but it has
taken time to absorb everything (and we have brought it up before
publicly and privately, perhaps not as loudly). None of us had used
a system with the internal definitions until after the RRRS (not R3S)
came out, so we must plead a certain amount of ignorance in earlier
discussions. On the other hand, it is more important on the eve of
SIGPLAN publication than at any previous time, since that will be the
first wide distribution of a Scheme report, and we must come together
on this issue. We have an exceptionally tight community of people
working on/with Scheme and it is not good for us to put each other at
odds by publishing a feature that some of us strongly dislike in its
current form. We ask your forgiveness and patience; please realize
that we understand and very much appreciate all of your time and
effort that has gone gone into this report.
Jonathan
Kent
∂02-Jun-86 0730 @MC.LCS.MIT.EDU:JMILLER@OZ.AI.MIT.EDU Another Can of Worms?
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 2 Jun 86 07:30:04 PDT
Received: from OZ.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 2 JUN 86 10:28:49 EDT
Date: 2 Jun 1986 10:28-EDT
Sender: JMILLER@MIT-OZ
Subject: Another Can of Worms?
From: JMILLER@MIT-OZ
Reply-To: JMiller%OZ@MIT-MC
To: rrrs-authors@MC
Message-ID: <[MIT-OZ] 2-Jun-86 10:28:16.JMILLER>
I've withheld this one for a long time on the theory that new
problems with the language should be discussed AFTER the imminent
publication of the standard. Since we appear to have stalled
that yet again, I'd like to mention it.
I am very concerned about the fact that the document we are
promulgating as a language standard permits of no way to write
truly portable code. This arises from the lack of a convention
which would permit me to choose the names of variables which will
guarantee me that no implementation has used those names as
special forms. I know of two solutions: (a) a gentleman's
agreement to the effect that every implementation will support
some well-publicized mechanism for absorbing foreign portable
code (in MIT Scheme, for example, we could provide a portable
syntax table for this purpose); or (b) as in BCPL, make a formal
statement as part of the language design that certain names will
never be used as the names of built-in special forms.
I am in favor of option (b) since it prevents the current
implementors from becoming a select small clique which has more
knowledge than outsiders. One such proposal would be that we
insert a statement somewhere to the effect that "No
implementation shall supply by default a special form with ":" in
its name". Thus portable code uses variables with ":" in them
somewhere and all is well. [FYI, the BCPL statement was that
reserved words were all lower-case and more than one letter
long.]
-- Jim Miller
∂02-Jun-86 1558 @MC.LCS.MIT.EDU:JAR%MX.LCS.MIT.EDU@MC.LCS.MIT.EDU sentiments
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 2 Jun 86 15:58:26 PDT
Received: from MX.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 2 JUN 86 18:56:44 EDT
Date: Mon, 2 Jun 86 18:41:25 EDT
From: Jonathan A Rees <JAR%MX.LCS.MIT.EDU@MC.LCS.MIT.EDU>
Subject: sentiments
To: dyb%indiana.csnet@CSNET-RELAY.ARPA
cc: dfried%indiana.csnet@CSNET-RELAY.ARPA,
rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Sun 1 Jun 86 16:21:30 est from Kent Dybvig <dyb%indiana.csnet at CSNET-RELAY.ARPA>
Message-ID: <[MX.LCS.MIT.EDU].923886.860602.JAR>
Date: Sun, 1 Jun 86 16:21:30 est
From: Kent Dybvig <dyb%indiana.csnet at CSNET-RELAY.ARPA>
That begin must be a core special form results from the fact that in
the report, (begin (define ...) ...) must not open up a new scope;
i.e., (begin x y ...) must not be defined as ((lambda () x y ...)),
or the more traditional form ((lambda (t) (begin y ...)) x) where t
does not appear free in (begin y ...). I think of this as the "usual
expansion".
I get the feeling you haven't read the report. According to NEITHER
Will's RRRS, NOR the draft I sent out, is (begin (define ...) ...) a
syntactically valid expression! Look again at the BNF and at the text.
The usual expansion ((lambda (t) (begin y ...)) x) works perfectly well
since <expression> can't produce anything of the form (define ...),
<definition>s can only occur in <program>'s and <body>'s, and the syntax
of <sequence>s is (begin <expression>+), not (begin <body>). The RRRS
says that definitions are expressions, which isn't exactly wrong, but it
seemed a little misleading to me, since they aren't legitimate in all
places where expressions are supposed to be. (Again, only the details
of the description have changed, not the language described!)
Maybe you're misled by the statement in the RRRS that "(lambda (var1 ...)
expr1 expr2 ...) is equivalent to (lambda (var1 ...) (begin expr1 expr2
...))". This can be seen to be technically true if either (a) you take
this statement to be only about the essential subset or (b) definitions
aren't expressions (so that the statement wouldn't apply in the case of
(begin (define ...) ...)).
The BNF in the draft makes the error of classifying (begin ...) as
primitive instead of derived. This is an error. (At one point I too
was confused and thought that begin had to be primitive, but Sussman
straightened me out). Sorry if this bug confused you. I will fix it.
I wouldn't brag about this! Having already expanded Scheme from
expressions and functions to statements and procedures, we are now
adding declarations. What happened to simplicity?
"Now"? The fact that definitions weren't valid in copntexts other than
top level and the beginnings of "bodies" was agreed on Brandeis and
hasn't been challenged until now.
Introducing the term "statement" to mean an expression whose value is
thrown away seems harmless to me; I was inspired to do this by the
abstract syntax that Will sent me for the denotational semantics (which
sets Com = Exp). Using "<statement>* <expression>" instead of
"<expression>+" also gives a rationale for requiring at least one
expression in LAMBDA, BEGIN, etc. If there's general sentiment that
this is a bad idea, I'll flush it, but I thought it was reasonable.
We all know why we use "procedure" instead of "function". I don't
understand how this makes the language more complex.
Your question about simplicity is pure propaganda, so I won't answer it
beyond the above remarks.
As has been explained innumerable times, there is no way to avoid this
and have a language which is at all coherent with T and MIT Scheme.
Note that in all programming languages of the Algol/Pascal/C variety it
is an error to assign to an undeclared variable. That MIT Scheme and T
(and thus RRRS Scheme) also have this property is not coincidence.
Algol, Pascal, and C are not (typically) interactive languages, nor
do they have such nice features as first-class functions that allow
one to form modules of functions sharing local state/help functions.
I think that it would be possible in any system to have a notion of
a "top-level" lexical environment which implicitly contains bindings
for all things not bound elsewhere. This could be a per-user or
per-module thing; it need not be the outermost lexical environment.
I repeat: "there is no way to avoid [requiring that variables be bound
before they're assigned] and have a language which is at all coherent
with T and MIT Scheme." I never said it would be impossible to
implement. And interactiveness has nothing to do with it.
... I don't either, but I think what he means is that only a handful of
experienced implementors will understand how a full Scheme system is
implemented.
... Dan was referring, I'm sure, to the core of the language, which he
feels must now not only include lambda, set!, quote, if, identifiers,
and applications but also begin and define, not to mention the added
complexity of lambda.
Do I need to mail out a complete evaluator in order to drive the point
home?
I think you misunderstood his point completely here. He was merely
wondering of what use internal define is if you have letrec, and noted
that you can get letrec trivially with lambda and set!, if you like.
No one ever said internal defines were linguistically necessary. They
are obviously redundant. They are there because it's very important to
be compatible with something so central to S&ICP. Like I say, talk to
Sussman and Abelson if you dispute this.
I agree in principle with this idea. It makes sense that define at
top level should be treated specially, and nested definitions such as
those given throughout S&ICP are quite handy and encourage modularity
in a nice way. Since this treatment would not affect lambda or let,
it would be easy to understand and easy to implement.
How does its not affecting lambda or let have anything to do with how
easy it is to implement? Implementing internal defines involves one
trivial loop, and it doesn't matter whether you put this loop in the
code for lambda or define, although it DOES matter if you have to invoke
it two places.
I would agree
to using something totally different for definitions or perhaps use
the define/set! combinations for our interpretation of internal define
if we all agreed that define were only to be used at top level, with
the nested syntax. I would even agree to making top-level, nested
define a required feature, and to requiring that define not be used
anywhere else.
I don't understand this paragraph at all. Note that no one has ever
wanted internal defines to be essential in any context.
... We have an exceptionally tight community of people
working on/with Scheme and it is not good for us to put each other at
odds by publishing a feature that some of us strongly dislike in its
current form.
Like I say, talk to Abelson and Sussman. I think a lot has and can be
done to make internal definitions minimally ugly and intrusive. It is
not good to confuse many innocent bystanders and put your community at
odds with MIT's by permitting an incompatible meaning for DEFINE.
Jonathan.
∂02-Jun-86 1604 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA DEFINE -- a concrete proposal
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 2 Jun 86 16:02:48 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 2 Jun 86 18:57:59 EDT
Received: from tektronix by csnet-relay.csnet id an13197; 2 Jun 86 18:51 EDT
Received: by tektronix.TEK (5.31/6.14)
id AA09219; Mon, 2 Jun 86 13:19:31 PDT
Received: by tekchips (5.31/5.14)
id AA05517; Mon, 2 Jun 86 13:23:57 PDT
Message-Id: <8606022023.AA05517@tekchips>
To: rrrs-authors@MC.LCS.MIT.EDU
Cc: jar%mx.lcs.mit.edu@MC.LCS.MIT.EDU, wand%northeastern.edu@CSNET-RELAY.ARPA,
dfried%indiana.csnet@CSNET-RELAY.ARPA
Subject: DEFINE -- a concrete proposal
Date: 02 Jun 86 13:23:55 PDT (Mon)
From: willc%tekchips.tek.csnet@CSNET-RELAY.ARPA
I propose that section 4.1.0 of the 22 May 1986 draft be clarified to
read as follows:
At the top level of a program, a definition
(define <variable> <expression>)
has essentially the same effect as the assignment expression
(set! <variable> <expression>)
if <variable> is bound. If <variable> is not bound, however,
then the definition will bind <variable> before performing
the assignment, whereas it would be an error to perform a
set! on an unbound variable.
[examples go here]
Top level definitions are essential; all Scheme implementations
must support them.
Some implementations of Scheme use an initial environment in
which all possible variables are bound to locations, most of
which contain undefined values. Top level definitions in
such an implementation are truly equivalent to assignments.
In my opinion, this is merely a clarification because the draft
does not say that the initial environment must contain only the
variables mentioned in the report, and it is in fact the case
that most implementations supply variables that don't appear
in the report. Furthermore, even if unbound variables exist,
the phrase "it would be an error" indicates that implementations
are not required to complain when one is assigned, so an
implementation is free to do something random (like bind the
variable and do an assignment) instead of signalling the error.
The phrase "Some implementations of Scheme" is the very same
neutral phrase used at the beginning of Section 4.2 on internal
definitions. Thus the report would be neutral between those
who for whatever reason want to assign variables before they
declare them and those who for whatever reason prefer the
internal definition syntax to LETREC.
Since this is only a clarification of what is already implicit
in the report, I believe this proposal should satisfy those who
prefer the status quo. I believe it should also satisfy those
who with Mitch are arguing for the following:
An implementation may have a top level (initial, whatever)
environment in which every possible identifier is bound
(though only some are initialized).
This would allow programs in that implementation to do a set!
on a global variable (excuse me, a variable in the current
top-level environment) from an internal scope without having
to explicitly bind the variable in the initial scope. It would
also allow MIT-style define to proceed, as it does not require
the existence of a distinguished global environment.
Mitch is entirely right that his proposal retains the spirit of
the Brandeis agreement on this issue. Though Jonathan said in
his reply to Mitch that he wouldn't have too much problem with
adding this clarification to the report, he insisted that it should
be "accompanied by some mention of the fact that some implementations
have principled reasons for not having this feature". I say that
stipulation is unfair -- the report doesn't contain any of the
principled arguments against internal definitions or against the
fancy DEFINE syntax or against REC or against NAMED-LAMBDA or
against NIL or against the behavior of EQ? on procedures or
against hexadecimal notation...
Dan Friedman had some very reasonable things to say about the
importance of simplicity and elegance, particularly with regard
to ease of implementation by students. My answer is that
students should implement "Essential Scheme" instead of worrying
about how to get ASIN to work with complex numbers. Essential
Scheme does not have internal definitions, and it is perfectly
all right to use an initial environment in which all variables
are bound and to implement DEFINE as assignment.
I must admit that Essential Scheme is a more elegant language than
full Scheme.
I second Bill Rozas's objections to MAKE-LOCAL-VARIABLE as a procedure
for performing incremental definitions.
Let us seek peace,
William Clinger
----------------------------------------------------------------
[Because of one mailer error, the local postmaster has suggested
that people send me mail at willc@tekchips.tek.csnet instead of
at willc%tekchips@tektronix.csnet, which had worked fine until
now. If one doesn't work, please try the other.]
∂02-Jun-86 1803 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA Re: definitions; APPEND!; etc
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 2 Jun 86 18:03:10 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 2 Jun 86 21:02:04 EDT
Received: from ti-csl by csnet-relay.csnet id a014023; 2 Jun 86 20:52 EDT
Received: by tilde id AA20278; Mon, 2 Jun 86 19:00:17 cdt
Date: Mon 2 Jun 86 18:46:15-CDT
From: David Bartley <Bartley%ti-csl.csnet@CSNET-RELAY.ARPA>
Subject: Re: definitions; APPEND!; etc
To: willc%tekchips.tek@CSNET-RELAY.ARPA,
rrrs-authors%mc.lcs.mit.edu@CSNET-RELAY.ARPA
Cc: jar%mc.lcs.mit.edu@CSNET-RELAY.ARPA, Bartley%TI-CSL@CSNET-RELAY.ARPA,
605301901283@tekchips
MMDF-Warning: Parse error in original version of preceding line at CSNET-RELAY.ARPA
Message-Id: <12211713593.48.BARTLEY@CSC60>
[Bartley:]
>>APPEND! always side-effects all but its last argument.
[Clinger:]
>No, APPEND! should not be required to perform side effects. This is not
>as silly as it may sound. In an implementation using the Hewitt-Lieberman
>gc algorithm, for example, side effects to sufficiently old structures are
>likely to be more expensive than consing. APPEND! should be free to decide
>for itself which technique is fastest.
My point of view is that APPEND! is used to ensure sharing of
structure and APPEND is used to ensure that structure is NOT shared
(except in the clearly specified case of the last argument).
>I would feel differently if APPEND! returned an unspecified value, as
>does VECTOR-SET!.
Perhaps that would be more consistent. Perhaps we should call it
SET-LAST-CDR! instead!
Seriously, I could go either way, but I'm sure some of my code would
fail to work on a system in which APPEND! did not share structure.
Are there any others we should be discusssing?
--db--
-------
∂03-Jun-86 0853 @MC.LCS.MIT.EDU:Asrivastava%ti-csl.csnet@CSNET-RELAY.ARPA
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 3 Jun 86 08:53:32 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 3 Jun 86 11:48:51 EDT
Received: from ti-csl by csnet-relay.csnet id ac20037; 3 Jun 86 11:38 EDT
Received: by tilde id AA02583; Tue, 3 Jun 86 11:06:15 cdt
Date: Tue, 3 Jun 86 11:06:15 cdt
From: John Maeda <maeda%tilde%ti-csl.csnet@CSNET-RELAY.ARPA>
To: jkr%mit-oz@MC.LCS.MIT.EDU
okay glen I hope this gets to you; I had written you a real l ong letter but
I have no idea how to save it from this version of EMACS running on this uLTRIX
machine ... (must be a ti-professional playing "multi-user") ... so I'm really
ticked, I just hope this gets to you.
jtm
∂03-Jun-86 0953 @MC.LCS.MIT.EDU:JAR%MX.LCS.MIT.EDU@MC.LCS.MIT.EDU APPEND!
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 3 Jun 86 09:53:47 PDT
Received: from MX.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 3 JUN 86 12:52:26 EDT
Date: Tue, 3 Jun 86 12:37:27 EDT
From: Jonathan A Rees <JAR%MX.LCS.MIT.EDU@MC.LCS.MIT.EDU>
Subject: APPEND!
To: Bartley%ti-csl.csnet@CSNET-RELAY.ARPA
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Mon 2 Jun 86 18:46:15-CDT from David Bartley <Bartley%ti-csl.csnet at CSNET-RELAY.ARPA>
Message-ID: <[MX.LCS.MIT.EDU].924078.860603.JAR>
Maybe we should just flush APPEND! altogether? It's easy enough to do
(SET-CDR! (LAST-PAIR list1) list2). I think Sussman was the one who
really wanted APPEND! in the language, but I forget why.
Jonathan
∂03-Jun-86 1010 @MC.LCS.MIT.EDU:JAR%MX.LCS.MIT.EDU@MC.LCS.MIT.EDU portability
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 3 Jun 86 10:09:43 PDT
Received: from MX.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 3 JUN 86 13:08:08 EDT
Date: Tue, 3 Jun 86 13:08:20 EDT
From: Jonathan A Rees <JAR%MX.LCS.MIT.EDU@MC.LCS.MIT.EDU>
Subject: portability
To: RRRS-AUTHORS@MX.LCS.MIT.EDU
Message-ID: <[MX.LCS.MIT.EDU].924086.860603.JAR>
The following is in response to Jim Miller's message about portability,
which raises an important question I've been hoping to repress. But Freud
tells us that the repressed always returns.
- Jonathan
Date: Sat, 31 May 86 21:32:00 EDT
From: Jonathan A Rees <JAR%MX.LCS.MIT.EDU at MC.LCS.MIT.EDU>
To: GJC%MX.LCS.MIT.EDU at MC.LCS.MIT.EDU
cc: JAR at MX.LCS.MIT.EDU
Re: revised↑n report
In-reply-to: Msg of Sat 31 May 86 13:16:32 EDT from George J. Carrette <GJC%MX.LCS.MIT.EDU at MC.LCS.MIT.EDU>
Message-ID: <[MX.LCS.MIT.EDU].923398.860531.JAR>
Date: Sat, 31 May 86 13:16:32 EDT
From: George J. Carrette <GJC%MX.LCS.MIT.EDU at MC.LCS.MIT.EDU>
To: JAR%MX.LCS.MIT.EDU at MC.LCS.MIT.EDU
One should be able to show that clever underspecification in
a language spec is eventually a losing proposition. Example:
in CL (make-array 3) => #(0 0 0) (e.g. in VAX-NIL) or #(NIL NIL NIL)
in at least the LISPM environments I'm aware of. The idea
is to make the guy say (make-array <x> :initial-element <value>) if
he is depending on the initial value. Supposed to be a big efficiency
win. (now, I've just spent a few hours tracking down a bug in the
DOE-MACSYMA plot package that had to do with the initial element of
an array screw). A few days ago you had a note to the CL list about
a similar underspecification screw in defstruct.
Well, revised↑n has its share of clever underspecification too.
But, is this really a win in a language spec? Or is it just a way
of showing (forcing down everybodies neck...) how much the
language designers know about different implementation tricks?
You dont see this kind of stuff in other language specs.
Back to the array example. Is it reasonable to argue that in lisp
there are good natural default values? The empty list as default
for an array? I think it is. On the other hand, if you know that
there might be machine dependancies in these defaults, (in fact it
is usually operating system dependancies. VMS goes to some trouble to
make sure pages allocated to users are filled with zero's)
then why not have:
(make-array 10 :initial-element *:system-prefered-initial-array-element).
I argue that clever underspecifications for the purpose of elicidating
implementation tricks know by the language designers causes:
* "dating" of the language.
* frustration for users of the language
* eventual lack of portability.
This is all too true. I think that if I were designing another language
now I would try to get rid of all underspecifications, since they lead
to so much confusion. I hope that as many underspecifications as
possible will disappear from Common Lisp.
Let me try to figure out why I think it's OK for Scheme to be
underspecified and not for Common Lisp to be underspecified. Scheme's
underspecifications don't generally have anything to do with
"implemetation tricks." Political expediency demands that the report
leave a lot of room for local variation. We wouldn't be able to get
agreement on all these little things. Some differences between versions
result from differing implementation demands, but mostly it's that the
different groups have incompatible ideologies, so each group would have
its own idea of what the "right" thing is for each situation.
The goals of Revised↑n Scheme differ from those of Common Lisp, I think.
Mostly we want to be able to read each others' code when it appears in
the literature, and relieve people from the pain of there being
incompatible languages all calling themselves "scheme". Portability is
only a secondary consideration, and we're not so concerned that all
non-erroneous programs should port, only that "well-written" programs
should port. I think there's the feeling that people who write in
Scheme don't just play around until their code just happens to work
(often the only programming technique available in some systems which
will remain nameless) -- they actually write "clean" code which observes
data abstractions and doesn't depend on things it shouldn't depend on
(like the initial value of vector components). So while it's very easy
to write unportable code, people who do so have somehow missed the
point, and probably ought to be programming in CLU or Ada (or the
language I have yet to design?) instead.
If we really want to aim for airtight portability then we've got to start
making a lot of changes.
Jonathan.
∂03-Jun-86 1124 @MC.LCS.MIT.EDU:WAND%northeastern.edu@CSNET-RELAY.ARPA define
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 3 Jun 86 11:23:18 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 3 Jun 86 14:20:34 EDT
Received: from northeastern by csnet-relay.csnet id a000357; 3 Jun 86 14:19 EDT
Date: Tue, 3 Jun 86 11:29 EST
From: MITCHELL WAND <WAND%northeastern.edu@CSNET-RELAY.ARPA>
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: define
1. I think the discussion has clarified, at least for me, the difference
between "internal" and "incremental" define. I was certainly thinking about
"incremental" define, which happens conceptually at run-time. As I gather it,
the idea is that internal define is JUST SYNTAX, which might be formalized as
something like
(define-equivalent-syntax ;; hypothetical pseudocode!
(<context-for-internal-define>
(define name1 body1) ...
<body>)
(letrec
((name1 body1) ...)
<body>))
The only place where "internal" define acts truly incrementally is at the top
level.
If this is correct, then my objections are considerably lessened. The major
complication of internal define, then, is sorting out in exactly which
contexts this syntax is permissable. This is a matter on which I think there
can be reasoned debate.
2. Will's proposal looks OK to me.
3. (make-local-variable 'foo) was a joke. No one seemed to get it. Sorry
'bout that.
4. Thanks to jinx and to jar for their thoughtful replies. In particular
thanks to jar (I think) for extracting the historical record. I say "jar (I
think)" because I've managed to lose my copy ($%↑&! VMS mailer); could someone
retransmit it? Tnx.
Mitch
∂03-Jun-86 1441 @MC.LCS.MIT.EDU:Asrivastava%ti-csl.csnet@CSNET-RELAY.ARPA SCOOPS source
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 3 Jun 86 14:41:37 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 3 Jun 86 17:33:42 EDT
Received: from ti-csl by csnet-relay.csnet id ac02031; 3 Jun 86 17:24 EDT
Received: by tilde id AA11964; Tue, 3 Jun 86 16:45:17 cdt
Date: Tue 3 Jun 86 15:32:49-CDT
From: Amitabh Srivastava <Asrivastava%ti-csl.csnet@CSNET-RELAY.ARPA>
Subject: SCOOPS source
To: scheme%mc.lcs.mit.edu@CSNET-RELAY.ARPA
Cc: Asrivastava%ti-csl.csnet@CSNET-RELAY.ARPA
Message-Id: <12211940524.20.ASRIVASTAVA@CSC60>
SCOOPS source is available now. It can be obtained by doing anonymous
ftp at host BBNA to the directory PS:<TICSL.RELSCOOPS> .
Initially, ftp the file README.SCM . It contains list of the
files needed and other information. The sources have been modified
and are totally in TI Scheme.
- amitabh
-------
∂03-Jun-86 1554 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA Is BEGIN primitive?
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 3 Jun 86 15:54:17 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 3 Jun 86 18:50:57 EDT
Received: from tektronix by csnet-relay.csnet id ai02667; 3 Jun 86 18:43 EDT
Received: by tektronix.TEK (5.31/6.14)
id AA00979; Tue, 3 Jun 86 10:00:01 PDT
Received: by tekchips (5.31/5.14)
id AA14582; Tue, 3 Jun 86 10:04:26 PDT
Message-Id: <8606031704.AA14582@tekchips>
To: jar%mx.lcs.mit.edu@MC.LCS.MIT.EDU, dyb%indiana.csnet@CSNET-RELAY.ARPA
Cc: rrrs-authors@MC.LCS.MIT.EDU
Subject: Is BEGIN primitive?
Date: 03 Jun 86 10:04:25 PDT (Tue)
From: willc%tekchips.tek.csnet@CSNET-RELAY.ARPA
Whether you think BEGIN must be a primitive expression depends on your
cultural heritage. If you have grown up believing that syntax is fully
checked before macro expansion, then (BEGIN X Y ...) ==>
((LAMBDA () X Y ...)) works fine. If you have grown up believing that
macros do the least amount of syntax checking they can get away with
(or less), then (BEGIN (DEFINE ...) ...) ==> ((LAMBDA () (DEFINE ...) ...))
does not detect the syntax error.
I like the term "derived expression" because it expresses the fact that
the semantics of BEGIN can be expressed in terms of primitive expressions
without implying that a macro mechanism is used.
Though the word "statement" ought to signify a declarative assertion,
the American programming language community long ago corrupted it to
signify a command. I prefer the English "command", but I prefer even
"statement" to the phrase "expression evaluated solely for effect".
Peace, Will
∂03-Jun-86 2023 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU ftp-able r3rs.dvi
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 3 Jun 86 20:22:59 PDT
Received: from LIVE-OAK.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 3 JUN 86 23:22:06 EDT
Received: from ROCKY-GRAZIANO.LCS.MIT.EDU by MIT-LIVE-OAK.ARPA via CHAOS with CHAOS-MAIL id 2325; Tue 3-Jun-86 23:22:23-EDT
Date: Tue, 3 Jun 86 23:21 EDT
From: Jonathan A Rees <JAR@MIT-AI.ARPA>
Subject: ftp-able r3rs.dvi
To: rrrs-authors@MIT-MC.ARPA
Message-ID: <860603232145.2.JAR@ROCKY-GRAZIANO.LCS.MIT.EDU>
I put the DVI file for the report on host MIT-PREP. The filename
is
/u/jar/r3rs.dvi
- Jonathan
∂04-Jun-86 0554 @MC.LCS.MIT.EDU:JMILLER@OZ.AI.MIT.EDU Re: portability
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 4 Jun 86 05:53:58 PDT
Received: from OZ.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 4 JUN 86 08:52:11 EDT
Date: 4 Jun 1986 08:51-EDT
Sender: JMILLER@MIT-OZ
Subject: Re: portability
From: JMILLER@MIT-OZ
Reply-To: JMiller%OZ@MC
To: RRRS-Authors@MC
Message-ID: <[MIT-OZ] 4-Jun-86 08:51:16.JMILLER>
In-Reply-To: <[MX.LCS.MIT.EDU].924086.860603.JAR>
Well, I agree in principle with all that was said. But I think
you have missed one important point: it is not possible, even
with all the care in the world, to write portable code in the
current design. I don't want to contort the language design in
any way (and neither of my suggestions do that) but I DO want
some statement which makes the possibility of portable code
feasible.
I urge you to think, again, about including some formal and
mutually agreeable statement which limits the implementors choice
of names for special forms. I believe that this is the sole
requirement necessary to permit a person intent on writing a
totally portable program to succeed.
--Jim
∂04-Jun-86 1049 @MC.LCS.MIT.EDU:Asrivastava%ti-csl.csnet@CSNET-RELAY.ARPA Re: SCOOPS source
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 4 Jun 86 10:49:32 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 4 Jun 86 13:44:00 EDT
Received: from ti-csl by csnet-relay.csnet id ac10705; 4 Jun 86 13:37 EDT
Received: by tilde id AA07924; Wed, 4 Jun 86 11:55:29 cdt
Date: Wed 4 Jun 86 11:47:42-CDT
From: Amitabh Srivastava <Asrivastava%ti-csl.csnet@CSNET-RELAY.ARPA>
Subject: Re: SCOOPS source
To: scheme%mc.lcs.mit.edu@CSNET-RELAY.ARPA
Cc: Asrivastava%ti-csl.csnet@CSNET-RELAY.ARPA
In-Reply-To: <12211940524.20.ASRIVASTAVA@CSC60>
Message-Id: <12212161685.28.ASRIVASTAVA@CSC60>
I am sorry - our systems people blew it. BBNA does not allow
user anonymous. The sources are available on host UTEXAS-20
in the directory ps:<g.ti.scoops> . Use anonymous ftp to get the
sources.
Initially, ftp the file README.SCM . It contains list of the
files needed and other information. The sources have been modified
and are totally in TI Scheme.
Again, my apologies for this confusion.
- amitabh
-------
∂04-Jun-86 1623 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA Re: portability
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 4 Jun 86 16:23:39 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 4 Jun 86 19:23:00 EDT
Received: from tektronix by csnet-relay.csnet id ae02282; 4 Jun 86 18:58 EDT
Received: by tektronix.TEK (5.31/6.14)
id AA25894; Wed, 4 Jun 86 09:46:37 PDT
Received: by tekchips (5.31/5.14)
id AA28499; Wed, 4 Jun 86 09:51:05 PDT
Message-Id: <8606041651.AA28499@tekchips>
To: JMiller%OZ@MC.LCS.MIT.EDU
Cc: RRRS-Authors@MC.LCS.MIT.EDU
Subject: Re: portability
In-Reply-To: Your message of 4 Jun 1986 08:51-EDT.
<[MIT-OZ] 4-Jun-86 08:51:16.JMILLER>
Date: 04 Jun 86 09:51:03 PDT (Wed)
From: willc%tekchips.tek.csnet@CSNET-RELAY.ARPA
Jim Miller writes:
>I urge you to think, again, about including some formal and
>mutually agreeable statement which limits the implementors choice
>of names for special forms. I believe that this is the sole
>requirement necessary to permit a person intent on writing a
>totally portable program to succeed.
Suppose every implementation of Scheme were required to supply a
"vanilla" mode in which all reserved words are among those that
appear in the report?
Peace, Will
∂05-Jun-86 0546 @MC.LCS.MIT.EDU:JMILLER@OZ.AI.MIT.EDU Re: portability
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 5 Jun 86 05:46:24 PDT
Received: from OZ.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 5 JUN 86 08:43:44 EDT
Date: 5 Jun 1986 08:42-EDT
Sender: JMILLER@MIT-OZ
Subject: Re: portability
From: JMILLER@MIT-OZ
Reply-To: JMiller%OZ@MC
To: RRRS-Authors@MC
Message-ID: <[MIT-OZ] 5-Jun-86 08:42:33.JMILLER>
In-Reply-To: <8606041651.AA28499@tekchips>
I'd be happy with Will's suggestion, and it does make the writing
of portable code considerably easier than my suggestion. I'm
only concerned that this may require unanimous consent. I
believe that the MIT system already includes the necessary hooks
(we would supply an RRRS-Essential syntax table).
--Jim
∂05-Jun-86 0935 @MC.LCS.MIT.EDU:dfried%indiana.csnet@CSNET-RELAY.ARPA Will's proposal
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 5 Jun 86 09:34:51 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 5 Jun 86 12:34:17 EDT
Received: from indiana by csnet-relay.csnet id a007465; 5 Jun 86 12:21 EDT
Date: Wed, 4 Jun 86 23:44:17 est
From: Dan Friedman <dfried%indiana.csnet@CSNET-RELAY.ARPA>
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: Will's proposal
We are satisfied with Will's proposal re "set!".
Dan
∂05-Jun-86 0939 @MC.LCS.MIT.EDU:dfried%indiana.csnet@CSNET-RELAY.ARPA named-lambda and rec
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 5 Jun 86 09:39:00 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 5 Jun 86 12:34:21 EDT
Received: from indiana by csnet-relay.csnet id aa07465; 5 Jun 86 12:21 EDT
Date: Wed, 4 Jun 86 23:47:27 est
From: Dan Friedman <dfried%indiana.csnet@CSNET-RELAY.ARPA>
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: named-lambda and rec
Jinx recently suggested that he could live without either.
I second jinx's suggestion.
Dan
∂05-Jun-86 1055 @MC.LCS.MIT.EDU:CPH@AI.AI.MIT.EDU named-lambda and rec
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 5 Jun 86 10:55:38 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 5 JUN 86 13:54:39 EDT
Date: Thu, 5 Jun 86 13:54:25 EDT
From: Chris Hanson <CPH@AI.AI.MIT.EDU>
Subject: named-lambda and rec
To: dfried%indiana.csnet@CSNET-RELAY.ARPA
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Wed 4 Jun 86 23:47:27 est from Dan Friedman <dfried%indiana.csnet at CSNET-RELAY.ARPA>
Message-ID: <[AI.AI.MIT.EDU].52205.860605.CPH>
Date: Wed, 4 Jun 86 23:47:27 est
From: Dan Friedman <dfried%indiana.csnet at CSNET-RELAY.ARPA>
Jinx recently suggested that he could live without either.
I second jinx's suggestion.
I `third' it.
∂06-Jun-86 0800 @MC.LCS.MIT.EDU:JAR%MX.LCS.MIT.EDU@MC.LCS.MIT.EDU portability
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 6 Jun 86 08:00:02 PDT
Received: from MX.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 6 JUN 86 10:59:40 EDT
Date: Fri, 6 Jun 86 10:59:26 EDT
From: Jonathan A Rees <JAR%MX.LCS.MIT.EDU@MC.LCS.MIT.EDU>
Subject: portability
To: JMiller@OZ.AI.MIT.EDU
cc: RRRS-Authors@MC.LCS.MIT.EDU
In-reply-to: Msg of 5 Jun 1986 08:42-EDT from JMILLER at MIT-OZ
Message-ID: <[MX.LCS.MIT.EDU].924918.860606.JAR>
I would say that a strict reading of the new draft, and perhaps even of
the RRRS, would say that ANY identifier other than those explicitly
listed as syntactic keywords (reserved words) may be used as a variable.
In other words, a correct implementation of the report would already
have the property that there are no other special forms other than the
ones explicitly listed in the report (the complete list is somewhere
inside the BNF). So that a program which does (define trace ...) or
(let ((loop ...)) ... (loop ...) ...) would already be portable. The
addition of ANY special form is an incompatible change to Scheme.
[Actually, if in a particular implementation special-form-ness is
cancelled out by DEFINE and lambda-binding, then it would probably be OK
in that implementation to have extra special forms/macros lying around,
since a program which used those identifiers for variables would still
be correct. But let's not think about this possibility.]
I wouldn't say that all implementations would have to start up with the
stripped-down syntax, omitting all their favorite features, but I think
that supplying a mode in which this was the case, rather than saying
only a certain class of identifiers can be used as variables, is the
right thing.
Would any implementors have any problem providing a report-syntax-only
mode? I know this is trivial in MIT Scheme and T, but we haven't heard
from other implementors.
If there are problems, then one way to cope would be to add to the
report's list of syntactic keywords some or all of the things which such
implementations would like to have be special forms, e.g. define-macro,
trace, make-environment, etc., simply saying that these are reserved for
use by particular implementations as syntactic keywords, but have no
meaning according to the report. This is sort of the dual of Jim's
original suggestion. It's pretty gross, but I thought I'd mention it.
How should this situation be explained in the report, if at all?
Jonathan
∂06-Jun-86 0806 @MC.LCS.MIT.EDU:dfried%indiana.csnet@CSNET-RELAY.ARPA add1 and sub1
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 6 Jun 86 08:06:06 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 6 Jun 86 11:05:34 EDT
Received: from indiana by csnet-relay.csnet id aa00907; 6 Jun 86 11:04 EDT
Date: Fri, 6 Jun 86 09:57:13 est
From: Dan Friedman <dfried%indiana.csnet@CSNET-RELAY.ARPA>
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: add1 and sub1
When describing arithmetic I find the symbols "1+" and
"-1+" very harmful. The function + is denoted by the
symbol "+" and this confuses people who are trying to
understand the primitive recursive definition of +.
Purely for pedagogical reasons I would like to see "add1"
and "sub1" be optional. I know that macscheme & PC-Scheme
have included them. I don't like multiple names for the
same construct, but we have a few instances already in the
report.
Dan
∂06-Jun-86 1039 @MC.LCS.MIT.EDU:CPH@AI.AI.MIT.EDU add1 and sub1
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 6 Jun 86 10:39:37 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 6 JUN 86 13:38:58 EDT
Date: Fri, 6 Jun 86 13:38:45 EDT
From: Chris Hanson <CPH@AI.AI.MIT.EDU>
Subject: add1 and sub1
To: dfried%indiana.csnet@CSNET-RELAY.ARPA
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Fri 6 Jun 86 09:57:13 est from Dan Friedman <dfried%indiana.csnet at CSNET-RELAY.ARPA>
Message-ID: <[AI.AI.MIT.EDU].52665.860606.CPH>
Date: Fri, 6 Jun 86 09:57:13 est
From: Dan Friedman <dfried%indiana.csnet at CSNET-RELAY.ARPA>
When describing arithmetic I find the symbols "1+" and
"-1+" very harmful.
Purely for pedagogical reasons I would like to see "add1"
and "sub1" be optional.
Another alternative might be to make `1+' and `-1+' optional, since
they aren't necessary in any sense. Then there would be no need to
describe them to students at all.
In fact, there's no need to teach them even if they are essential.
∂06-Jun-86 2038 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA Re: portability
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 6 Jun 86 20:38:22 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 6 Jun 86 16:25:39 EDT
Received: from ti-csl by csnet-relay.csnet id ad03178; 6 Jun 86 16:24 EDT
Received: by tilde id AA18136; Fri, 6 Jun 86 14:06:53 cdt
Date: Fri 6 Jun 86 13:55:31-CDT
From: David Bartley <Bartley%ti-csl.csnet@CSNET-RELAY.ARPA>
Subject: Re: portability
To: JAR%MX.LCS.MIT.EDU%mc.lcs.mit.edu@CSNET-RELAY.ARPA,
JMiller%oz.ai.mit.edu@CSNET-RELAY.ARPA
Cc: RRRS-Authors%mc.lcs.mit.edu@CSNET-RELAY.ARPA, Bartley%TI-CSL@a
In-Repl <[MX.LCS.MIT.EDU].924918.860606.JAR>
Message-ID: <12212709243.41.BARTLEY@CSC60>
From JAR:
>I would say that a strict reading of the new draft, and perhaps even of
>the RRRS, would say that ANY identifier other than those explicitly
>listed as syntactic keywords (reserved words) may be used as a variable.
>In other words, a correct implementation of the report would already
>have the property that there are no other special forms other than the
>ones explicitly listed in the report (the complete list is somewhere
>inside the BNF). So that a program which does (define trace ...) or
>(let ((loop ...)) ... (loop ...) ...) would already be portable. The
>addition of ANY special form is an incompatible change to Scheme.
Several implementations, including Chez Scheme, PC Scheme, and
Scheme-84, allow user-specified syntactic extensions. I doubt if we
could get a consensus that this is to be disallowed. When you (JAR)
speak of special forms, are you including macros and the like?
>[Actually, if in a particular implementation special-form-ness is
>cancelled out by DEFINE and lambda-binding, then it would probably be OK
>in that implementation to have extra special forms/macros lying around,
>since a program which used those identifiers for variables would still
>be correct. But let's not think about this possibility.]
Is there an alternative possibility?
(This paragraph seems to say that you are speaking of macros as well
as special forms.)
Regards,
David Bartley
-------
∂07-Jun-86 1658 @MC.LCS.MIT.EDU:dfried%indiana.csnet@CSNET-RELAY.ARPA macros.
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 7 Jun 86 16:58:00 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 7 Jun 86 19:49:27 EDT
Received: from indiana by csnet-relay.csnet id a005487; 7 Jun 86 19:00 EDT
Date: Sat, 7 Jun 86 15:25:24 est
From: Dan Friedman <dfried%indiana.csnet@CSNET-RELAY.ARPA>
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: macros.
Our programming relies heavily on the safe use of macros.
No one here would be willing to remove the option of having
them in the language.
Dan
∂07-Jun-86 1820 @MC.LCS.MIT.EDU:adams%tekchips.tek.csnet@CSNET-RELAY.ARPA Re: named-lambda and rec
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 7 Jun 86 18:19:56 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 7 Jun 86 21:18:13 EDT
Received: from tektronix by csnet-relay.csnet id ad00288; 7 Jun 86 1:47 EDT
Received: by tektronix.TEK (5.31/6.14)
id AA19278; Fri, 6 Jun 86 09:06:33 PDT
Received: by tekchips (5.31/5.14)
id AA26553; Fri, 6 Jun 86 09:11:02 PDT
Date: Fri, 6 Jun 86 09:11:02 PDT
From: Norman Adams <adams%tekchips.tek.csnet@CSNET-RELAY.ARPA>
Message-Id: <8606061611.AA26553@tekchips>
Subject: Re: named-lambda and rec
To: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: Dan Friedman <dfried%indiana.csnet@csnet-relay.arpa>, Wed, 4 Jun 86 23:47:27 est
I too would prefer to see both NAMED-LAMBDA and REC removed.
-Norman
-------
∂07-Jun-86 1829 @MC.LCS.MIT.EDU:dyb%indiana.csnet@CSNET-RELAY.ARPA Re: add1 and sub1
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 7 Jun 86 18:29:40 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 7 Jun 86 21:19:58 EDT
Received: from indiana by csnet-relay.csnet id a003864; 7 Jun 86 13:46 EDT
Date: Fri, 6 Jun 86 15:43:12 est
From: Kent Dybvig <dyb%indiana.csnet@CSNET-RELAY.ARPA>
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: Re: add1 and sub1
Another alternative might be to make `1+' and `-1+' optional, since
they aren't necessary in any sense. Then there would be no need to
describe them to students at all.
These are already innessential, in both RRRS and the draft RRRRS.
Chez Scheme will support add1 and sub1 for Dan (and the Little LISPer),
but I don't care if they appear in the report or not. I will also support
1- as an alternative for -1+; if ever there was a gratuitous difference
from Common Lisp, -1+ is it. Actually, I'd prefer flushing 1+ and -1+
from the report, but it doesn't seem worth worrying about.
∂08-Jun-86 1652 @MC.LCS.MIT.EDU:Swenson.Multics@MIT-MULTICS.ARPA Re: SCOOPS source
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 8 Jun 86 16:52:36 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 8 Jun 86 19:47:59 EDT
Received: from mit-multics.arpa by CSNET-RELAY.ARPA id a006158;
8 Jun 86 19:45 EDT
Acknowledge-To: "Eric J. Swenson" <Swenson@MIT-MULTICS.ARPA>
Date: Sun, 8 Jun 86 19:35 EDT
From: "Eric J. Swenson" <Swenson@MIT-MULTICS.ARPA>
Subject: Re: SCOOPS source
To: Amitabh Srivastava <Asrivastava%ti-csl.csnet@CSNET-RELAY.ARPA>
cc: scheme%mc.lcs.mit.edu@CSNET-RELAY.ARPA
In-Reply-To: Message of 3 Jun 86 16:32 EDT from "Amitabh Srivastava"
Message-ID: <860608233557.811290@MIT-MULTICS.ARPA>
Are you certain BBNA supports anonymous FTP? I repeatedly get rejected
when attempting to "login anonymous" with an error indicating that there
is no such user as "anonymous."
∂09-Jun-86 1643 @MC.LCS.MIT.EDU:JAR%MX.LCS.MIT.EDU@MC.LCS.MIT.EDU portability
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 9 Jun 86 16:43:34 PDT
Received: from MX.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 9 JUN 86 19:43:14 EDT
Date: Mon, 9 Jun 86 19:27:34 EDT
From: Jonathan A Rees <JAR%MX.LCS.MIT.EDU@MC.LCS.MIT.EDU>
Subject: portability
To: Bartley%ti-csl.csnet@CSNET-RELAY.ARPA
cc: RRRS-AUTHORS@MX.LCS.MIT.EDU
Message-ID: <[MX.LCS.MIT.EDU].925333.860609.JAR>
OK, my message seems to have confused a lot of people. I'll try to be
clearer. For the purposes of this message I'll only consider
system-supplied special form types, not user-supplied ones, although the
problems are I think the same.
Jim Miller said originally that he didn't see any way to write portable
programs which used variables, because implementations were free to
preempt arbitrary variable names for use as syntactic keywords. I just
wanted to reply that on the contrary, the report is clear on what the
set of allowable variable names is. The BNF describes a <variable> as
being any <identifier> which isn't a <syntactic keyword>, and the
<syntactic keywords> are enumerated. E.g. according to my reading of
the report, the sequence
(define block (lambda (x) (extend x 3)))
(define extend (lambda (a b) (list b a)))
(block 1)
has a perfectly well-defined meaning: BLOCK and EXTEND are variable
names (unconditionally!); these names become bound to values; the value
of BLOCK is applied to the number 1; etc. I didn't see anything in the
report which allowed any implementation to assign any other meaning to
this program fragment. Any implementation which did something different
with this code fragment (e.g., T, which has BLOCK-expressions, and
independent namespaces for variables and keywords) would not be
implementing the language described in the report.
I don't think this is a departure from the previous report, although of
course my edits have made the *description* follow my world view more
closely.
The way so-called "syntactic extensions" usually (not always) work,
however, is that they pre-empt certain identifiers for use as variable
names. E.g. an implementation might make BLOCK or EXTEND unavailable.
Or, worse, the variables remain available, but expressions whose cars
are these names are no longer treated as procedure calls. Then the
above program wouldn't have the expected meaning. I say that such
modifications to the language aren't syntactic extensions, since they
incompatibly change the meanings of programs, rather than just defining
what would otherwise be an error situation.
If the implementation is clever enough that program fragments like these
still work, i.e. the extensions are only seen when the variable is
undefined (a situation which would otherwise be an error), then that's
fine, but I don't think that's how most scheme implementations out there
actually implement their additional special form types. (Correct me if
I'm wrong. Consider forward references.)
Implementations can support macros (they can also support Algol 60 mode,
or any other incompatible change, if they want -- it's not as if it's a
sin to program in something other than reportified-scheme), so long as
there's some way to run programs written in the language described in
the report. Several existing implementations are already structured to
make it easy to support multiple such modes or incompatible dialects; so
what's the big deal?
In short: why should the report say anything at all about this issue?
To warn implementors not to do the wrong thing?
Do we want to change the report to explicitly ALLOW the preemption of
arbitrary variable names? I think Jim's question originated from a
belief that implementations were free to do this and still claim to be
adhering to the report. I think that's absurd. How should the report's
examples, much less portable programs in general, be written in that
case?
Jonathan
∂10-Jun-86 0744 @MC.LCS.MIT.EDU:dyb%indiana.csnet@CSNET-RELAY.ARPA Re: portability
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 10 Jun 86 07:44:19 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 10 Jun 86 10:40:50 EDT
Received: from indiana by csnet-relay.csnet id a005144; 10 Jun 86 10:36 EDT
Date: Tue, 10 Jun 86 01:43:10 est
From: Kent Dybvig <dyb%indiana.csnet@CSNET-RELAY.ARPA>
To: bartley%ti-csl.csnet@CSNET-RELAY.ARPA, jar@MC.LCS.MIT.EDU
Subject: Re: portability
Cc: rrrs-authors@MC.LCS.MIT.EDU
I don't think this issue is as cut and dried as all that. Jonathan
is right on the one hand; it is ``absurd'' to write portable programs
if any identifier might be taken away by a particular implementation.
However, it is not clear to me what the most practical solution is
at this point for systems that have additional special forms or user-
defined macros. It is certainly not practical to stay away from all
special forms but those appearing in the report. Nor is it practical
to invalidate a macro when a binding is found; as Jonathan points
out, forward references become a problem. Perhaps it is practical to
complain when a binding is found; this does not allow portable code
but it does provide some level of sanity. And I'm not sure it is
practical to have a "vanilla" mode; although the issue is worthy of
consideration, what happens when someone wants a basically portable
piece of code to use a system-specific special form?
If I had to take a stand one way or another, I would probably favor
a more liberal definition of keyword---rather than saying that all
of the keywords are enumerated in the report, I would allow for the
inclusion of additional keywords by any particular implementation,
with the requirement that any implementation must provide a warning
when a keyword is used as a variable. Writing portable code would
be an iterative process, but it would be relatively painless.
But I don't really want to take a stand at this point. I would
rather leave this topic, along with the whole topic of macros, out of
the report. That way we could experiment with various ways of doing
things and at some point agree on the most practical way of dealing
with the situation.
(I was going to suggest that we require keywords to begin with an
upper-case letter so that portable code could be written by employing
only lower-case variable names, but I remembered that Scheme is case-
insensitive. Sigh...)
Kent
∂11-Jun-86 1021 @MC.LCS.MIT.EDU:TIM%upenn.csnet@CSNET-RELAY.ARPA Scheme for AI based CAI
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 11 Jun 86 10:21:30 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 11 Jun 86 13:16:10 EDT
Received: from [1100455600] by CSNET-RELAY.ARPA id ac01092; 11 Jun 86 13:05 EDT
From: Tim Finin <Tim%upenn.csnet@CSNET-RELAY.ARPA>
Subject: Scheme for AI based CAI
To: scheme%mc.lcs.mit.edu@CSNET-RELAY.ARPA
Date: Wed, 11 Jun 86 12:59 EDT
What follows is a msg from Mark Richer via the AIED digest concerning the
use of Scheme for building AI based educational systems. I've included my
response. Others may have relevant thoughts to share with him.
Tim
--------------------------------------------------------------------------
From: Mark Richer <RICHER@SUMEX-AIM.ARPA> on Wed 11 Jun 1986 at 12:00
To: ai-ed-outgoing@SUMEX-AIM.ARPA
Subj: 1:8 Scheme; AI-ED questionnaire
AI-ED Digest Tuesday, 10 June 1986 Volume 1 : Issue 8
Today's Topics: Scheme, anyone?
AI and Education questionnaire
Date: Tue 10 Jun 86 08:29:38-PDT
From: Mark Richer <RICHER@SUMEX-AIM.ARPA>
Subject: Scheme, anyone?
I have been asked to give advice regarding the appropriateness of using
Scheme for a development effort in Intelligent Computer Assisted Instruction.
Although this is partly a research effort also, a clear goal is testing
and installing the software in high school classrooms. The hardware available
to this project is HP workstations.
Admittedly I know little about Scheme. However, my initial reaction is that
no advantages Scheme could provide over CommonLisp could offset the
disadvantages of using a language without a large user base for the
purposes of software development and installation. CommonLisp
promises to offer portability (of course there are still problems, e.g.,
graphics) and a large user community, and has other obvious advantages
because of the general acceptance of Lisp in the U.S. AI community.
I'd appreciate some feedback from people that are familiar with Scheme,
particularly if you have used it for developing a large AI-based system.
Can any argument be presented to justify the resources necessary to train
people in Scheme and build and maintain a system in this UnCommonLispLike
language? In other words, what is so special about Scheme compared to
CommonLisp?
Mark
... rest of digest deleted ...
-------------------------------------------------------------------------
From: Tim Finin <Tim@upenn> on Wed 11 Jun 1986 at 12:49
To: Mark Richer <RICHER@SUMEX-AIM>
Cc: Bonnie Webber <bonnie@upenn>, Ai Bulletin Board <scheme@upenn>
Subj: Scheme
Here are some thought on Scheme vs. CommonLisp. We use Common Lisp in our
research efforts (mostly) and Scheme as an instructional language. We are
using it in both our graduate and undergraduate programs in the core
software/programming languages courses.
Scheme is Lisp. More precisely, Scheme is what Lisp should be modulo some
software engineering arguments. I think that the biggest influence on the
development of Common Lisp was the success of Scheme as a language. The
differences between common Lisp and scheme, as programming languages, at
this point, are mostly surface level phenomina. Common Lisp does have a
much much bigger base of existing software, however.
Scheme will be the Pascal of the 90's. Scheme is fairly standardized. There
are a number of good implementations (CScheme, PC-Scheme, Chez Scheme,
MacScheme) and all ashere to the unofficial standard (The Revised Revised
Report on Scheme). I think it will be used in most of the good CS
undergraduate programs in a few years to teach basic concepts of
programming. Common Lisp, I believe, will not be used in this way. Thus,
you can expect to see an increasing "user base".
Scheme is simple. Scheme is inherently simpler and smaller than common lisp.
There is some truth to the equation of sheme/commonlisp = pascal/ada. I
think Scheme will be a beter deliverey vehicle for AIED systems. It will be
hard to sell these systems if they need an HP Bobcat or a Vaxstation to run
them. It will be easy to sell them if they run on a PC or a MAC.
I hope these thought are relevant. Tim.
∂11-Jun-86 1145 @MC.LCS.MIT.EDU:FAHLMAN@C.CS.CMU.EDU Scheme for AI based CAI
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 11 Jun 86 11:45:20 PDT
Received: from C.CS.CMU.EDU by MC.LCS.MIT.EDU 11 Jun 86 14:40:44 EDT
Received: ID <FAHLMAN@C.CS.CMU.EDU>; Wed 11 Jun 86 14:37:45-EDT
Date: Wed, 11 Jun 1986 14:37 EDT
Message-ID: <FAHLMAN.12214016709.BABYL@C.CS.CMU.EDU>
Sender: FAHLMAN@C.CS.CMU.EDU
From: "Scott E. Fahlman" <Fahlman@C.CS.CMU.EDU>
To: Tim Finin <Tim%upenn.csnet@CSNET-RELAY.ARPA>
Cc: scheme@MC.LCS.MIT.EDU
Subject: Scheme for AI based CAI
I've been involved pretty deeply in the Common Lisp design effort for
several years. For what it's worth, I agree with most of what Tim Finin
said about Common Lisp vs. Scheme for education. Common Lisp has a lot
of ugly things in it that are there for compatibility with older Lisps,
for efficiency on certain machines, and for support of large systems.
There are a lot of features built into Common Lisp that increase the
conceptual load on the first-time user, but that are valuable for the
experienced user who has to do a big job in a hurry.
Scheme is smaller, cleaner, and more willing to break with some of the
bad ideas of the past. I would use Common Lisp for any really big job,
especially if it needs to be portable to a lot of machines. At some
point, if I were training students to go out into the world and design
intelligent systems, I'd make sure that they were exposed to Common
Lisp. But for teaching the fundamental principles of Computer Science,
Scheme provides equal or better support, with many fewer distracting
features and mis-features.
I think that students trained in Scheme would have no trouble learning
Common Lisp later, though it would be useful to warn them about the
separate function and value namespaces in Common Lisp before they get
too used to Scheme's way of doing things. And I'd try not to present
Scheme in such a way that the students will be too pure to deal with a
"dirty" language like Common Lisp when the time comes. Some of that
dirt is there for a reason, and the rest is the price we had to pay to
make Common Lisp a widely agreed-upon standard.
In the long run, I don't think that the need for a larger machine to run
Common Lisp will matter: the only real difference in resource needs is
that Common Lisp needs a couple of megabytes more than Scheme (either
real or virtual memory will do) to hold the full language, and that
difference tends to wash out once megabit memory chips start turning up
as the prize in Cracker Jacks. But for the next year or two, the choice
on the smallest machines will be between a full Scheme and a very
stripped down Common Lisp, and under those conditions Scheme wins.
I hope that Scheme won't become the Pascal of the 90's. I hate Pascal.
-- Scott Fahlman
∂13-Jun-86 0956 @MC.LCS.MIT.EDU:mmeyer%tilde%ti-csl.csnet@CSNET-RELAY.ARPA Revised↑3 Draft Comment
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 13 Jun 86 09:54:35 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 13 Jun 86 12:33:09 EDT
Received: from ti-csl by csnet-relay.csnet id ao20650; 13 Jun 86 12:26 EDT
Received: by tilde id AA27555; Fri, 13 Jun 86 10:44:00 cdt
Date: Fri, 13 Jun 86 10:44:00 cdt
From: Mark Meyer <mmeyer%tilde%ti-csl.csnet@CSNET-RELAY.ARPA>
To: RRRS-authors%mit-mc@CSNET-RELAY.ARPA
Subject: Revised↑3 Draft Comment
Cc: mmeyer%ti-csl.csnet@CSNET-RELAY.ARPA
In going over the grammar in the Revised↑3 Report for numbers in
Scheme, I noticed a possible omission. According to the production
<ureal R> --> <prefix R> <digit R>+ #* / <digit R>+ #* <suffix>
the production of rationals, 1/2e3 is legal syntax while 1e3/2 is not.
Shouldn't the production be amended to
<ureal R> -->
<prefix R> <digit R>+ #* <suffix> / <digit R>+ #* <suffix>
so that the numerator as well as the denominator may carry a suffix?
In that case, 1/2e3 would mean 1/2000 and 1e3/2 would be 1000/2 (=500).
Mark Meyer
(mmeyer@ti-csl)
∂15-Jun-86 1251 @MC.LCS.MIT.EDU:cth%indiana.csnet@CSNET-RELAY.ARPA Logic Continuations (Abstract)
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 15 Jun 86 12:51:40 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 15 Jun 86 15:47:20 EDT
Received: from indiana by csnet-relay.csnet id ah03896; 15 Jun 86 15:44 EDT
Date: Sun, 15 Jun 86 11:44:22 est
From: Chris Haynes <cth%indiana.csnet@CSNET-RELAY.ARPA>
To: scheme@MC.LCS.MIT.EDU
Subject: Logic Continuations (Abstract)
The following abstract of a paper, to be delivered at the Third International
Conference on Logic Programming (London, July 1986), may be of interest to the
Scheme community. The paper is also available as Indiana University Computer
Science Department Technical Report No. 183, and is to appear in The Journal
of Logic Programming in a somewhat revised from.
Logic Continuations
by Christopher Haynes
We develop a `complete' embedding of logic programming into Scheme---a
lexically scoped Lisp dialect with first-class continuations. Logic
variables are bound in the Scheme environment and the success and failure
continuations are represented as Scheme continuations. To account for the
semantics of logic variables and failure continuations, the state-space model
of control is modified in a novel way that generalizes the trail mechanism.
This assures that logic variable bindings are properly restored when
continuations are invoked to perform `lateral' control transfers that are not
possible in a traditional logic programming context. It is thereby possible
to obtain greater control over logic program behavior by using continuations
as first-class objects.
∂17-Jun-86 1621 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA Number syntax
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 17 Jun 86 16:20:57 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 17 Jun 86 19:19:56 EDT
Received: from ti-csl by csnet-relay.csnet id ao17298; 17 Jun 86 18:51 EDT
Received: by tilde id AA27184; Tue, 17 Jun 86 17:08:11 cdt
Date: Tue 17 Jun 86 16:00:31-CDT
From: David Bartley <Bartley%ti-csl.csnet@CSNET-RELAY.ARPA>
Subject: Number syntax
To: RRRS-Authors%mit-mc@CSNET-RELAY.ARPA
Cc: Bartley%ti-csl.csnet@CSNET-RELAY.ARPA
Message-Id: <12215615581.31.BARTLEY@CSC60>
One irritant in the Report that we have neglected to comment on until
now (sorry!) is the syntax of numbers. We believe that Scheme numbers
are essentially equivalent to Common Lisp numbers except for the new
notion of exactness. To the extent that that is so, it seems to be a
(shudder!) ``gratuitous difference'' from Common Lisp to have an
incompatible syntax.
The R↑3RS doesn't make clear which subset of the syntax of numbers is
essential and what is optional. As implementors of systems in which
Scheme and Common Lisp must co-exist, we're faced with two potential
compatibility issues: (1) going with an ``extended subset'' of the
Report's number syntax that is compatible with Common Lisp, or (2)
going with the full number syntax in the Report to be compatible with
all other Scheme implementations.
What we'd like to see is an essential syntax for numbers which is
compatible with Common Lisp's. Additional features, including
exactness, would be optional extensions. Even so, they should not
conflict with Common Lisp. For example, the use of `#s' and the order
of <sign> and <prefix> are different in the two languages.
Our motivation, of course, is that we'd like programmers to feel free to
use either language and exchange files of data without irritating
obstacles being thrown in their path. If we can't agree on a
consistent syntax for numbers, then we'll have to provide each language
with two readers and the user will have to know which one to use.
(There are other problems, of course, such as whether `:' is a
constituent of an identifier or associated with Common Lisp package
designations. We may have to go with separate readers/modes anyway.)
Does anyone agree with us? Is there time to make such a change before
R↑3RS goes to press?
Regards,
David Bartley,
Mark Meyer
-------
∂17-Jun-86 1909 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Number syntax
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 17 Jun 86 19:09:05 PDT
Received: from MX.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 17 JUN 86 21:46:55 EDT
Received: from AI.AI.MIT.EDU by MX.LCS.MIT.EDU via Chaosnet; 17 JUN 86 21:46:13 EDT
Date: Tue, 17 Jun 86 21:44:45 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Number syntax
To: Bartley%ti-csl.csnet@CSNET-RELAY.ARPA
cc: RRRS-Authors@MX.LCS.MIT.EDU
In-reply-to: Msg of Tue 17 Jun 86 16:00:31-CDT from David Bartley <Bartley%ti-csl.csnet at CSNET-RELAY.ARPA>
Message-ID: <[AI.AI.MIT.EDU].58406.860617.JAR>
Date: Tue 17 Jun 86 16:00:31-CDT
From: David Bartley <Bartley%ti-csl.csnet at CSNET-RELAY.ARPA>
Does anyone agree with us? Is there time to make such a change before
R↑3RS goes to press?
I agree with you, but I don't have anything at stake. If we can come to
an agreement to change, I'd be happy to make the change.
As far as time goes, I have yet to call Wexelblat again to find out the
next deadline, buI imagine it will be the first week of July (for the
September issue). I need to get a clean copy out to everyone at least,
say, 10 days before SIGPLAN's deadline, so that means we should try to
get stability by circa June 25. I'll aim for that, but of course my aim
has not been good in the past.
Jonathan
∂17-Jun-86 1912 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Policy on change-making
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 17 Jun 86 19:10:31 PDT
Received: from MX.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 17 JUN 86 22:10:52 EDT
Received: from AI.AI.MIT.EDU by MX.LCS.MIT.EDU via Chaosnet; 17 JUN 86 22:10:08 EDT
Date: Tue, 17 Jun 86 22:08:58 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Policy on change-making
To: rrrs-authors@MX.LCS.MIT.EDU
Message-ID: <[AI.AI.MIT.EDU].58425.860617.JAR>
A number of suggestions for incompatible changes are currently on the
floor. Before I start polling y'all about these various questions
(mostly removals), I would like to see if we can reach concensus on what
our policy should be for making such incompatible changes. I think the
policy we adopt will bear on the changes we decide we want to make.
Questions that should be answered:
- How radical ought we to be? That is, how important is compatibility with
last summer's report?
- Given that there will be incompatible changes, how should these be
indicated in the report? Should I clutter the main text with little
notes; should I make a list of all the changes; if I make such a list,
where should it appear --- in the "notes" section, in the introduction,
somplace else? Should the list include rationales
I guess my current bias is either to omit the list entirely or relegate
it to the notes section, in pursuit of a "crisper" [Dan Friedman's word]
document. However, I again have nothing at stake, and don't care too
much, so people with real implementations should speak up.
Changes and removals (as opposed to clarifications or extensions) so far
agreed upon include the omission of the "object table" chapter, the
omission of all the #!foo constants, and the change in meaning of
(define (foo ...) ...) [from using named-lambda to using lambda]. We
have already decided on some others, and may decide on others still, in
the coming weeks.
What other documents do: The Revised Report on Scheme has pretty
thorough notes about how the language changed, with complete rationales.
The revised Algol 60 report merely enumerates, in a footnote, the
section numbers of sections that were changed at the 1962 conference.
The Algol 68 report has a comparison with Algol 60 (3 pages) as part of
its introduction, and the Revised Algol 68 report also has a comparison
with the non-revised Algol 68 report (4 pages).
Jonathan
∂18-Jun-86 2144 @MC.LCS.MIT.EDU:dyb%indiana.csnet@CSNET-RELAY.ARPA Re: Number syntax
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 18 Jun 86 21:44:39 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 19 Jun 86 00:44:37 EDT
Received: from indiana by csnet-relay.csnet id ac01244; 19 Jun 86 0:38 EDT
Date: Wed, 18 Jun 86 17:53:13 est
From: Kent Dybvig <dyb%indiana.csnet@CSNET-RELAY.ARPA>
To: bartley%ti-csl.csnet@CSNET-RELAY.ARPA, jar@MC.LCS.MIT.EDU
Subject: Re: Number syntax
Cc: rrrs-authors@MC.LCS.MIT.EDU
I'm all for the modifications David and Mark suggest...the same issues
have been annoying me, although I have no stake in Common Lisp. I
suggest that David send out another letter with the wording/syntax he
wants to make things easier for Jonathan.
∂20-Jun-86 0202 @MC.LCS.MIT.EDU:JINX@OZ.AI.MIT.EDU Policy on change-making
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 19 Jun 86 20:01:53 PDT
Received: from MX.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 19 JUN 86 23:02:27 EDT
Received: from OZ.AI.MIT.EDU by MX.LCS.MIT.EDU via Chaosnet; 19 JUN 86 23:01:11 EDT
Date: 18 Jun 1986 14:33 EDT (Wed)
Message-ID: <JINX.12215850914.BABYL@MIT-OZ>
From: Bill Rozas <JINX@OZ.AI.MIT.EDU>
To: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Cc: rrrs-authors@MX.LCS.MIT.EDU
Subject: Policy on change-making
In-reply-to: Msg of 17 Jun 1986 22:08-EDT from Jonathan A Rees <JAR at AI.AI.MIT.EDU>
My feelings:
- Don't be unneccessarily radical, but fix things which are broken,
and change things to reflect the new consensus (if there is one).
- I would like the incompatibilities mentioned in the notes section.
∂23-Jun-86 1412 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Bibliography
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 23 Jun 86 14:12:10 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 23 JUN 86 17:13:15 EDT
Date: Mon, 23 Jun 86 17:11:43 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Bibliography
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <[AI.AI.MIT.EDU].60539.860623.JAR>
I would like to update the "bibliography and references" section of
the report. If you have published new papers on Scheme-related topics
in the past year, or if you will have done so within the next few
weeks, or if you're aware of something which ought to be included,
please send me a complete, accurate reference, or an incomplete
reference and enough information for me to be able to track it down.
Already on my list of things to include are:
- Felleison et al, Reasoning with Continuations (Logic in CS conf)
- Kranz et al, ORBIT compiler (Compiler Construction conf)
- Feeley, Deux approches a l'implantation du langage Scheme (masters
thesis, Montreal)
but I'm sure there are many others.
Also, send your index entry suggestions.
Jonathan
∂26-Jun-86 2114 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Remaining questions & remarks (2)
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 26 Jun 86 21:14:31 PDT
Received: from MX.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 27 JUN 86 00:16:04 EDT
Received: from LIVE-OAK.LCS.MIT.EDU by MX.LCS.MIT.EDU via Chaosnet; 27 JUN 86 00:14:00 EDT
Received: from JOE-LOUIS.LCS.MIT.EDU by MIT-LIVE-OAK.ARPA via CHAOS with CHAOS-MAIL id 3220; Thu 26-Jun-86 19:04:00-EDT
Date: Thu, 26 Jun 86 19:03 EDT
From: Jonathan A Rees <JAR@MIT-AI.ARPA>
Subject: Remaining questions & remarks (2)
To: rrrs-authors@MIT-MC.ARPA
Message-ID: <"860626190326.1.jar@AI"@JOE-LOUIS.LCS.MIT.EDU>
Almost no one answered my query about grandfathering. Think about it
while answering the questions below. I propose listing incompatibilites
in the "notes" section, and otherwise not worrying too much about the
incompatibilities we're introducing. I'll send out a list of known
language changes in a separate message.
Here is the second list of remaining questions and remarks. Some of
these may be duplicates.
1. BEGIN vs. SEQUENCE: this is a pretty glaring ugliness in the report;
it's obvious to the world we couldn't get consensus on this one.
Many people have told me that they don't care which one is there, so
long as there's only one. SEQUENCE was used heavily in S&ICP and
for that reason I think it should be retained; thus the options I
offer are
(a) leave things as they are (BEGIN essential with non-essential
synonym SEQUENCE),
(b) remove BEGIN and make SEQUENCE essential (noting in the Notes
section that BEGIN, like #!TRUE etc., should be supported by
those implementations which care about running code written in
the past year).
Let me know your vote if you haven't done so already.
2. Similarly but less glaringly, we have a problem with the numeric
comparisons. Again, many people have said they don't care but they only
want one set, with or without question marks. Thus I offer
the choices
(a) leave things as they are
(b) flush the alternative names <? <=? >? >=? =?
[The ones without question marks were used in S&ICP; moreover, they
exist in other Lisp dialects. The argument in favor of the ?'s is that
it allows the simple statement: "names of predicates end in question mark".]
Send me your vote.
3. REC and NAMED-LAMBDA :
Again, I sense capitulation on the part of some who have been stubborn.
The only options permitted are:
(a) Keep both
(b) Flush both
My editorial sense is that we should be able to achieve (b). Remember,
the language also doesn't have EVAL, environments, or macros, so if you
want to keep these features please say how they're different from other
"indispensible" features that the language DOESN'T have.
4. SUBSTRING-MOVE-LEFT! and SUBSTRING-MOVE-RIGHT! :
Many people have suggested removing these. Anyone who wants them
retained MUST provide a convincing rationale, for inclusion in the
report. Otherwise I'll remove them.
5. Should we say anything about the possibility of parallel or
interleaved argument evaluation? Remembering something I thought I
heard Will once say, I added the innocent little phrase "or perhaps
in parallel" to the description of procedure calling. Richard
Kelsey quickly pointed out that if it's mentioned as being a
possibly legal implementation, many otherwise valid scheme programs
may fail to run in implementations which do this, because they won't
do necessary synchronization. I agree; this is acceptable only if
we provide synchronization primitives.
6. Number input exactness: two proposals have been advanced to decide whether
a number is exact or inexact if it has no #I or #E prefix and contains no
trailing #'s.
(a) Inexact if there are digits following a decimal point, or if exponential
notation is used. Otherwise exact. (This makes exctness similar to
"floatness" in CL.)
(b) A proposal which Will advanced, which I'm unable to locate right now, so he'll
have to re-send it.
I'll additionally advance another alternative, and you can make up more of
your own:
(c) Always exact. E.g. "1.2" is exact.
7. Must a port still be a port (i.e. answer true to INPUT-PORT? or OUTPUT-PORT?)
after being closed?
8. Apparently there's no difference between ABS and MAGNITUDE. Should we
keep both? If so, should I change the presentation in any way?
9. ANGLE is what Common Lisp calls PHASE; any interest in changing the
name? ...
10. Two-argument arctangent (ATAN Y X) is unnecessary, since its effect
can be trivially achieved by (ANGLE (MAKE-RECTANGULAR X Y)). Do we
apply Occam's razor and remove it? If it's retained, then I'll just
document it as being the same as (ANGLE (MAKE-RECTANGULAR X Y)).
11. JINX says: if PROCEDURE? exists, then a portable printer can be written.
JAR replies (in jest):
(define procedure?
(lambda (obj)
(not (or (pair? obj) (null? obj) (symbol? obj) (number? obj) ...))))
Seriously however, I was the only holdout at Brandeis against having
this predicate. After thinking about this further I think it's not such
a bad idea, even though it is of limited use. Is anyone opposed to
having an essential procedure PROCEDURE?, to round out the set of type
predicates?
12. (if x 1) vs. (cond (x 1)) -- this is inconsistent, as a couple of people
have pointed out. I would expect these two expressions to have the
same meaning, but they don't. The first is defined to always return
an unspecified value. The second is defined to return the value 1
if x is true, and an unspecified value otherwise. I would like to
make this consistent, and there are two ways to do. Take your pick:
(a) Change IF expressions so that they return the value of the
second form if the first form evaluates to false.
(b) Change COND and CASE so that they return an unspecified value if
there is no ELSE clause.
Here are some arguments in favor of (a):
- It removes the possibility of inferring that an implementation might
not be tail-recursive through an alternate-less IF.
- Similarly, it makes (IF #T <exp>) mean the same as <exp>, and removes
doubt about the meaning of things like (if x (if y 1) z).
- It simplifies the macro expansion of COND as compared with (b).
- Option (b) is obviously undesirable (consider the case of mutually
exclusive test expressions in a COND).
13. Many people would like to see the (define ((((a b) c) d) e) ...)
feature go away. S&ICP doesn't use it, and it has a rather complicated
syntax (look at the BNF for evidence). Vote keep or flush.
14. Status of LOAD not resolved. If, as I suggested, LOAD is only
to be syntactically valid at top level of a file, shouldn't it be
renamed to be INCLUDE ?
15. Page breaks and tabs are mentioned in the report (actually I guess I
added them - sorry), but there are no #\PAGE or #\TAB characters.
Can this be made consistent by documenting #\PAGE and #\TAB, or
should I try to neutralize or remove the places where I mention tabs
and page breaks, by saying something to the effect that there may be
other whitespace characters, and some of these characters might
terminate comments? In Common Lisp, #\PAGE and #\TAB aren't
"standard", they're only semi-standard; and I don't believe that
16. If page breaks are documented, should the terminate comments? I think
they should (but of course they don't in Common Lisp).
17. Bartley says: "the second sentence of the description of EQUAL? should
say that EQV? is used for all objects except pairs, vectors, and
strings." Forcing it to use EQV? seems kind of random to me. This
would of course make my notion of "apparent equivalence" useless,
destroying what I deluded myself into thinking was an elegant symmetry
between EQV? and EQUAL?; maybe it's a bogus idea anyhow. I
intentionally wanted to be silent on this point, allowing EQUAL? to
return true more often than EQV? perhaps, but I don't care that much.
-----
Presentation questions:
18. Several people have complained about Clinger's perhaps overly accurate
description of what happens when variables become bound. To be
accurate, we have to say that locations are created and the initial
value is stored in the location, but this doesn't sit well with the
desire to have Scheme sound like an almost-functional language.
What to do?
19. What should the dedication be? Sussman suggested the PDP-6, which was
the world's first Lisp machine, but some people didn't like this joke.
I have changed it to Christopher Strachey in the draft.
20. Is it OK to replace "Lazy ML" with "SASL" (last paragraph of section
0.0)? This is Dan Friedman's suggestion and I approve; SASL is more
widely known. I've never heard of Lazy ML (although I can imagine what
it is).
21. Should section numbers be zero-based? I'm beginning to think this looks
unprofessional; and it just doesn't look right in several places. It
worked well in the previous version of the report, and it's clearly more
consistent with the language (which is zero-based), but it doesn't work
the way I've reorganized things. If you like zero-based section
numbers, speak up.
22. Was Scheme the first programming language to have first-class lexical
closures? Can we say anything edifying along these lines?
23. I flushed the historical note "CATCH could be provided by a procedure"
sentence (again, because two or three people thought it was random and I
agreed), but some of you have complained about this. Why should this
bit of history be present, but not others that are at least as
important?
24. CALL/CC was mentioned in a sentence in a rationale in the RRRS. I
flushed the reference because (a) a number of people find the name
CALL/CC quite distasteful and (b) it is inconsistent to mention here
that some scheme implementations provide an alternate name for this but
not also do so for LABELS, BLOCK, and a zillion other things.
25. How best to resolve the inconsistencies between terminology in text and
semantics? Namely: "I", "Ide", "identifier" in semantics vs. "variable"
in text; "Com", "command" in semantics vs. "statement" in text.
26. FORCE & DELAY are still problematic. About half of respondents said it
was better to put FORCE up front with DELAY, and the other half thought
it was fine as it was. No one gave convincing arguments.
27. Is 3.0.2 (description of procedure calls) a good place to take note that
() is not a valid procedure call?
28. In section 0.0, 2nd paragraph, before the terms "variable" and
"identifier" have been defined, it should say "variable" instead of
"identifier" to be consistent with the rest of the report. Is that OK?
29. There are two nonterminals in the BNF that need names. Currently they
are called <formals> and <formalz> which was never intended to be a
serious suggestion (I put it there to see if anyone would actually read
the BNF!). Actually one or both of these can go away if NAMED-LAMBDA
and/or (DEFINE ((( ...) ...) ...) ...) go away. Can someone who likes
these things take a look at the BNF and suggest names for these?
30. Someone wanted me to avoid discussion of immutable objects in the
discussion of operational equivalence in the 2nd paragraph before entry
for EQV? . I want to mention immutability there because I think it's
important to warn users that this might be the case, otherwise they can
easily end up writing unportable code.
-----
For your information, here are changes I've made that either don't seem
controversial or reflect what I judged to be the consensus:
Language:
Only one empty list, period. (eq? '() '()) returns true.
Kelsey asks: why does ROUND round to even? Answer: Common Lisp does it
this way. Ask Steele. Probably this has to do with statistical
niceness.
A port does not become closed as a side effect of reaching end of file.
After end of file, you'll continue to read end of file objects as long
as the port is open. It's an error to read from or write to a closed
port.
DISPLAY writes characters like WRITE-CHAR does.
-----
Presentation:
"Iterative process" --> "iterative computation" on page 3 (this change
is an example of "desussmanization").
Inserted the following sentence in section 1.0:
"In addition, \ide{+}, \ide{-}, \ide{1+}, and \ide{-1+} are identifiers."
At Dan Friedman's request, I removed Perlis from the list of authors.
Changed <? and >? to < and > in all examples.
Removed non-essential features from examples (including the big one)
where possible: (1+ x) --> (+ x 1), (-1+ x) --> (- x 1), (define (foo
...) ...) --> (define foo (lambda ...)), 1-armed if --> cond, named let
--> letrec.
Changed variable name "loop" to "recur" in the
call-with-current-continuation example.
"iff" --> "if" in section 5.1.
-----
That's all for now, folks...
Jonathan
∂27-Jun-86 0943 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA r3rs presentation
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 27 Jun 86 09:42:55 PDT
Received: from mitre-bedford.ARPA by MC.LCS.MIT.EDU 27 Jun 86 12:44:13 EDT
Full-Name:
Organization: The MITRE Corp., Bedford, MA
Received: from jymme.sun.uucp by linus.MENET (1.1/4.7)
id AA00559; Fri, 27 Jun 86 11:38:01 EDT
Posted-Date: Fri, 27 Jun 86 11:37:13 edt
Received: by jymme.sun.uucp (2.0/SMI-3.0DEV3)
id AA19250; Fri, 27 Jun 86 11:37:13 edt
Date: Fri, 27 Jun 86 11:37:13 edt
From: ramsdell%linus@mitre-bedford.ARPA
Message-Id: <8606271537.AA19250@jymme.sun.uucp>
To: rrrs-authors%mc.lcs.mit.edu@mitre-bedford.ARPA
Subject: r3rs presentation
I went on vacation and then I had trouble getting the r3rs.tar file.
By the time I sat down to read the report, I found my Scheme mail had
grown to 100 printed pages! We have a solid group of committed people.
I would like to make a few comments on presentation. The most
important comment is about section organization. Newspaper writers
spend most of their time writing the first three paragraphs of any
article. This part of the article is often the only part read by
readers, and is important in enticing readers to continue. In the
same way, The first page is most likely to be the only page read by
many SIGPLAN readers. If I had my choice of what I would ask them to
read, it would be the material in Section 0.0, the Semantics section
that notes that scheme is lexically scoped, tail recursive, weakly
typed, ... etc. I would expand on the discussion on continutations,
as they represent one important difference between Scheme and other
languages. The Introduction, with its history of scheme, its history
of scheme reports and meetings, and acknowledgements giving names of
people that the reader will not likely know, is not that one page I
would like all to read. I suggest moving the history to the back of
the report, and use the first couple of pages to convince the reader
that the language documented in this report is worth studying.
On less significant presentation issues, I would like to present a
view that a less sophisicated user of Scheme may get about
continuations. That is, this reader may conclude that continuations
are very powerful and always expensive to use. I know that the T
compiler of 1981 generated goto's from the a catch and throw
expression that exited a loop from within a loop. (Catch and throw is
old syntax for using continuations.) Since we promise that
tail-recursive procedures are executed in constant space, can't we
promise something about certain simple uses of continuations?
Otherwise, they may avoided by programmers for the wrong reasons.
Random notes
[pg. 6, col. 2, +15] In the term "meta-program" well known?
[pg. 30, col. 1] Some note is needed explaining why there are two
different close procedures.
[pg. 29] If call-with-current-continuation calls its argument with
the current continuation, should the I/O routines call-with-input-file
and call-with-output-file be renamed call-with-input-port and
call-with-output-port?
John
∂27-Jun-86 1115 @MC.LCS.MIT.EDU:gls@Think.COM Remaining questions & remarks (2)
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 27 Jun 86 11:08:13 PDT
Received: from Godot.Think.COM by MC.LCS.MIT.EDU 27 Jun 86 13:39:25 EDT
Received: from boethius by Godot.Think.COM via CHAOS; Fri, 27 Jun 86 13:36:07 edt
Date: Fri, 27 Jun 86 13:37 EDT
From: Guy Steele <gls@Think.COM>
Subject: Remaining questions & remarks (2)
To: JAR@MIT-AI.ARPA, rrrs-authors@MIT-MC.ARPA
Cc: gls@AQUINAS
In-Reply-To: <"860626190326.1.jar@AI"@JOE-LOUIS.LCS.MIT.EDU>
Message-Id: <860627133714.3.GLS@BOETHIUS.THINK.COM>
Date: Thu, 26 Jun 86 19:03 EDT
From: Jonathan A Rees <JAR@MIT-AI.ARPA>
1. BEGIN vs. SEQUENCE: this is a pretty glaring ugliness in the report;
it's obvious to the world we couldn't get consensus on this one.
Many people have told me that they don't care which one is there, so
long as there's only one. SEQUENCE was used heavily in S&ICP and
for that reason I think it should be retained; thus the options I
offer are
(a) leave things as they are (BEGIN essential with non-essential
synonym SEQUENCE),
(b) remove BEGIN and make SEQUENCE essential (noting in the Notes
section that BEGIN, like #!TRUE etc., should be supported by
those implementations which care about running code written in
the past year).
(b)
2. Similarly but less glaringly, we have a problem with the numeric
comparisons. Again, many people have said they don't care but they only
want one set, with or without question marks. Thus I offer
the choices
(a) leave things as they are
(b) flush the alternative names <? <=? >? >=? =?
(b)
22. Was Scheme the first programming language to have first-class lexical
closures? Can we say anything edifying along these lines?
Don't forget, of course, to say that Algol 60 came real close. I think you
should research the languages GEDANKEN (Reynolds) and ISWIM (Landin), as one
of those might have had closures. I believe ISWIM was described in CACM in
the mid-1960's.
Kelsey asks: why does ROUND round to even? Answer: Common Lisp does it
this way. Ask Steele. Probably this has to do with statistical
niceness.
ROUND rounds to even because the integer "rounding modes" (floor, ceiling,
round, truncate) were chosen to correspond to the rounding modes required by
the IEEE floating point standard. That standard in turn mandates rounding
to even for what indeed amounts to statistical niceness: on the average the
effects of rounding tend to cancel out. Why round to even instead of odd?
Then further operations on those results are more likely to be exactly
representable and therefore not require further loss of accuracy due to
rounding.
--Guy
∂27-Jun-86 1653 @MC.LCS.MIT.EDU:SGR@ELEPHANT-BUTTE.SCRC.Symbolics.COM [INGRIA@G.BBN.COM: Scheme for LISPM]
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 27 Jun 86 16:53:02 PDT
Received: from ELEPHANT-BUTTE.SCRC.Symbolics.COM by MC.LCS.MIT.EDU 27 Jun 86 19:40:24 EDT
Received: from GROUSE.SCRC.Symbolics.COM by ELEPHANT-BUTTE.SCRC.Symbolics.COM via CHAOS with CHAOS-MAIL id 31612; Fri 27-Jun-86 17:02:04 EDT
Date: Fri, 27 Jun 86 17:02 EDT
From: Stephen G. Rowley <SGR@STONY-BROOK.SCRC.Symbolics.COM>
Subject: [INGRIA@G.BBN.COM: Scheme for LISPM]
To: Scheme@MIT-MC.ARPA
Message-ID: <860627170237.3.SGR@GROUSE.SCRC.Symbolics.COM>
This sounds like a question for people on this list:
Date: Thu, 26 Jun 1986 16:47 EDT
Message-ID: <INGRIA.12217972484.BABYL@G.BBN.COM>
From: INGRIA@G.BBN.COM
To: INFO-LISPM@MC.LCS.MIT.EDU
Subject: Scheme for LISPM
Does anyone have an implementation of Scheme that runs on
LISPMs? It would be useful for us to have a version that runs on Rel6
on 36XXs. Thanks in advance.
-30-
Bob
∂27-Jun-86 1930 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU typo
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 27 Jun 86 19:30:29 PDT
Received: from VAIL.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 27 JUN 86 22:28:27 EDT
Date: Fri, 27 Jun 86 22:29 EDT
From: Jonathan A Rees <JAR@MIT-AI.ARPA>
Subject: typo
To: rrrs-authors@MIT-MC.ARPA
Message-ID: <860627222941.1.JAR@VAIL.LCS.MIT.EDU>
Of course I meant "return the value of the second form if the first
evaluates to *true*," not false.
∂27-Jun-86 2142 @MC.LCS.MIT.EDU:dfried%indiana.csnet@CSNET-RELAY.ARPA Grandfathering Responses
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 27 Jun 86 21:42:00 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 28 Jun 86 00:38:15 EDT
Received: from indiana by csnet-relay.csnet id aa23894; 28 Jun 86 0:36 EDT
Date: Fri, 27 Jun 86 11:09:20 est
From: Dan Friedman <dfried%indiana.csnet@CSNET-RELAY.ARPA>
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: Grandfathering Responses
1. BEGIN vs. SEQUENCE: this is a pretty glaring ugliness in the report;
it's obvious to the world we couldn't get consensus on this one.
Many people have told me that they don't care which one is there, so
long as there's only one. SEQUENCE was used heavily in S&ICP and
for that reason I think it should be retained; thus the options I
offer are
(a) leave things as they are (BEGIN essential with non-essential
synonym SEQUENCE),
(b) remove BEGIN and make SEQUENCE essential (noting in the Notes
section that BEGIN, like #!TRUE etc., should be supported by
those implementations which care about running code written in
the past year).
Let me know your vote if you haven't done so already.
*****>> (a)
2. Similarly but less glaringly, we have a problem with the numeric
comparisons. Again, many people have said they don't care but they only
want one set, with or without question marks. Thus I offer
the choices
(a) leave things as they are
(b) flush the alternative names <? <=? >? >=? =?
[The ones without question marks were used in S&ICP; moreover, they
exist in other Lisp dialects. The argument in favor of the ?'s is that
it allows the simple statement: "names of predicates end in question mark".]
Send me your vote.
******>> (b)
3. REC and NAMED-LAMBDA :
Again, I sense capitulation on the part of some who have been stubborn.
The only options permitted are:
(a) Keep both
(b) Flush both
My editorial sense is that we should be able to achieve (b). Remember,
the language also doesn't have EVAL, environments, or macros, so if you
want to keep these features please say how they're different from other
"indispensible" features that the language DOESN'T have.
Named-lambda is totally unacceptable.
Letrec is often overkill and without macros we will be left
with using it. Rec is an incredibly powerful tool. I'd hate
to lose it from my repertoire. However, named-lambda is an
ugly so I am forced, given these choices, to opt for (b).
4. SUBSTRING-MOVE-LEFT! and SUBSTRING-MOVE-RIGHT! :
Many people have suggested removing these. Anyone who wants them
retained MUST provide a convincing rationale, for inclusion in the
report. Otherwise I'll remove them.
****>> Remove them
5. Should we say anything about the possibility of parallel or
interleaved argument evaluation? Remembering something I thought I
heard Will once say, I added the innocent little phrase "or perhaps
in parallel" to the description of procedure calling. Richard
Kelsey quickly pointed out that if it's mentioned as being a
possibly legal implementation, many otherwise valid scheme programs
may fail to run in implementations which do this, because they won't
do necessary synchronization. I agree; this is acceptable only if
we provide synchronization primitives.
****>> Yes, either provide synchonization primitives or flush the comment
8. Apparently there's no difference between ABS and MAGNITUDE. Should we
keep both? If so, should I change the presentation in any way?
*****>> don't keep both.
9. ANGLE is what Common Lisp calls PHASE; any interest in changing the
name? ...
*****>> I agree with the consensus.
10. Two-argument arctangent (ATAN Y X) is unnecessary, since its effect
can be trivially achieved by (ANGLE (MAKE-RECTANGULAR X Y)). Do we
apply Occam's razor and remove it? If it's retained, then I'll just
document it as being the same as (ANGLE (MAKE-RECTANGULAR X Y)).
*****>> follow Occam's razor here.
11. JINX says: if PROCEDURE? exists, then a portable printer can be written.
JAR replies (in jest):
(define procedure?
(lambda (obj)
(not (or (pair? obj) (null? obj) (symbol? obj) (number? obj) ...))))
Seriously however, I was the only holdout at Brandeis against having
this predicate. After thinking about this further I think it's not such
a bad idea, even though it is of limited use. Is anyone opposed to
having an essential procedure PROCEDURE?, to round out the set of type
predicates?
*****> include procedure?, but be sure that
(call/cc (lambda (k) (k (procedure? k)))) --> #t.
12. (if x 1) vs. (cond (x 1)) -- this is inconsistent, as a couple of people
have pointed out. I would expect these two expressions to have the
same meaning, but they don't. The first is defined to always return
an unspecified value. The second is defined to return the value 1
if x is true, and an unspecified value otherwise. I would like to
make this consistent, and there are two ways to do. Take your pick:
(a) Change IF expressions so that they return the value of the
second form if the first form evaluates to false.
(b) Change COND and CASE so that they return an unspecified value if
there is no ELSE clause.
Here are some arguments in favor of (a):
- It removes the possibility of inferring that an implementation might
not be tail-recursive through an alternate-less IF.
- Similarly, it makes (IF #T <exp>) mean the same as <exp>, and removes
doubt about the meaning of things like (if x (if y 1) z).
- It simplifies the macro expansion of COND as compared with (b).
- Option (b) is obviously undesirable (consider the case of mutually
exclusive test expressions in a COND).
****>> I favor including a "(when pred val) as the proper special form
for two branch-if's. That way two branch-if's would be syntactically
illegal. I've used them for about a year and I find less bugs creeping
into other's and my own programs.
13. Many people would like to see the (define ((((a b) c) d) e) ...)
feature go away. S&ICP doesn't use it, and it has a rather complicated
syntax (look at the BNF for evidence). Vote keep or flush.
*****>> flush it.
Presentation questions:
18. Several people have complained about Clinger's perhaps overly accurate
description of what happens when variables become bound. To be
accurate, we have to say that locations are created and the initial
value is stored in the location, but this doesn't sit well with the
desire to have Scheme sound like an almost-functional language.
What to do?
****> Realize that Scheme is not "almost"-functional, it's almost Algol!
I agree wholeheartedly agree with Will's characterization.
The best that can be said with respect to the functionality
of Scheme is that it contains a coherent subset that is "functional".
19. What should the dedication be? Sussman suggested the PDP-6, which was
the world's first Lisp machine, but some people didn't like this joke.
I have changed it to Christopher Strachey in the draft.
****> I prefer Christopher Strachey.
21. Should section numbers be zero-based? I'm beginning to think this looks
unprofessional; and it just doesn't look right in several places. It
worked well in the previous version of the report, and it's clearly more
consistent with the language (which is zero-based), but it doesn't work
the way I've reorganized things. If you like zero-based section
numbers, speak up.
*****> 1-based seems better.
22. Was Scheme the first programming language to have first-class lexical
closures? Can we say anything edifying along these lines?
*****> Landin's ISWIM was the first well-known one back in the early 60's.
However, I would guess that the use of "function" in the
"Lisp 1.5 Programmming Language Manual" should count as
a first-class closure. If all "lambda"'s were surrounded by
(function ...) then LISP 1.5 would model them. Furthermore,
call/cc can be written with Landin's J operat.
23. I flushed the historical note "CATCH could be provided by a procedure"
sentence (again, because two or three people thought it was random and I
agreed), but some of you have complained about this. Why should this
bit of history be present, but not others that are at least as
important?
*****> I won't argue for the history. However, the implementor who
thinks that catch (as in Common Lisp) and call/cc are the same
is in for a shock. That should perhaps be pointed out.
24. CALL/CC was mentioned in a sentence in a rationale in the RRRS. I
flushed the reference because (a) a number of people find the name
CALL/CC quite distasteful and (b) it is inconsistent to mention here
that some scheme implementations provide an alternate name for this but
not also do so for LABELS, BLOCK, and a zillion other things.
****> Carolyn Talcott in her dissertation suggested the term "note".
I could live with that. If call-with-current-continuation is
the only term, this will make those of us who write about this object
uncomfortable. I think we agreed that "call/cc" would be an
acceptable abbreviation and I would prefer to keep that name
in the report. Those who don't like the name can choose not to use it.
In a sense I agree with your argument, but "call-with-current
-continuation has 30 characters in it!, "labels" and "letrec", and
"block" and "begin" each have the same number of characters.
25. How best to resolve the inconsistencies between terminology in text and
semantics? Namely: "I", "Ide", "identifier" in semantics vs. "variable"
in text; "Com", "command" in semantics vs. "statement" in text.
****> "variable" is a "dangerous" word, try to expunge it. Opinions differ
as to what a variable is.
26. FORCE & DELAY are still problematic. About half of respondents said it
was better to put FORCE up front with DELAY, and the other half thought
it was fine as it was. No one gave convincing arguments.
****> I favor join them. I don't much care where they are joined.
28. In section 0.0, 2nd paragraph, before the terms "variable" and
"identifier" have been defined, it should say "variable" instead of
"identifier" to be consistent with the rest of the report. Is that OK?
****> See comment on 26.
29. There are two nonterminals in the BNF that need names. Currently they
are called <formals> and <formalz> which was never intended to be a
serious suggestion (I put it there to see if anyone would actually read
the BNF!). Actually one or both of these can go away if NAMED-LAMBDA
and/or (DEFINE ((( ...) ...) ...) ...) go away. Can someone who likes
these things take a look at the BNF and suggest names for these?
****> I hope they go away.
Language:
Removed non-essential features from examples (including the big one)
where possible: (1+ x) --> (+ x 1), (-1+ x) --> (- x 1), (define (foo
...) ...) --> (define foo (lambda ...)), 1-armed if --> cond, named let
--> letrec.
****> I'd still prefer "add1" or "succ" and "sub1" or "pred" to the
abuse of punnery "-1+", and its slightly weaker sibling "1+".
The cuteness of "-1+" should go. In writing for a mass audience
I have learned that there is a time and a place for clever un-pronouceable
function names. Please remove them and find pronounceable words
Dan
∂28-Jun-86 1511 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU variable vs. identifier
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 28 Jun 86 15:11:09 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 28 JUN 86 12:37:38 EDT
Date: Sat, 28 Jun 86 12:36:57 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: variable vs. identifier
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <[AI.AI.MIT.EDU].62926.860628.JAR>
From the messages I've recieved, it apparently wasn't clear why two
distinct words are needed. I want to make sure that the grammar
reflects the decision that we will leave it up to implementations
(i.e. leave it "unspecified") just what things like (let ((if ...))
...) would mean. So at the very least these expressions have to be
excluded from the grammar. Therefore one word is needed for things
that are lexically like symbols (and can appear inside of QUOTE
expressions), and another is needed for those things that can be bound
and referred to. I chose "identifier" for the first and "variable"
for the second. Thus IF is an identifier but not a variable. I like
the way this turned out, and can't think of anything else that would
work as well.
∂28-Jun-86 1511 @MC.LCS.MIT.EDU:dfried%indiana.csnet@CSNET-RELAY.ARPA Grandfathering response
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 28 Jun 86 15:11:24 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 28 Jun 86 15:49:47 EDT
Received: from indiana by csnet-relay.csnet id aa28825; 28 Jun 86 15:37 EDT
Date: Sat, 28 Jun 86 11:50:33 est
From: Dan Friedman <dfried%indiana.csnet@CSNET-RELAY.ARPA>
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: Grandfathering response
1. BEGIN vs. SEQUENCE: this is a pretty glaring ugliness in the report;
it's obvious to the world we couldn't get consensus on this one.
Many people have told me that they don't care which one is there, so
long as there's only one. SEQUENCE was used heavily in S&ICP and
for that reason I think it should be retained; thus the options I
offer are
(a) leave things as they are (BEGIN essential with non-essential
synonym SEQUENCE),
(b) remove BEGIN and make SEQUENCE essential (noting in the Notes
section that BEGIN, like #!TRUE etc., should be supported by
those implementations which care about running code written in
the past year).
Let me know your vote if you haven't done so already.
*****>> (a)
2. Similarly but less glaringly, we have a problem with the numeric
comparisons. Again, many people have said they don't care but they only
want one set, with or without question marks. Thus I offer
the choices
(a) leave things as they are
(b) flush the alternative names <? <=? >? >=? =?
[The ones without question marks were used in S&ICP; moreover, they
exist in other Lisp dialects. The argument in favor of the ?'s is that
it allows the simple statement: "names of predicates end in question mark".]
Send me your vote.
******>> (b)
3. REC and NAMED-LAMBDA :
Again, I sense capitulation on the part of some who have been stubborn.
The only options permitted are:
(a) Keep both
(b) Flush both
My editorial sense is that we should be able to achieve (b). Remember,
the language also doesn't have EVAL, environments, or macros, so if you
want to keep these features please say how they're different from other
"indispensible" features that the language DOESN'T have.
Named-lambda is totally unacceptable.
Letrec is often overkill and without macros we will be left
with using it. Rec is an incredibly powerful tool. I'd hate
to lose it from my repertoire. However, named-lambda is an
ugly so I am forced, given these choices, to opt for (b).
4. SUBSTRING-MOVE-LEFT! and SUBSTRING-MOVE-RIGHT! :
Many people have suggested removing these. Anyone who wants them
retained MUST provide a convincing rationale, for inclusion in the
report. Otherwise I'll remove them.
****>> Remove them
5. Should we say anything about the possibility of parallel or
interleaved argument evaluation? Remembering something I thought I
heard Will once say, I added the innocent little phrase "or perhaps
in parallel" to the description of procedure calling. Richard
Kelsey quickly pointed out that if it's mentioned as being a
possibly legal implementation, many otherwise valid scheme programs
may fail to run in implementations which do this, because they won't
do necessary synchronization. I agree; this is acceptable only if
we provide synchronization primitives.
****>> Yes, either provide synchonization primitives or flush the comment
8. Apparently there's no difference between ABS and MAGNITUDE. Should we
keep both? If so, should I change the presentation in any way?
*****>> don't keep both.
9. ANGLE is what Common Lisp calls PHASE; any interest in changing the
name? ...
*****>> I agree with the consensus.
10. Two-argument arctangent (ATAN Y X) is unnecessary, since its effect
can be trivially achieved by (ANGLE (MAKE-RECTANGULAR X Y)). Do we
apply Occam's razor and remove it? If it's retained, then I'll just
document it as being the same as (ANGLE (MAKE-RECTANGULAR X Y)).
*****>> follow Occam's razor here.
11. JINX says: if PROCEDURE? exists, then a portable printer can be written.
JAR replies (in jest):
(define procedure?
(lambda (obj)
(not (or (pair? obj) (null? obj) (symbol? obj) (number? obj) ...))))
Seriously however, I was the only holdout at Brandeis against having
this predicate. After thinking about this further I think it's not such
a bad idea, even though it is of limited use. Is anyone opposed to
having an essential procedure PROCEDURE?, to round out the set of type
predicates?
*****> include procedure?, but be sure that
(call/cc (lambda (k) (k (procedure? k)))) --> #t.
12. (if x 1) vs. (cond (x 1)) -- this is inconsistent, as a couple of people
have pointed out. I would expect these two expressions to have the
same meaning, but they don't. The first is defined to always return
an unspecified value. The second is defined to return the value 1
if x is true, and an unspecified value otherwise. I would like to
make this consistent, and there are two ways to do. Take your pick:
(a) Change IF expressions so that they return the value of the
second form if the first form evaluates to false.
(b) Change COND and CASE so that they return an unspecified value if
there is no ELSE clause.
Here are some arguments in favor of (a):
- It removes the possibility of inferring that an implementation might
not be tail-recursive through an alternate-less IF.
- Similarly, it makes (IF #T <exp>) mean the same as <exp>, and removes
doubt about the meaning of things like (if x (if y 1) z).
- It simplifies the macro expansion of COND as compared with (b).
- Option (b) is obviously undesirable (consider the case of mutually
exclusive test expressions in a COND).
****>> I favor including a "(when pred val) as the proper special form
for two branch-if's. That way two branch-if's would be syntactically
illegal. I've used them for about a year and I find less bugs creeping
into other's and my own programs.
13. Many people would like to see the (define ((((a b) c) d) e) ...)
feature go away. S&ICP doesn't use it, and it has a rather complicated
syntax (look at the BNF for evidence). Vote keep or flush.
*****>> flush it.
Presentation questions:
18. Several people have complained about Clinger's perhaps overly accurate
description of what happens when variables become bound. To be
accurate, we have to say that locations are created and the initial
value is stored in the location, but this doesn't sit well with the
desire to have Scheme sound like an almost-functional language.
What to do?
****> Realize that Scheme is not "almost"-functional, it's almost Algol!
I agree wholeheartedly agree with Will's characterization.
The best that can be said with respect to the functionality
of Scheme is that it contains a coherent subset that is "functional".
19. What should the dedication be? Sussman suggested the PDP-6, which was
the world's first Lisp machine, but some people didn't like this joke.
I have changed it to Christopher Strachey in the draft.
****> I prefer Christopher Strachey.
21. Should section numbers be zero-based? I'm beginning to think this looks
unprofessional; and it just doesn't look right in several places. It
worked well in the previous version of the report, and it's clearly more
consistent with the language (which is zero-based), but it doesn't work
the way I've reorganized things. If you like zero-based section
numbers, speak up.
*****> 1-based seems better.
22. Was Scheme the first programming language to have first-class lexical
closures? Can we say anything edifying along these lines?
*****> Landin's ISWIM was the first well-known one back in the early 60's.
However, I would guess that the use of "function" in the
"Lisp 1.5 Programmming Language Manual" should count as
a first-class closure. If all "lambda"'s were surrounded by
(function ...) then LISP 1.5 would model them. Furthermore,
call/cc can be written with Landin's J operat.
23. I flushed the historical note "CATCH could be provided by a procedure"
sentence (again, because two or three people thought it was random and I
agreed), but some of you have complained about this. Why should this
bit of history be present, but not others that are at least as
important?
*****> I won't argue for the history. However, the implementor who
thinks that catch (as in Common Lisp) and call/cc are the same
is in for a shock. That should perhaps be pointed out.
24. CALL/CC was mentioned in a sentence in a rationale in the RRRS. I
flushed the reference because (a) a number of people find the name
CALL/CC quite distasteful and (b) it is inconsistent to mention here
that some scheme implementations provide an alternate name for this but
not also do so for LABELS, BLOCK, and a zillion other things.
****> Carolyn Talcott in her dissertation suggested the term "note".
I could live with that. If call-with-current-continuation is
the only term, this will make those of us who write about this object
uncomfortable. I think we agreed that "call/cc" would be an
acceptable abbreviation and I would prefer to keep that name
in the report. Those who don't like the name can choose not to use it.
In a sense I agree with your argument, but "call-with-current
-continuation has 30 characters in it!, "labels" and "letrec", and
"block" and "begin" each have the same number of characters.
25. How best to resolve the inconsistencies between terminology in text and
semantics? Namely: "I", "Ide", "identifier" in semantics vs. "variable"
in text; "Com", "command" in semantics vs. "statement" in text.
****> "variable" is a "dangerous" word, try to expunge it. Opinions differ
as to what a variable is.
26. FORCE & DELAY are still problematic. About half of respondents said it
was better to put FORCE up front with DELAY, and the other half thought
it was fine as it was. No one gave convincing arguments.
****> I favor join them. I don't much care where they are joined.
28. In section 0.0, 2nd paragraph, before the terms "variable" and
"identifier" have been defined, it should say "variable" instead of
"identifier" to be consistent with the rest of the report. Is that OK?
****> See comment on 26.
29. There are two nonterminals in the BNF that need names. Currently they
are called <formals> and <formalz> which was never intended to be a
serious suggestion (I put it there to see if anyone would actually read
the BNF!). Actually one or both of these can go away if NAMED-LAMBDA
and/or (DEFINE ((( ...) ...) ...) ...) go away. Can someone who likes
these things take a look at the BNF and suggest names for these?
****> I hope they go away.
Language:
Removed non-essential features from examples (including the big one)
where possible: (1+ x) --> (+ x 1), (-1+ x) --> (- x 1), (define (foo
...) ...) --> (define foo (lambda ...)), 1-armed if --> cond, named let
--> letrec.
****> I'd still prefer "add1" or "succ" and "sub1" or "pred" to the
abuse of punnery "-1+", and its slightly weaker sibling "1+".
The cuteness of "-1+" should go. In writing for a mass audience
I have learned that there is a time and a place for clever un-pronouceable
function names. Please remove them and find pronounceable words
∂29-Jun-86 1205 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU [INGRIA@G.BBN.COM: Scheme for LISPM]
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 29 Jun 86 12:05:51 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 29 JUN 86 14:59:40 EDT
Date: Sun, 29 Jun 86 14:58:30 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: [INGRIA@G.BBN.COM: Scheme for LISPM]
To: INGRIA@BBNG.ARPA
cc: SGR@SCRC-STONY-BROOK.ARPA, Scheme@MC.LCS.MIT.EDU
In-reply-to: Msg of Fri 27 Jun 86 17:02 EDT from Stephen G. Rowley <SGR at STONY-BROOK.SCRC.Symbolics.COM>
Message-ID: <[AI.AI.MIT.EDU].63300.860629.JAR>
Date: Thu, 26 Jun 1986 16:47 EDT
Message-ID: <INGRIA.12217972484.BABYL@G.BBN.COM>
From: INGRIA@G.BBN.COM
To: INFO-LISPM@MC.LCS.MIT.EDU
Subject: Scheme for LISPM
Does anyone have an implementation of Scheme that runs on
LISPMs? It would be useful for us to have a version that runs on Rel6
on 36XXs. Thanks in advance.
I wrote one last summer. It's not great for development, since there
are no debugging facilities besides TRACE, but it works. It is written in
Common Lisp, but it has been comditionalized to make it also work in
Rel 6 Symbolics Common Lisp (which is full of bugs). If you're at BBN,
you should contact Don Allen and get a copy from him. Otherwise
contact me (JAR@MIT-AI) and I'll give you more information.
Jonathan
∂29-Jun-86 2140 @MC.LCS.MIT.EDU:dyb%indiana.csnet@CSNET-RELAY.ARPA Re: Remaining questions & remarks (2)
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 29 Jun 86 21:40:26 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 30 Jun 86 00:37:18 EDT
Received: from indiana by csnet-relay.csnet id ab01297; 30 Jun 86 0:37 EDT
Date: Sun, 29 Jun 86 19:58:16 est
From: Kent Dybvig <dyb%indiana.csnet@CSNET-RELAY.ARPA>
To: jar@MC.LCS.MIT.EDU
Subject: Re: Remaining questions & remarks (2)
Cc: rrrs-authors@MC.LCS.MIT.EDU
1. BEGIN vs. SEQUENCE: this is a pretty glaring ugliness in the report;
...
(a) leave things as they are (BEGIN essential with non-essential
...
(b) remove BEGIN and make SEQUENCE essential (noting in the Notes
...
(b) [I hate the name begin... I am always looking for a corresponding end]
2. Similarly but less glaringly, we have a problem with the numeric
...
(a) leave things as they are
(b) flush the alternative names <? <=? >? >=? =?
...
(b)
3. REC and NAMED-LAMBDA :
Again, I sense capitulation on the part of some who have been stubborn.
...
(a) Keep both
(b) Flush both
My editorial sense is that we should be able to achieve (b). Remember,
...
(b)
4. SUBSTRING-MOVE-LEFT! and SUBSTRING-MOVE-RIGHT! :
Many people have suggested removing these. Anyone who wants them
...
remove them
5. Should we say anything about the possibility of parallel or
...
remove mention of parallel argument evaluation
7. Must a port still be a port (i.e. answer true to INPUT-PORT? or OUTPUT-PORT?)
...
I would prefer if it was but not strongly
9. ANGLE is what Common Lisp calls PHASE; any interest in changing the
name? ...
call it phase
10. Two-argument arctangent (ATAN Y X) is unnecessary, since its effect
can be trivially achieved by (ANGLE (MAKE-RECTANGULAR X Y)). Do we
apply Occam's razor and remove it? If it's retained, then I'll just
document it as being the same as (ANGLE (MAKE-RECTANGULAR X Y)).
are they not different in implementations without complex numbers?
11. JINX says: if PROCEDURE? exists, then a portable printer can be written.
JAR replies (in jest):
(define procedure?
(lambda (obj)
(not (or (pair? obj) (null? obj) (symbol? obj) (number? obj) ...))))
Seriously however, I was the only holdout at Brandeis against having
...
it should be included---I would much prefer the name "closure?"
12. (if x 1) vs. (cond (x 1)) -- this is inconsistent, as a couple of people
...
(a) Change IF expressions so that they return the value of the
...
(b) Change COND and CASE so that they return an unspecified value if
...
...
(c) require if to have a consequent and include WHEN as required---this gets
rid of the whole mess and is much cleaner.
13. Many people would like to see the (define ((((a b) c) d) e) ...)
...
flush it
14. Status of LOAD not resolved. If, as I suggested, LOAD is only
...
renamed to be INCLUDE ?
no... load implies run time, include implies compile time, if they are
different
15. Page breaks and tabs are mentioned in the report (actually I guess I
...
leave them out where possible
17. Bartley says: "the second sentence of the description of EQUAL? should
...
I agree with David
Presentation questions:
18. Several people have complained about Clinger's perhaps overly accurate
...
I'd say leave Will's description.
19. What should the dedication be? Sussman suggested the PDP-6, which was
...
how about Haskell B. Curry?
20. Is it OK to replace "Lazy ML" with "SASL" (last paragraph of section
...
it does seem more appropriate; SASL predates lazy ML.
21. Should section numbers be zero-based? I'm beginning to think this looks
...
1-based seems best
22. Was Scheme the first programming language to have first-class lexical
closures? Can we say anything edifying along these lines?
ISWIM (Burge) had them about ten years prior to Scheme. might want to refer
to Burge, W.H. ``ISWIM Programming Manual,'' IBM Research Report RA129,
Yorktown Heights, New York (November 1981).
23. I flushed the historical note "CATCH could be provided by a procedure"
...
I agree, flush it.
24. CALL/CC was mentioned in a sentence in a rationale in the RRRS. I
...
definitely keep call/cc. call/cc has appeared in several papers, and it is
much easier to type in without making mistakes---the other name compromises
did not end us up with names 5 times as long
25. How best to resolve the inconsistencies between terminology in text and
semantics? Namely: "I", "Ide", "identifier" in semantics vs. "variable"
in text; "Com", "command" in semantics vs. "statement" in text.
I prefer identifier for all symbols, such as keywords and lexical identifiers,
and variable for lexical identifiers.
26. FORCE & DELAY are still problematic. About half of respondents said it
was better to put FORCE up front with DELAY, and the other half thought
it was fine as it was. No one gave convincing arguments.
they should be together, I would say where FORCE now is
27. Is 3.0.2 (description of procedure calls) a good place to take note that
() is not a valid procedure call?
it should be obvious from the syntax
28. In section 0.0, 2nd paragraph, before the terms "variable" and
"identifier" have been defined, it should say "variable" instead of
"identifier" to be consistent with the rest of the report. Is that OK?
yes
Changed variable name "loop" to "recur" in the
call-with-current-continuation example.
please don't---recur is the name of a special form in Chez Scheme and
is used by lots of people---I'd like to avoid confusion
As for grandfathering, unless the original RRRS report was distributed
much more widely than I figure it was, I would rather see no mention of
the incompatibilities. It is not worthwhile to support old features
when the affected group of people is fairly small (particularly for new
implementations). Besides, the various language manuals for existing
implementations with all their differing syntaxes were much more widely
distributed in total, and their features are not being grandfathered.
Kent
∂30-Jun-86 0741 @MC.LCS.MIT.EDU:dyb%indiana.csnet@CSNET-RELAY.ARPA Re: r3rs presentation (long)
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 30 Jun 86 07:41:40 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 30 Jun 86 10:39:57 EDT
Received: from indiana by csnet-relay.csnet id aa04496; 30 Jun 86 10:37 EDT
Date: Mon, 30 Jun 86 03:46:12 est
From: Kent Dybvig <dyb%indiana.csnet@CSNET-RELAY.ARPA>
To: ramsdell%linus@MITRE-BEDFORD.ARPA
Subject: Re: r3rs presentation (long)
Cc: rrrs-authors@MC.LCS.MIT.EDU
On less significant presentation issues, I would like to present a
view that a less sophisicated user of Scheme may get about
continuations. That is, this reader may conclude that continuations
are very powerful and always expensive to use. I know that the T
compiler of 1981 generated goto's from the a catch and throw
expression that exited a loop from within a loop. (Catch and throw is
old syntax for using continuations.) Since we promise that
tail-recursive procedures are executed in constant space, can't we
promise something about certain simple uses of continuations?
Otherwise, they may avoided by programmers for the wrong reasons.
The T compiler of 1981 did not support continuations, just Lisp-style
catch and throw. However, simple uses can be compiled into jumps or
not much more. For instance, a smart compiler can tell that
(call/cc (lambda (k) (if (zero? x) (k x) (/ 1 x))))
requires nothing more than a goto for (k x). The ability to perform
this improvement is easily lost; if k is returned, placed somewhere,
or invoked from within a closure that is returned or placed somewhere,
etc., the full continuation must be made. Recursion makes things a
little more difficult, since it requires not just a goto but some way
of recording the depth of the stack. What's more, it takes a fairly
sophisticated compiler (or some special-casing) not to trip on
(call/cc
(lambda (return)
(letrec ([g (lambda (l a)
(cond
[(null? l) a]
[else
(when (zero? (car l)) (return 'oops))
(g (cdr l) (/ a (car l)))]))])
(g some-list-of-numbers 1))))
because it appears that return is closed over even though g can be
implemented as a simple loop (but couldn't be, for example, if the
closure g itself were returned instead of 'oops). But this may be
just what the "do" expression below turns into.
(call/cc
(lambda (return)
(do ([l some-list-of-numbers (cdr l)]
[a 1 (/ a (car l))])
((null? l) a)
(when (zero? (car l)) (return 'oops)))))
(Actually, it's worse than that, since letrec is itself a derived
form and really appears as a convoluted combination of lambda and
set! expressions.)
Making a guarantee that call/cc produces essentially gotos in simple
situations might backfire, too, resulting in convoluted code to take
advantage of the faster call/cc. For instance, a programmer might
abandon map in favor of hand-coded loops, or not take full advantage
of closures and recursion.
Another problem with making such a guarantee is that call/cc is a
function, not a special form, and its value might change, e.g., for
tracing or "constraining control". Certainly, it would be possible
to generate code for the first example something like
(if (eq? call/cc *primitive-call/cc*)
{fancy goto code for (if (zero? x) (k x) (/ 1 x))}
{normal application of call/cc to (lambda (k) ...)}),
but this would be clumsy and wasteful of code space.
Some implementations of Scheme currently promote some or all primitive
functions almost to special form status... if the identifier's binding
is the expected one at compile time, assume it will be at run time and
generate inline code. For example, car and cdr might be inlined this
way. In these systems, call/cc could presumably be nailed down too.
But it cannot be guaranteed so in the RRRS without implying that some
primitives are really special forms.
Since I have brought the issue up, how does everyone feel about this
special treatment for primitives? Should it be explicitly allowed or
disallowed? All of the arguments against allowing extra special forms
come in to play here as well, plus others, so I'd say it should be
disallowed, at least by default. I have no problem with some sort of
flag controlling this behavior, e.g., (set! *benchmark-mode* #t). Or
perhaps we want to say that all primitives are special forms or that
primitive identifiers are not assignable (I don't think so).
How about making call/cc a special form? I've often wondered if it
should be even though its evaluation rule would be the same as for
function application. Call/cc is basic to any system, and support
for it must be provided by the compiler, at least in the way it
represents things. Why should something be a function and not a
special form just because its evaluation rule coincides with the
evaluation rule for function applications?
(By the way, what about "not"? How many times have you seen someone
turn a conditional expression around to avoid the extra call?)
Kent
∂01-Jul-86 1040 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA Call-with-current-continuation
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 1 Jul 86 10:40:22 PDT
Received: from mitre-bedford.ARPA by MC.LCS.MIT.EDU 1 Jul 86 13:18:51 EDT
Organization: The MITRE Corp., Bedford, MA
Received: from jymme.sun.uucp by linus.MENET (1.1/4.7)
id AA02064; Tue, 1 Jul 86 13:19:55 EDT
Posted-Date: Tue, 1 Jul 86 13:21:34 edt
Received: by jymme.sun.uucp (2.0/SMI-3.0DEV3)
id AA02532; Tue, 1 Jul 86 13:21:34 edt
Date: Tue, 1 Jul 86 13:21:34 edt
From: ramsdell%linus@mitre-bedford.ARPA
Message-Id: <8607011721.AA02532@jymme.sun.uucp>
To: rrrs-authors%mc.lcs.mit.edu@mitre-bedford.ARPA
Subject: Call-with-current-continuation
I told a white lie. My worry about the way continuations are
perceived was generated from opinions expressed by a knowledgeable
computer scientist from Harvard, not by myself. This person showed a
good understanding of continuations, but worried about the runtime
overhead incurred even when continuations are used to express control
patterns that can be implemented using constant space (or a stack).
Agreeing with Kent, I cannot think of any way to promise something
about the execution of certain simple uses of continuations. I guess
we should leave the topic of how to use continuations to another
document.
We've heard reviews of r3rs from knowledgeable users of Scheme, has
anyone received an opinion of the document from a reader that is
representative of the general programming language community?
John
PS. Sorry about being sloppy about T's continuations. T of 1981
restricted continuations to those that allowed stack allocation of
control structure. You could not return from a continuation twice or
pass a continuation out of its defining environment. Thus, a more
correct statement is that CATCH and call of a T continuation was
syntax for stack-based continuations. In the interpreter, CATCH was
expanded to a lambda expression and a call to a procedure like
call-with-current-continuation, but the same restriction on the
continuations applied.
∂01-Jul-86 1432 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA Re: Remaining questions & remarks (2)
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 1 Jul 86 14:27:19 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 1 Jul 86 17:21:32 EDT
Received: from ti-csl by csnet-relay.csnet id aa02302; 30 Jun 86 15:51 EDT
Received: by tilde id AA19055; Mon, 30 Jun 86 13:55:24 cdt
Date: Mon 30 Jun 86 13:47:42-CDT
From: David Bartley <Bartley%ti-csl.csnet@CSNET-RELAY.ARPA>
Subject: Re: Remaining questions & remarks (2)
To: JAR%ai.ai.mit.edu@CSNET-RELAY.ARPA,
rrrs-authors%mc.lcs.mit.edu@CSNET-RELAY.ARPA
Cc: Bartley%ti-csl.csnet@CSNET-RELAY.ARPA
In-Reply-To: <"860626190326.1.jar@AI"@JOE-LOUIS.LCS.MIT.EDU>
Message-Id: <12218999275.23.BARTLEY@CSC60>
=======> Here are my comments. I don't care all that much about the items
=======> I've skipped over. --David Bartley
1. BEGIN vs. SEQUENCE: this is a pretty glaring ugliness in the report
[...]
(a) leave things as they are (BEGIN essential with non-essential
synonym SEQUENCE),
(b) remove BEGIN and make SEQUENCE essential (noting in the Notes
section that BEGIN, like #!TRUE etc., should be supported by
those implementations which care about running code written in
the past year).
=======> I strongly prefer (a). BEGIN is the traditional name and is easy
=======> to understand (even without END). SEQUENCE is a *type* in Common
=======> LISP and is likely to cause confusion. I thought Hal and Gerry
=======> had indicated at Brandeis that they were willing to revise the
=======> book to use BEGIN instead of SEQUENCE. (Is my memory faulty?)
2. Similarly but less glaringly, we have a problem with the numeric
comparisons. Again, many people have said they don't care but they only
want one set, with or without question marks. Thus I offer
the choices
(a) leave things as they are
(b) flush the alternative names <? <=? >? >=? =?
=======> (b)
3. REC and NAMED-LAMBDA :
Again, I sense capitulation on the part of some who have been stubborn.
The only options permitted are:
(a) Keep both
(b) Flush both
=======> (b).
4. SUBSTRING-MOVE-LEFT! and SUBSTRING-MOVE-RIGHT! :
=======> Flush them.
5. Should we say anything about the possibility of parallel or
interleaved argument evaluation? Remembering something I thought I
heard Will once say, I added the innocent little phrase "or perhaps
in parallel" to the description of procedure calling. Richard
Kelsey quickly pointed out that if it's mentioned as being a
possibly legal implementation, many otherwise valid scheme programs
may fail to run in implementations which do this, because they won't
do necessary synchronization. I agree; this is acceptable only if
we provide synchronization primitives.
=======> Flush the reference to parallel evaluation. Keep random order
=======> evaluation.
6. Number input exactness:
=======> I haven't come to terms with exactness yet, so I don't have an
=======> opinion. Has anyone implemented this yet?
7. Must a port still be a port (i.e. answer true to INPUT-PORT? or OUTPUT-PORT?)
after being closed?
=======> Yes. (Maybe. (I don't know. (What a question!)))
8. Apparently there's no difference between ABS and MAGNITUDE. Should we
keep both? If so, should I change the presentation in any way?
=======> Flush MAGNITUDE; keep ABS.
9. ANGLE is what Common Lisp calls PHASE; any interest in changing the
name? ...
=======> Use PHASE.
10. Two-argument arctangent (ATAN Y X) is unnecessary, since its effect
can be trivially achieved by (ANGLE (MAKE-RECTANGULAR X Y)). Do we
apply Occam's razor and remove it? If it's retained, then I'll just
document it as being the same as (ANGLE (MAKE-RECTANGULAR X Y)).
=======> Is there any problem with precision here? I'll go with the
=======> consensus.
11. JINX says: if PROCEDURE? exists, then a portable printer can be written.
=======> As Dan points out, we need to make it clear whether a
=======> continuation object is a "procedure" in the sense of this
=======> predicate. If we call it CLOSURE?, as someone (Kent Dybvig?)
=======> suggested, then it should perhaps discriminate against
=======> continuations. Since it is implementation-dependent whether
=======> continuations are easily distinguished from closures, I prefer a
=======> PROCEDURE? that is true of both closures and continuations.
12. (if x 1) vs. (cond (x 1))
(a) Change IF expressions so that they return the value of the
second form if the first form evaluates to false. [TRUE]
(b) Change COND and CASE so that they return an unspecified value if
there is no ELSE clause.
=======> (a), as amended.
13. Many people would like to see the (define ((((a b) c) d) e) ...)
feature go away. S&ICP doesn't use it, and it has a rather complicated
syntax (look at the BNF for evidence). Vote keep or flush.
=======> Flush.
14. Status of LOAD not resolved. If, as I suggested, LOAD is only
to be syntactically valid at top level of a file, shouldn't it be
renamed to be INCLUDE ?
=======> I'm not sure what INCLUDE means to people. My intuition is that
=======> INCLUDE is a conditional LOAD---it is ignored if the specified
=======> files has already been loaded. LOAD is unconditional and more
=======> appropriate as a building block for smarter capabilities.
15. Page breaks and tabs are mentioned in the report (actually I guess I
added them - sorry), but there are no #\PAGE or #\TAB characters.
Can this be made consistent by documenting #\PAGE and #\TAB, or [...]
=======> Lump these under "other whitespace". I intend to treat them as
=======> in Common LISP.
16. If page breaks are documented, should the terminate comments? I think
they should (but of course they don't in Common Lisp).
=======> They won't if they are just whitespace.
17. Bartley says: "the second sentence of the description of EQUAL? should
say that EQV? is used for all objects except pairs, vectors, and
strings." Forcing it to use EQV? seems kind of random to me. This
would of course make my notion of "apparent equivalence" useless,
destroying what I deluded myself into thinking was an elegant symmetry
between EQV? and EQUAL?; maybe it's a bogus idea anyhow. I
intentionally wanted to be silent on this point, allowing EQUAL? to
return true more often than EQV? perhaps, but I don't care that much.
=======> I think that explicitly mentioning EQV? would clarify things.
=======> In particular, people want to understand how EQ?, EQV?, and
=======> EQUAL? are related. I think its easier to understand them if
=======> they monotonically become less discriminating; thus all things
=======> that are EQ? are also EQV? and EQUAL? and all things that are
=======> EQV? are also EQUAL?.
18. Several people have complained about Clinger's perhaps overly accurate
description of what happens when variables become bound. To be
accurate, we have to say that locations are created and the initial
value is stored in the location, but this doesn't sit well with the
desire to have Scheme sound like an almost-functional language.
What to do?
=======> Keep Will's description.
21. Should section numbers be zero-based? I'm beginning to think this looks
unprofessional; and it just doesn't look right in several places. It
worked well in the previous version of the report, and it's clearly more
consistent with the language (which is zero-based), but it doesn't work
the way I've reorganized things. If you like zero-based section
numbers, speak up.
=======> One-based.
23. I flushed the historical note "CATCH could be provided by a procedure"
sentence (again, because two or three people thought it was random and I
agreed), but some of you have complained about this. Why should this
bit of history be present, but not others that are at least as
important?
=======> We need to explain that CALL/CC is more than CATCH.
24. CALL/CC was mentioned in a sentence in a rationale in the RRRS. I
flushed the reference because (a) a number of people find the name
CALL/CC quite distasteful and (b) it is inconsistent to mention here
that some scheme implementations provide an alternate name for this but
not also do so for LABELS, BLOCK, and a zillion other things.
=======> Keep CALL/CC.
Language:
Only one empty list, period. (eq? '() '()) returns true.
=======> Yes.
A port does not become closed as a side effect of reaching end of file.
After end of file, you'll continue to read end of file objects as long
as the port is open. It's an error to read from or write to a closed
port.
=======> Yes. Yes. Yes.
DISPLAY writes characters like WRITE-CHAR does.
=======> Yes.
=======> Regards,
=======> David Bartley
-------
∂01-Jul-86 1446 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA Re: Remaining questions & remarks (2)
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 1 Jul 86 14:34:20 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 1 Jul 86 17:28:39 EDT
Received: from tektronix by csnet-relay.csnet id ad03875; 30 Jun 86 19:09 EDT
Received: by tektronix.TEK (5.31/6.15)
id AA15265; Mon, 30 Jun 86 14:39:28 PDT
Received: by tekchips.TEK (5.31/6.15)
id AA08024; Mon, 30 Jun 86 14:41:11 PDT
Message-Id: <8606302141.AA08024@tekchips.TEK>
To: JAR@AI.AI.MIT.EDU
Cc: rrrs-authors@MC.LCS.MIT.EDU, willc%tekchips.tek.csnet@CSNET-RELAY.ARPA
Subject: Re: Remaining questions & remarks (2)
In-Reply-To: Your message of Thu, 26 Jun 86 19:03 EDT.
<"860626190326.1.jar@AI"@JOE-LOUIS.LCS.MIT.EDU>
Date: 30 Jun 86 14:41:09 PDT (Mon)
From: willc%tekchips.tek.csnet@CSNET-RELAY.ARPA
1. BEGIN vs. SEQUENCE...
(a) leave things as they are (BEGIN essential with non-essential
synonym SEQUENCE),
(b) remove BEGIN and make SEQUENCE essential (noting in the Notes
section that BEGIN, like #!TRUE etc., should be supported by
those implementations which care about running code written in
the past year).
*****> (a). Fix the book so we can get rid of SEQUENCE.
2. <names of arithmetic comparators>
(a) leave things as they are
(b) flush the alternative names <? <=? >? >=? =?
*****> (b). MacScheme will continue to support the alternative names.
3. REC and NAMED-LAMBDA...
(a) Keep both
(b) Flush both
*****> (b).
4. SUBSTRING-MOVE-LEFT! and SUBSTRING-MOVE-RIGHT!...
*****> Flush them, but encourage Chris Hanson to publish his suite of
operations in a separate document.
5. <the possibility of parallel or interleaved argument evaluation>
*****> Drop the comment. (I use call-without-interrupts, but that
might not be so sweet on some multiprocessors.)
6. Number input exactness: two proposals have been advanced to decide whether
a number is exact or inexact if it has no #I or #E prefix and contains no
trailing #'s.
(a) Inexact if there are digits following a decimal point, or if
exponential notation is used. Otherwise exact. (This makes
exctness similar to "floatness" in CL.)
(b) A proposal which Will advanced, which I'm unable to locate right
now, so he'll have to re-send it.
I'll additionally advance another alternative, and you can make up more of
your own:
(c) Always exact. E.g. "1.2" is exact.
*****> (b). The proposal was that exponents be treated as shorthand, so
for example 1.2e3 would be treated as though it had been written 1200,
1.2000e3 would be treated as though it had been written 1200.0, and so
on; if, after getting rid of the exponent in this way, there are
digits following a decimal point, then assume inexact; otherwise
assume exact.
(a) is also ok. I think scientists and engineers would quickly
become exasperated by (c), however.
7. Must a port still be a port...after being closed?
*****> No, but we shouldn't make a big issue of whatever we decide.
8. Apparently there's no difference between ABS and MAGNITUDE. Should we
keep both? If so, should I change the presentation in any way?
*****> Flush MAGNITUDE. Talk about ABS where MAGNITUDE is now talked
about.
9. ANGLE is what Common Lisp calls PHASE; any interest in changing the
name? ...
*****> I don't care.
10. Two-argument arctangent (ATAN Y X) is unnecessary, since its effect
can be trivially achieved by (ANGLE (MAKE-RECTANGULAR X Y)). Do we
apply Occam's razor and remove it? If it's retained, then I'll just
document it as being the same as (ANGLE (MAKE-RECTANGULAR X Y)).
*****> PLEASE don't flush two-argument ATAN, because an implementation
that supports flonums but not complexnums is going to have a hard
time with (ANGLE (MAKE-RECTANGULAR X Y)).
11. ...Is anyone opposed to having an essential procedure PROCEDURE?...
*****> I very much want one. I agree with Dan that
(call-with-current-continuation (lambda (k) (procedure? k)))
must be true.
12. (if x 1) vs. (cond (x 1)) -- this is inconsistent...
(a) Change IF expressions so that they return the value of the
second form if the first form evaluates to [true].
(b) Change COND and CASE so that they return an unspecified value if
there is no ELSE clause.
*****> (a).
13. Many people would like to see the (define ((((a b) c) d) e) ...)
feature go away.
*****> Flush. MacScheme will continue to support it.
14. Status of LOAD not resolved. If, as I suggested, LOAD is only
to be syntactically valid at top level of a file, shouldn't it be
renamed to be INCLUDE ?
*****> LOAD should be syntactically valid only at the top level of a file.
I suppose it should be renamed to INCLUDE, but I don't want to.
LOAD seems a more appropriate name for something that will in fact
be used interactively, even though we don't talk about interactive
programming in the report.
15. Page breaks and tabs are mentioned in the report (actually I guess I
added them - sorry), but there are no #\PAGE or #\TAB characters...
*****> Please neutralize the places that mention tabs and page breaks.
Let's not get hung up about characters.
16. If page breaks are documented, should [they] terminate comments?
*****> I think so.
17. Bartley says: "the second sentence of the description of EQUAL? should
say that EQV? is used for all objects except pairs, vectors, and
strings." Forcing it to use EQV? seems kind of random to me. This
would of course make my notion of "apparent equivalence" useless,
destroying what I deluded myself into thinking was an elegant symmetry
between EQV? and EQUAL?; maybe it's a bogus idea anyhow. I
intentionally wanted to be silent on this point, allowing EQUAL? to
return true more often than EQV? perhaps, but I don't care that much.
*****> I think your "apparent equivalence" was a valiant effort on behalf
of a lost cause. I think Bartley's suggestion will simplify the
report and will make the language easier to understand and use.
-----
Presentation questions:
18. Several people have complained about Clinger's perhaps overly accurate
description of what happens when variables become bound. To be
accurate, we have to say that locations are created and the initial
value is stored in the location, but this doesn't sit well with the
desire to have Scheme sound like an almost-functional language.
What to do?
*****> Admit that Scheme isn't functional. Add a note to the effect that
in programs without side effects one can safely pretend that the
variables are bound directly to the arguments.
19. What should the dedication be? Sussman suggested the PDP-6, which was
the world's first Lisp machine, but some people didn't like this joke.
I have changed it to Christopher Strachey in the draft.
*****> The abstract from the RRRS was a better joke, because it said
something serious. A dedication to DEC PDP-6 Serial Number 2
could well offend the memory of the person to whom the Algol 60
Report was dedicated, so I think we'd better flush it. Do we
have to have a dedication? I'm not sure how many of us actually
met Christopher Strachey. I remember Alonzo Church from the 1982
Lisp Conference, and he might be better; maybe we could dedicate
the report to both. I believe that Church died a couple of years
ago, but I might be thinking of Haskell Curry instead. Dan? Mitch?
20. Is it OK to replace "Lazy ML" with "SASL"...
*****> Yes.
21. Should section numbers be zero-based?
*****> I've decided that zero-based numbering is perceived as cutesy.
I've found it helpful to have an unnumbered introductory section
at the beginning of a chapter, which I think of as section 0 of
that chapter, but I think it's best not to number it that way.
My apologies for setting the precedent in the RRRS.
22. Was Scheme the first programming language to have first-class lexical
closures? Can we say anything edifying along these lines?
*****> I don't think Scheme was the first. Scheme is unique not because
it was the first to have anything (except full continuations, and
even there it was anticipated by one of Reynolds's unimplemented
languages), but because it was nearly the first at many things
and succeeded in integrating those avant garde features.
23. I flushed the historical note "CATCH could be provided by a procedure"
sentence (again, because two or three people thought it was random and I
agreed), but some of you have complained about this. Why should this
bit of history be present, but not others that are at least as
important?
*****> Something needs to be said about the evolution of the special form
into a procedure having a different name. As the paragraph stands
in the 3 June draft, it makes no connection between the operators
mentioned in the paragraph and call-with-current-continuation. The
typical reader will wonder why the paragraph is there. The reason
that history is called for in this instance is that the concepts
are completely new to most readers, and they will need help to
appreciate their significance. Someday the rationale will be
unnecessary, but by then the R3RS will be a standard reference
cited by people who want to talk about the history of
continuations.
I favor adding a sentence such as "CALL-WITH-CURRENT-CONTINUATION
is equivalent in power to the 1975 CATCH, but is a procedure rather
than a special syntax."
24. CALL/CC was mentioned in a sentence in a rationale in the RRRS. I
flushed the reference because (a) a number of people find the name
CALL/CC quite distasteful and (b) it is inconsistent to mention here
that some scheme implementations provide an alternate name for this but
not also do so for LABELS, BLOCK, and a zillion other things.
*****> As someone who writes manuals for a mass audience, I find the name
CALL/CC quite distasteful. It was in the RRRS to placate those
who objected to the length of CALL-WITH-CURRENT-CONTINUATION.
This was a political compromise; I suggest we leave the RRRS
wording alone rather than try to achieve a new compromise.
25. How best to resolve the inconsistencies between terminology in text and
semantics? Namely: "I", "Ide", "identifier" in semantics vs. "variable"
in text; "Com", "command" in semantics vs. "statement" in text.
*****> In the abstract syntax, say "identifiers (variables)" and
"commands (statements)".
26. FORCE & DELAY are still problematic...
*****> I don't care.
27. Is 3.0.2 (description of procedure calls) a good place to take note that
() is not a valid procedure call?
*****> Ok with me.
28. In section 0.0, 2nd paragraph, before the terms "variable" and
"identifier" have been defined, it should say "variable" instead of
"identifier" to be consistent with the rest of the report. Is that OK?
*****> Yes. Dan points out that the semantics of "variable" is highly
variable, but we have an advantage over most authors in that people
can turn to the formal syntax and semantics if they want to know
what's really going on. Section 2.0 is a pretty good informal
description. I think people can deal with a few loaded terms
in an overview like section 0.0.
29. There are two nonterminals in the BNF that need names. Currently they
are called <formals> and <formalz> which was never intended to be a
serious suggestion (I put it there to see if anyone would actually read
the BNF!). Actually one or both of these can go away if NAMED-LAMBDA
and/or (DEFINE ((( ...) ...) ...) ...) go away. Can someone who likes
these things take a look at the BNF and suggest names for these?
*****> I hope NAMED-LAMBDA and the complicated DEFINE syntax depart from
the report, but even if they do we still have to deal with <formalz>
in the (DEFINE (FOO . X) ...) syntax; perhaps the possibilities
could be expanded in-line.
30. Someone wanted me to avoid discussion of immutable objects in the
discussion of operational equivalence in the 2nd paragraph before entry
for EQV? . I want to mention immutability there because I think it's
important to warn users that this might be the case, otherwise they can
easily end up writing unportable code.
*****> In my opinion, the paragraph in question is too little to deal
with the problem. It uses "immutable" without explaining what
it means; worse, it appears that the typical reader is supposed
to know as a matter of course that "mutation procedures" (whatever
they are) can't be applied to immutable objects. As to which
objects are immutable, all we have is the suggestion that objects
returned by literal expressions may be immutable.
I believe the paragraph at the end of 3.0.1 is sufficient. The
report is a definition, not a tutorial.
-----
DISPLAY writes characters like WRITE-CHAR does.
*****> I assume it's ok for an implementation that represents characters as
imaginary numbers to have (DISPLAY #\a) print "-97i"?
Peace, Will
∂02-Jul-86 0515 @MC.LCS.MIT.EDU:JMILLER@OZ.AI.MIT.EDU Re: Remaining questions & remarks (2)
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 2 Jul 86 05:15:44 PDT
Received: from OZ.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 2 JUL 86 08:14:17 EDT
Date: 2 Jul 1986 08:13-EDT
Sender: JMILLER@MIT-OZ
Subject: Re: Remaining questions & remarks (2)
From: JMILLER@MIT-OZ
Reply-To: JMiller%OZ@MC
To: Bartley%ti-csl.csnet@CSNET-RELAY
Cc: RRRS-Authors@MC
Message-ID: <[MIT-OZ] 2-Jul-86 08:13:05.JMILLER>
In-Reply-To: <12218999275.23.BARTLEY@CSC60>
I suggest the name APPLICABLE? instead of PROCEDURE?. I
personally do not regard continuations as procedures, but I
completely understand and empathize with people on the other
side. I think the notion of applicable is a legitimate
generalization and probably would solve Bill's portable printer
problem just as well.
--Jim
∂02-Jul-86 0557 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA Call-with-current-continuation
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 2 Jul 86 05:57:07 PDT
Received: from mitre-bedford.ARPA by MC.LCS.MIT.EDU 2 Jul 86 08:54:07 EDT
Organization: The MITRE Corp., Bedford, MA
Received: from jymme.sun.uucp by linus.MENET (1.1/4.7)
id AA16445; Wed, 2 Jul 86 08:55:09 EDT
Posted-Date: Wed, 2 Jul 86 08:56:47 edt
Received: by jymme.sun.uucp (2.0/SMI-3.0DEV3)
id AA03112; Wed, 2 Jul 86 08:56:47 edt
Date: Wed, 2 Jul 86 08:56:47 edt
From: ramsdell%linus@mitre-bedford.ARPA
Message-Id: <8607021256.AA03112@jymme.sun.uucp>
To: rrrs-authors%mc.lcs.mit.edu@mitre-bedford.ARPA
Subject: Call-with-current-continuation
I told a white lie. My worry about the way continuations are
perceived was generated from opinions expressed by a knowledgeable
computer scientist from Harvard, not by myself. This person showed a
good understanding of continuations, but worried about the runtime
overhead incurred even when continuations are used to express control
patterns that can be implemented using constant space (or a stack).
Agreeing with Kent, I cannot think of any way to promise something
about the execution of certain simple uses of continuations. I guess
we should leave the topic of how to use continuations to another
document.
We've heard reviews of r3rs from knowledgeable users of Scheme, has
anyone received an opinion of the document from a reader that is
representative of the general programming language community?
John
PS. Sorry about being sloppy about T's continuations. T of 1981
restricted continuations to those that allowed stack allocation of
control structure. You could not return from a continuation twice or
pass a continuation out of its defining environment. Thus, a more
correct statement is that CATCH and call of a T continuation was
syntax for stack-based continuations. In the interpreter, CATCH was
expanded to a lambda expression and a call to a procedure like
call-with-current-continuation, but the same restriction on the
continuations applied.
∂02-Jul-86 1652 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Remaining questions & remarks (2)
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 2 Jul 86 16:51:54 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 2 JUL 86 19:49:14 EDT
Date: Wed, 2 Jul 86 19:50:46 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Remaining questions & remarks (2)
To: JMiller@OZ.AI.MIT.EDU
cc: Bartley%ti-csl.csnet@CSNET-RELAY.ARPA,
RRRS-Authors@MC.LCS.MIT.EDU
In-reply-to: Msg of 2 Jul 1986 08:13-EDT from JMILLER at MIT-OZ
Message-ID: <[AI.AI.MIT.EDU].64955.860702.JAR>
Date: 2 Jul 1986 08:13-EDT
From: JMILLER at MIT-OZ
I suggest the name APPLICABLE? instead of PROCEDURE?. I
personally do not regard continuations as procedures, but I
completely understand and empathize with people on the other
side. I think the notion of applicable is a legitimate
generalization and probably would solve Bill's portable printer
problem just as well.
It never occurred to me that the two words could mean anything
different. Certainly whatever the name is, the predicate would return
true of all applicable things, including CAR, things created by
CALL-WITH-CURRENT-CONTINUATION, and values of LAMBDA-expressions.
If the term for this kind of object changes, then the word "procedure"
must be replaced by "applicable object" throughout the entire report. The
term "procedure," which everyone has been so careful to use so far, would
become useless for any purpose I can think of, e.g. describing the
domains of procedures. That would be unfortunate.
∂07-Jul-86 0929 @MC.LCS.MIT.EDU:VERACSD@A.ISI.EDU CL Compatiblity Package
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 7 Jul 86 09:29:21 PDT
Received: from A.ISI.EDU by MC.LCS.MIT.EDU 7 Jul 86 12:24:30 EDT
Date: 7 Jul 1986 12:23-EDT
Sender: VERACSD@A.ISI.EDU
Subject: CL Compatiblity Package
From: VERACSD@A.ISI.EDU
To: scheme@MC.LCS.MIT.EDU
Cc: veracsd@A.ISI.EDU
Message-ID: <[A.ISI.EDU] 7-Jul-86 12:23:31.VERACSD>
Does anyone have a CommonLisp compatiblity package for Scheme
that they are willing to share? I have developed a rudimentary
package for MacScheme, but am interested in something more
complete.
-- Cris Kobryn
∂07-Jul-86 1254 @MC.LCS.MIT.EDU:cth%indiana.csnet@CSNET-RELAY.ARPA votes and things
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 7 Jul 86 12:53:08 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 7 Jul 86 15:51:53 EDT
Received: from indiana by csnet-relay.csnet id ai12245; 7 Jul 86 15:44 EDT
Date: Mon, 7 Jul 86 12:50:06 est
From: Chris Haynes <cth%indiana.csnet@CSNET-RELAY.ARPA>
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: votes and things
Cc: dfried%indiana.csnet@CSNET-RELAY.ARPA
The 3 in R↑3RALS is clever, but it looks just like a footnote
reference when the Report is cited. Such puns hurt others more than
they entertain us. How about just "Report on the Algorithmic
Language Scheme". That's different enough from all the previous
report names to avoid confusion, and brevity is a particular virtue
in things, such as titles, that are refered to repeatedly.
I strongly second John Ramsdell's comments about the introduction.
If not religated to the end, the historical material should at least
be in a seperate section following the introduction. I also agree
with him that call-with-{input,output}-PORT is better than ...-FILE
now that we have the ...-PORT? predicates.
I've used the words KEYWORD and IDENTIFIER for what Jonathan is
calling IDENTIFIER and VARIABLE, respectively. I agree with Dan that
VARIABLE is confusing, because it is often used to mean LOCATION.
But I don't feel strongly. However, it is best not to have one word
for both: if you ever mean "keyword and identifier" (or "identifier
and variable"), and not just "symbol", then say so.
My votes follow (I care most about the first and last):
1. (a) leave BEGIN alone
2. (b) flush <?, et al.
3. (b) flush REC (sigh) and NAMED-LAMBDA
4. flush SUBSTRING-MOVE-...
5. flush parallelism references, keep random order
6. (a) inexact like CL "floatness"
7. yes, objects (even ports) should never change type, or there will
be some big surprises.
8. flush MAGNITUDE
9. change ANGLE to PHASE
10. keep two-argument ATAN
11. add PROCEDURE?. For pedagogy I like to maintain a distinction
between primitives, closures (LAMBDA expression values) and reified
continuations, and I use "procedure" to refer to any applicable object.
The programmer shouldn't be able to tell the difference, so the language
should only support PROCEDURE?.
12. (c) Flush one armed IF, and replace by WHEN, as suggested by Kent
and Dan.
13. flush (define ((a b) c) ...)
14. keep LOAD as is
15. treat page breaks and tabs as whitespace, and say no more
17. EQ?, EQV? and EQUAL? should increase in strength monotonically,
as David suggested.
18. keep Clinger's accuracy wrt variables
19. Do we really need a dedication? If so, Strachey is more appropriate
than the PDP-6, Curry is better, and Church seems best.
20. SASL
21. one-based section numbering
22. Landin and Reynolds should be credited with introducing
first-class closures and continuations, but it should be emphasized
that Scheme was the first widely used language to support them and is
still the most used language that supports both.
23. note the difference between CATCH and continuations somewhere
24. CALL/CC should be listed under CALL-WITH-CURRENT-CONTINUATION as
an (optional) procedure. It should be mentioned in the following
discussion that it is an equivalent abbreviation, with no other
apology offered. Dispite objections to it by some, it is more widely
used and refered to than some other things that we have kept by way
of compromise.
Regards,
Chris Haynes
∂08-Jul-86 0538 @MC.LCS.MIT.EDU:dyb%indiana.csnet@CSNET-RELAY.ARPA display and write-char
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 8 Jul 86 05:38:31 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 8 Jul 86 08:37:47 EDT
Received: from indiana by csnet-relay.csnet id ac19489; 8 Jul 86 8:37 EDT
Date: Tue, 8 Jul 86 01:17:19 est
From: Kent Dybvig <dyb%indiana.csnet@CSNET-RELAY.ARPA>
To: jar@MC.LCS.MIT.EDU
Subject: display and write-char
Cc: rrrs-authors@MC.LCS.MIT.EDU
DISPLAY writes characters like WRITE-CHAR does.
It seems to me that this only works if the character type is
distinct from other types. I would not want display to print
an integer that happens to be a character (assuming integers
are used to represent characters) as the character value
instead of the expected sequence of numerals.
For example, if the character #\A is equivalent to the integer
65, then it seems that either
1) (write-char #\A) prints A and (display 65) prints A, or
2) (display 65) prints 65 and (write-char #\A) prints 65.
I think the original intent was that (write-char #\A) print A
and (display 65) print 65, even if #\A and 65 are the same.
Am I missing something?
Kent
∂08-Jul-86 2347 @MC.LCS.MIT.EDU:WAND%northeastern.edu@CSNET-RELAY.ARPA remaining questions & remarks (2)
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 8 Jul 86 23:47:40 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 9 Jul 86 02:46:51 EDT
Received: from northeastern by csnet-relay.csnet id af28296; 9 Jul 86 2:44 EDT
Date: Tue, 8 Jul 86 13:43 EST
From: MITCHELL WAND <WAND%northeastern.edu@CSNET-RELAY.ARPA>
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: remaining questions & remarks (2)
My comments on the "remaining questions" and a few other things:
I. I second Chris Haynes's comments on the title "R↑3RS..". It is not only
too cutesy, but also suggests an aura of impermanence: these guys are going
to keep going until....
II. Kent Dybvig should be an author, on the same basis as Kent Pitman.
Comments on the numbered issues:
1. (a) leave BEGIN essential, SEQUENCE optional.
2. (b) flush <?, etc.
3. (b) flush both REC and NAMED-LAMBDA. I feel very uneasy, however, about
the overall status of special forms, both system- and user-supplied. I will
be very unhappy if I can't have a conforming Scheme that happens to have a
REC. I suspect that this situation merely reflects our lack of understanding
of this issue.
5. Flush the possibility of parallel or interleaved argument evaluation.
7. Yes, a port must be a port forever, else what's an object for?
9. Sure, use PHASE (suppress gratuitous incompatibilities)
10. Keep 2-arg ATAN.
11. Include PROCEDURE?, and make it be true of continuations. I would also be
happy with the name APPLICABLE?, though I prefer PROCEDURE?. I strongly
oppose the name CLOSURE? .
12. (a) 2-argument IF should return the value of the 2nd arg if the first is
true. (when pred exp) is OK too.
13. Flush (define ((((a b) c) d) e) ...)
18. DEFINITELY keep Clinger's description of variable binding. It's the only
hope of sanity. As Dan pointed out, Scheme is closer to Algol than it is to a
functional language, and that's a good bit of why it's useful.
19. I vote for Chris Strachey. Church was still alive the last time I looked.
Curry was the one who died, but he had not thought much, so far as I know,
about the computational implications of his work (even though he did some
numerical analysis on the ENIAC in 1944-46, see Seldin & Hindley, "To H.B.
Curry..." 1980, p. x). I think Strachey's work, as amplified and expounded
through Scott, Stoy, Milne, etc., is a far more direct intellectual source of
our work (as expounded through Scheme) [the "our" here meaning the Scheme
community, not just me.].
20. For call-by-name, how about Algol? "This is distinct from the situation in
languages such as SASL or Algol 60, where arguments are passed by name, so
that an argument expression is not evaluated unless its value is needed by the
procedure". This sentence needs to be careful not to confuse call-by-name
with call-by-lazy or other similar things.
21. I vote for one-based section numbering. I think zero-basing is cutesy.
Also, if we are going to copy the Algol 60 typography, then sub*section
numbers should always be terminated by a period e.g.,
4.5.3.1. If statement. .... (Algol report, page 10).
23. I vote to keep the historical note about CATCH being provided by a
procedure, since Scheme IS (so far as I know) the first language to do this.
Mitch Wand
∂09-Jul-86 0340 @MC.LCS.MIT.EDU:HAL%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU mitch wand's comments
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 9 Jul 86 03:40:15 PDT
Received: from OZ.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 9 JUL 86 06:39:47 EDT
Date: Wed, 9 Jul 1986 06:37 EDT
Message-ID: <HAL.12221269278.BABYL@MIT-OZ>
From: HAL%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: mitch wand's comments
In-reply-to: Msg of 8 Jul 1986 14:43-EDT from MITCHELL WAND <WAND%northeastern.edu at CSNET-RELAY.ARPA>
I second the vote for Strachey
∂10-Jul-86 1015 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU number syntax
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 10 Jul 86 09:08:00 PDT
Received: from LIVE-OAK.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 10 JUL 86 12:07:13 EDT
Received: from ROCKY-GRAZIANO.LCS.MIT.EDU by MIT-LIVE-OAK.ARPA via CHAOS with CHAOS-MAIL id 3966; Thu 10-Jul-86 12:08:18-EDT
Date: Thu, 10 Jul 86 12:09 EDT
From: Jonathan A Rees <JAR@MIT-AI.ARPA>
Subject: number syntax
To: David Bartley <Bartley%ti-csl.csnet@CSNET-RELAY.ARPA>
cc: rrrs-authors@MIT-MC.ARPA
Message-ID: <860710120911.5.JAR@ROCKY-GRAZIANO.LCS.MIT.EDU>
Date: Tue 17 Jun 86 16:00:31-CDT
From: David Bartley <Bartley%ti-csl.csnet at CSNET-RELAY.ARPA>
To: RRRS-Authors%mit-mc at CSNET-RELAY.ARPA
cc: Bartley%ti-csl.csnet at CSNET-RELAY.ARPA
Re: Number syntax
Message-Id: <12215615581.31.BARTLEY@CSC60>
One irritant in the Report that we have neglected to comment on until
now (sorry!) is the syntax of numbers. We believe that Scheme numbers
are essentially equivalent to Common Lisp numbers except for the new
notion of exactness. To the extent that that is so, it seems to be a
(shudder!) ``gratuitous difference'' from Common Lisp to have an
incompatible syntax.
The R↑3RS doesn't make clear which subset of the syntax of numbers is
essential and what is optional. As implementors of systems in which
Scheme and Common Lisp must co-exist, we're faced with two potential
compatibility issues: (1) going with an ``extended subset'' of the
Report's number syntax that is compatible with Common Lisp, or (2)
going with the full number syntax in the Report to be compatible with
all other Scheme implementations.
What we'd like to see is an essential syntax for numbers which is
compatible with Common Lisp's. Additional features, including
exactness, would be optional extensions. Even so, they should not
conflict with Common Lisp. For example, the use of `#s' and the order
of <sign> and <prefix> are different in the two languages.
Our motivation, of course, is that we'd like programmers to feel free to
use either language and exchange files of data without irritating
obstacles being thrown in their path. If we can't agree on a
consistent syntax for numbers, then we'll have to provide each language
with two readers and the user will have to know which one to use.
(There are other problems, of course, such as whether `:' is a
constituent of an identifier or associated with Common Lisp package
designations. We may have to go with separate readers/modes anyway.)
Does anyone agree with us? Is there time to make such a change before
R↑3RS goes to press?
I think everyone agrees with you, and that there is time. Could you
please write a concrete proposal, preferably something close to being
suitable for inclusion in the report. Also please provide BNF. Thanks.
Jonathan
∂10-Jul-86 1016 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU call-with-*put-file --> call-with-*put-port
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 10 Jul 86 09:58:39 PDT
Received: from LIVE-OAK.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 10 JUL 86 12:58:04 EDT
Received: from ROCKY-GRAZIANO.LCS.MIT.EDU by MIT-LIVE-OAK.ARPA via CHAOS with CHAOS-MAIL id 3969; Thu 10-Jul-86 12:59:10-EDT
Date: Thu, 10 Jul 86 13:00 EDT
From: Jonathan A Rees <JAR@MIT-AI.ARPA>
Subject: call-with-*put-file --> call-with-*put-port
To: rrrs-authors@MIT-MC.ARPA
Message-ID: <860710130002.6.JAR@ROCKY-GRAZIANO.LCS.MIT.EDU>
Date: Fri, 27 Jun 86 11:37:13 edt
From: ramsdell%linus at mitre-bedford.ARPA
To: rrrs-authors%mc.lcs.mit.edu at mitre-bedford.ARPA
Re: r3rs presentation
[pg. 29] If call-with-current-continuation calls its argument with
the current continuation, should the I/O routines call-with-input-file
and call-with-output-file be renamed call-with-input-port and
call-with-output-port?
I think this is a good idea. Does anyone object?
Jonathan
∂10-Jul-86 1228 @MC.LCS.MIT.EDU:MICHAEL@CS.COLUMBIA.EDU How big would a "minimal" scheme interpreter be?
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 10 Jul 86 12:28:21 PDT
Received: from CS.COLUMBIA.EDU by MC.LCS.MIT.EDU 10 Jul 86 15:22:56 EDT
Date: Thu 10 Jul 86 15:22:04-EDT
From: Michael van Biema <MICHAEL@CS.COLUMBIA.EDU>
Subject: How big would a "minimal" scheme interpreter be?
To: scheme@MC.LCS.MIT.EDU
Message-ID: <12221626971.27.MICHAEL@CS.COLUMBIA.EDU>
Where minimal means just the interpreter no heap etc.
Michael
-------
∂10-Jul-86 1300 @MC.LCS.MIT.EDU:andy@sun3.ads.ARPA My comments on the R↑RS
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 10 Jul 86 12:56:30 PDT
Received: from grape.ads.ARPA by MC.LCS.MIT.EDU 10 Jul 86 15:38:51 EDT
Date: Thu, 10 Jul 86 12:39:26 PDT
From: andy@sun3.ads.ARPA (Andy Cromarty)
To: jar%mit-mc@ads.arpa
Subject: My comments on the R↑RS
Cc: rrrs-authors%mit-mc@ads.arpa
Jonathan,
I've enclosed my comments on the R↑3RS in this note
separately from my answers to your specific questions you asked.
Hope this helps. By the way, I know that putting this all together
involves a lot of work (and sometimes a lot of refereeing), and you
should be aware that your contribution isn't going unappreciated. Thanks
for all the hard work you're putting in, and my apologies in advance
if I err here due to an insufficiently detailed reading of the report.
asc
------------------------------------------------------------------------
1. I am concerned that we have multiple conflicting goals in the
design of the document. Sometimes it is a reference manual,
and sometimes it is a technical report, and sometimes it is a
users' guide. Perhaps we must live with this if there is to
be only one report, but it might be a good idea to try to
separate out (say) the history from the reference manual parts.
This is reflected in the discussions about moving or removing
the history section, for example.
2. As you might expect, I would like to see a somewhat more vigilant
attitude in warding off the dark forces of Common Lisp. It is not
compatibilities or incompatibilities that are gratuitous; it is
the very act of being concerned with compatibility at all that is
gratuitous. We should have our own standards of what a good LISP
looks like and stick to them. The first job of a good language is
to be a good language, not to be just like another bad language
that's familiar (nor even just like another good language that's
familiar). Common Lisp's goals were nearly the opposite of
Scheme's, and however good a job the CL committee did, we owe them
no homage. I recognize that this is more an issue of the design
of Scheme than of its documentation in a report, but there seems
to me to be entirely too much concern for similarities and
dissimilarities w.r.t. Common Lisp in the report. It may be
appropriate to discuss the topic of Scheme vs. CL briefly in the
historical section, but there should be a very clear message to the
reader that CL followed Scheme -- and continues to, in the sense
that Scheme is meant to be a progressive attempt at (LISP) language
design rather than a codification and standardization of existing
ideas in prior LISPs. The CL people should be writing reports
that compare their work to ours, not the other way around. ``Let
them eat cake.'' [OK, flame off.]
3. On p.2 you list me as a Brandeis participant. Would that it were
true. I will leave to your judgement whether I should be listed
in the acknowledgements, as an author, or otherwise.
4. I agree with both your observations on the Syntax section (0.1)
-- that it makes sense to have one there and that it isn't clear
what it should say. Perhaps a fairly terse or brief description of
Scheme's simple syntax would do, e.g.
The syntax of Scheme, like that of most LISPs, provides
for great expressive power, largely due to its simplicity.
An important consequence of this simplicity is the
susceptibility of Scheme programs and data to uniform
treatment by other Scheme programs. As with other LISPs,
the ``read'' function actually parses its input; that is, it
performs syntactic as well as lexical decomposition of what
it reads, rendering input in a uniform internal representation
and making it particularly easy to manipulate Scheme programs
and data in a correspondingly direct and uniform fashion.
Scheme employs a parenthesized-list Polish notation to
describe programs and (other) data, with lists recursively
defined as being composed of lists and what are
sometimes referred to as ``atomic'' objects (numbers,
symbols, etc.) \foot{Unlike most LISPs, Scheme does not
explicitly provide a predicate for assessing atomicity,
although it does contain predicates for determining whether an
object is a list, symbol, number, etc.} The syntax of Scheme
expressions is described formally in greater detail later in
this report.
5. Identifiers & keywords: Sections 1.0 and 2.0 gave me pause,
because I have been concerned for some time with the keyword
problem in Scheme (and I admit to being dissatisfied with the
most common solution). The statement
``Any identifier which is not a syntactic keyword may be
used as a variable....''
which appears in both sections implies that there are keywords in
the language, although (a) there aren't guaranteed to be and (b)
you haven't said anything previously about keywords in the
document. The astute reader will then turn to the index to find
out what she has missed, only to discover that there is no entry
at all for keywords. Later on there is a discussion of keywords,
but it is essentially an afterthought, and by now the reader may
have decided that Scheme really is Pascal after all (Andrew, bite
your tongue). Something needs to be done to clear up the
potential confusion from the initial presentation of identifiers
vs. keywords. The inline "Note:" on p.6 probably does not serve
to clarify things as much as it might.
6. P. 6, SS 2.0: Yes, mention that there are no guarantees that a
``top-level'' exists. (Then encourage the rest of the RRRRS
authors read that paragraph....)
7. SS 2.1, p.6 implies that there are other values besides #f that
count as false. Except for the optional #!false, I'm not sure I
see what these are. Perhaps you count things like (NOT #T) as
false for the purposes of this section?
8. p. 7, SS3.0.2 -- Typo at bottom of page, ``combinations. .''
9. p.7 SS 3.0.2: It may not be clear to non-LISPophiles what
``+`` evals to, or why ``+'' gets evaluated in the example
(+ 3 4) => 7
((if #f + *) 3 4) => 12
The idea of a function name evaluating to a functional object
will not be intuitive for most readers, who probably think in
languages that don't have first-class procedures. Perhaps
something can be done to make this clearer.
10. There are a few minor report points that reflect major
underlying problems we really have yet to solve in the design
of Scheme, involving things like COND, IF, and perhaps LET. The
syntax definitions provided earlier on in the report make (COND ((X)))
a legal expression, and we've already had the n-armed IF argument.
Similarly, (LET () (DOSOMETHING)) is legal, although perverse and
not obviously useful. (The latter expression actually appears in
the report, at the top of p.10 col2, although I can see no reason
to have used it -- the example would have worked fine without it.)
I think what has happened is that we never resolved the issue of
``functions'' that don't return values. Instead we developed, or
permitted the random evolution of, a hodgepodge of mutually
inconsistent local solutions: DEFINE is not an expression, IF may
(or may not) have an undefined return value, (COND ((X))) returns
(X), etc. We still have design work to do.
11. On a related syntax (or is it design?) point, on p.9, SS3.1.0, the
expression (CASE TEST (() (FOO))) is permitted. It's not clear to me
why we want to permit this, nor what it means if we do. Strictly,
it would always be ignored, in which case it's spurious.
Similarly, (CASE TEST) is legal; strictly it returns <unspecified>
but seems senseless nonetheless.
12. I cannot refrain from observing that DO is truly ugly, a
veritable pig of a construct, and we could have done better.
We are indeed fortunate that its use under practical circumstances
is rarely necessary.
13. The Note: on p.11 about DO in which you describe assignment vs.
rebinding is guaranteed to be lost on the majority of readers.
An example of how it differs from other LISPs' DO might help.
14. On p.12 where QUASIQUOTE is introduced, as a purely typographic
observation, we really need a better backquote character. It's
very hard to read the character at all in the copy of the report
I have, especially at that point size. At first glance I thought
in all honesty that it was a speck of ink on my copy. (I believe
my hardcopy came from MIT, although its route was sufficiently
mysterious that it might have been printed at Berkeley instead.)
15. SS 4.0 talk about the ``top level,'' as if there is one; cf. my
point #6 above.
16. SS 4.1, p.12, first sentence: I find this ambiguous:
Definitions are not valid in all contexts where expressions
are allowed; they are only valid at the top level [sic] of
a <program> and at the beginning of a lambda body.
This could mean any of several things, e.g.:
Definitions are invalid in all contexts where expressions are
allowed (i.e. there are no contexts in which definitions are
valid where expressions are allowed)....
or
Definitions are invalid in some contexts where expressions
are allowed (i.e. there exist contexts where expressions are
allowed but wherein definitions are not allowed)....
This probably needs to be rephrased for people who don't already
know what it's trying to say.
17. Top of p.13 col1: You have ``(. <variable>) would be understood
to mean simply <variable>.'' Why permit this? It offers no
additional functionality and strikes me as an unclean misfeature.
18. p.14, SS 5.1: Misspelling, ``distint'' => ``distinct''.
19. p.17, SS5.2: Misspelling, ``decsription'' => ``description''.
20. Predicates: As far as I could see, we never actually commit to
putting ``?'' at the end of predicates, although we do
mention on p.18 that functions like ASSV don't end in ``?''
because they aren't predicates. This convention would be a good
thing to assert. (It also would blow the people who dislike >?
out of the water, I'm afraid.)
21. p. 18, SS 5.3, First sentence: ``entirely'' is massive
overstatement here. There are lots of bases for the utility of
symbols -- like their use as printable undoublequoted objects, which
seems to me to have been lost almost entirely [sic] on the
Scheme community (hence the rejection of upper/lower case
distinction). (Incidentally, CommonLisp also gets control of
UC/LC terribly wrong, to my eternal annoyance when I build
distributed multiprocessing mostly-LISP-based systems that want
to communicate by passing case-varying symbol tokens instead of
strings.)
22. p.28, SS 5.8: What happened to TeX in the middle of column 2
where it says ``The escape procedure''? Misplaced manual
linebreak, perhaps.
23. NOTES, p.35ff.: This material should stay somehow. We need to
make it clear that R↑3 Scheme is not being touted as Yet Another
Ultimate Solution To The Programming Language Problem, but rather
as a snapshot of a *process* of good design, for which not all
answers have yet been found. We also ought to use the opportunity
for publicity afforded us by SIGPLAN to advertise some of the thorny
unsolved problems that need further research, and encourage
language designers to work on them.
-------------------------------------------------------------------------
∂10-Jul-86 1313 @MC.LCS.MIT.EDU:MICHAEL@CS.COLUMBIA.EDU [Michael van Biema <MICHAEL@CS.COLUMBIA.EDU>: How big would a "minimal" scheme interpreter be?]
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 10 Jul 86 13:13:16 PDT
Received: from CS.COLUMBIA.EDU by MC.LCS.MIT.EDU 10 Jul 86 15:59:39 EDT
Date: Thu 10 Jul 86 15:58:42-EDT
From: Michael van Biema <MICHAEL@CS.COLUMBIA.EDU>
Subject: [Michael van Biema <MICHAEL@CS.COLUMBIA.EDU>: How big would a "minimal" scheme interpreter be?]
To: scheme@MC.LCS.MIT.EDU
Message-ID: <12221633641.27.MICHAEL@CS.COLUMBIA.EDU>
Return-Path: <@MC.LCS.MIT.EDU:Network←Server@MIT-MULTICS.ARPA>
Received: from MC.LCS.MIT.EDU by CS.COLUMBIA.EDU with TCP; Thu 10 Jul 86 15:53:57-EDT
Received: from MIT-MULTICS.ARPA by MC.LCS.MIT.EDU 10 Jul 86 15:28:35 EDT
Received: from MC.LCS.MIT.EDU by MIT-MULTICS.ARPA TCP; 10-Jul-1986 15:28:06-edt
Received: from CS.COLUMBIA.EDU by MC.LCS.MIT.EDU 10 Jul 86 15:22:56 EDT
Date: Thu 10 Jul 86 15:22:04-EDT
From: Michael van Biema <MICHAEL@CS.COLUMBIA.EDU>
Subject: How big would a "minimal" scheme interpreter be?
To: scheme@MC.LCS.MIT.EDU
Message-ID: <12221626971.27.MICHAEL@CS.COLUMBIA.EDU>
Where minimal means just the interpreter no heap etc.
Michael
-------
-------
∂10-Jul-86 1342 @MC.LCS.MIT.EDU:wagle%iuvax.indiana.edu@CSNET-RELAY.ARPA Re: Remaining questions & remarks (2)
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 10 Jul 86 13:42:30 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 10 Jul 86 16:09:15 EDT
Received: from indiana by csnet-relay.csnet id ah09559; 10 Jul 86 15:54 EDT
Date: Thu, 10 Jul 86 14:06:35 est
From: Perry Wagle <wagle%iuvax.indiana.edu@CSNET-RELAY.ARPA>
To: rrrs-authors%mit-mc.CSNET@CSNET-RELAY.ARPA
Subject: Re: Remaining questions & remarks (2)
Cc: wagle%iuvax.indiana.edu@CSNET-RELAY.ARPA
(2) <, >, etc are composed solely of "special symbols", and classically are
predicates. With this view in mind, perhaps the exception is not so big
as naive application of Occam's Razor would suggest. I support essential
<, >, etc, and the removal of their "xxx?" counterparts.
(5) Many otherwise portable Scheme programs would die under unrestrained
interleaving. I claim that a Scheme should have the semantics of a
single logical processor no matter what the underlying architecture is.
I think that mention of parallelism should be left out altogether, as
any mention would call for ad hoc measures (synchronization primitives?
bleagh!), and restraint to a "single logical processor" is probably an
obituary (within ten years or so?).
(7) I would like to guard input and output commands with INPUT-PORT? and
OUTPUT-PORT? respectively. I think closed ports SHOULD be ports, but
not input or output ports; I support the predicate: PORT?.
(11) I would very much like PROCEDURE? and consider continuation objects
to be procedures. While appealing, I don't support APPLICABLE? as it
would be the only type predicate that doesn't name the type its checking
for.
(12) I oppose one-armed IFs. I've been happy with WHEN and UNLESS that
return NIL when the condition isn't met.
(14) I have "meta"-procedures that invoke LOAD. I *demand* that you not cut
my arms and legs off for "esthetic reasons".
(15) I think that *all* ASCII characters should be "legibly typable" (e.g.
#\null, etc), but then I only run on ASCII machines.
∂10-Jul-86 1540 @MC.LCS.MIT.EDU:andy@sun3.ads.ARPA My answers to your thirty questions on R↑RS
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 10 Jul 86 15:35:50 PDT
Received: from grape.ads.ARPA by MC.LCS.MIT.EDU 10 Jul 86 18:30:06 EDT
Date: Thu, 10 Jul 86 15:31:12 PDT
From: andy@sun3.ads.ARPA (Andy Cromarty)
To: jar%mit-mc@ads.arpa
Subject: My answers to your thirty questions on R↑RS
Cc: rrrs-authors%mit-mc@ads.arpa
Jonathan,
Here is my list of answers to the specific report-related questions
you posed to the group. I've only answered the ones I have strong
opinion on.
1. The presence of BEGIN in Scheme is frankly somewhat of an
embarrasment. It really should be flushed, but politically
it's probably too late. Still, I vote (b).
2. Keep the >? forms. All predicates should end in ? for
uniformity. This kind of consistency is much more important for
pedagogical purposes than is similarity to CL, Pascal, or any
other existing language.
4. Substring-move-*: flush. I think I have simple Scheme definitions
for these, if anyone needs them once they're flushed.
5. Simply make it clear that evaluation order is unspecified (and
should not be depended on); to guarantee sequential evaluation
of a collection of combinations, use SEQUENCE.
7. Port = port. Safer that way.
11. Yes, PROCEDURE? would be welcome.
12. (if x 1) vs. (cond ((x 1)): I suggest
(if x 1) => 1 iff x, else <unspecified>
(cond ((x 1))) => 1 iff x, else <unspecified>
(case (not (not x)) ((#t) 1)) => 1 iff x, else <unspecified>
This follows the general principle that if you fall off the end
of a control construct, the results are not guaranteed. If you
want a guaranteed return value in your program, you specify one
using ELSE or the two-armed IF as appropriate; that's what they're
there for. This should be phrased to say that ``it is an error''
to rely on the result of a control construct that returns an
<unspecified> result.
13. Flush (define ((((a b) c) d) e) ...) syntax.
14. To me, INCLUDE means "include." If we want the effect to be
equivalent to having the loaded text be lexically present,
INCLUDE is an excellent name, and helps avoid some of the
concerns people have had about what it means to have a dynamic
programming environment for a lexically scoped language. I would,
however, want to see a resolution to such problems as
(IF X (INCLUDE "FOO"))
If this evaluation depends on the dynamics of the binding
environment, then "LOAD" is more appropriate. INCLUDE would
have to be a non-expression statement, e.g. the above example
would only be syntactically correct if "FOO" happened to contain
exactly one or two expressions at the top level of the file, and
the INCLUDE would always get performed regardless of X's value.
21. One-based sections.
24. I guess some people don't like to type and have bad editors, or
maybe bad pretty-printers. CALL/CC is scarcely an intuitive
name; its chief virtue seems to be the number of characters it
contains. But it seems to be regionally entrenched; keep it
"informally optional" to the standard CALL-WITH-CURRENT-CONTINUATION
if necessary. (It will not appear in our Scheme implementations.)
26. FORCE and DELAY are new ideas to most readers of the report, at
least for its SIGPLAN incarnation. Good pedagogy suggests they
be put together if possible.
27. Yes for () in 3.0.2.
30. I thought the question of immutable objects was lightly treated
overall. Rather than remove the reference on p. 14 SS 5.1, I'd
prefer to see more detail, and perhaps (a) something explicitly
noting that set-car! and set-cdr! are destructors (or
mutators if you prefer) and (b) the explicit assertion that
destructors end in ``!'' in Scheme.
------------------------------------------------------------------------
Other topics:
-1+ : I prefer to see this kept, in inessential status. When I first
saw it, it struck me as the first time any LISP had gotten this
right. It says exactly what it means. Better no decrement
function at all, however, than using "1-" to mean decrement; "1-"
says exaactly what it *doesn't* mean.
Since there was a complaint, I might suggest ``minus one plus''
as the pronunciation for "-1+", as in "minus one plus 3" for
(-1+ 3) (or "negative one plus three," if you prefer). I
scarcely find SUCC pronounceable in any socially acceptable way,
and it certainly doesn't seem to me to be a serious alternative.
WHEN: This probably seems like a good idea to people who don't do
concurrent programming. When you deal with time in your
programs, ``when'' already has a confusing enough meaning without
overloading it to mean IF. For that matter, a couple years from
now we may want to use WHEN for event management.
S&ICP: I do not know what it means to (as one person admonished)
``fix the book''; in particular, I don't know how you recall
thousands of copies. Independent of the quality of the
presentation and choices reflected in S&ICP, which I admit to
admiring tremendously, I believe that this book has done
more for Scheme than any other single force in Scheme's history,
and I believe we should endeavor to support a Scheme compatible
with it. Most of my colleages who own the book have it because
they were interested in obtaining a good book on LISP or a good
book on programming, and to a person every one with whom I've
spoken agrees that it is probably the best available for both
purposes. Let's not kill the goose that lays our golden eggs.
∂10-Jul-86 1941 @MC.LCS.MIT.EDU:whill%hplabsc@hplabs.HP.COM Re: [Michael van Biema <MICHAEL@CS.COLUMBIA.EDU>: How big would a "minimal" scheme interpreter be?]
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 10 Jul 86 19:41:01 PDT
Received: from hplabs.HP.COM by MC.LCS.MIT.EDU 10 Jul 86 22:35:05 EDT
Received: from hplabsc by hplabs.HP.COM ; Thu, 10 Jul 86 19:32:17 pdt
Received: by hplabsc ; Thu, 10 Jul 86 19:33:39 pdt
Date: Thu, 10 Jul 86 19:33:39 pdt
From: Walt Hill <whill%hplabsc@hplabs.HP.COM>
Message-Id: <8607110233.AA15511@hplabsc>
To: MICHAEL@CS.COLUMBIA.EDU, scheme@MC.LCS.MIT.EDU
Subject: Re: [Michael van Biema <MICHAEL@CS.COLUMBIA.EDU>: How big would a "minimal" scheme interpreter be?]
MIT CScheme will run on an HP Integral PC with 1.5Meg RAM with room for only
40K items in the heap.
Walt Hill
∂11-Jul-86 0336 @MC.LCS.MIT.EDU:bc@MEDIA-LAB.MIT.EDU MacScheme
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 11 Jul 86 03:36:43 PDT
Received: from MEDIA-LAB.MIT.EDU by MC.LCS.MIT.EDU 11 Jul 86 06:31:52 EDT
Received: by MEDIA-LAB.MIT.EDU (5.31/4.8) id AA06695; Fri, 11 Jul 86 06:31:17 EDT
Date: Fri, 11 Jul 86 06:31:17 EDT
From: William H Coderre <bc@MEDIA-LAB.MIT.EDU>
Message-Id: <8607111031.AA06695@MEDIA-LAB.MIT.EDU>
To: scheme@mc.lcs.mit.edu
Subject: MacScheme
Can someone summarize the MacScheme situation?
I've played briefly with a fairly old version.
I heard there was a new version.
Graphics? Toolbox? Editor (I remember it being a loser)?
Compatibility?
Thank You
"Tzima Narki"......................,...........,.............bc
∂11-Jul-86 0925 @MC.LCS.MIT.EDU:gls@Think.COM My comments on the R↑RS
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 11 Jul 86 09:25:24 PDT
Received: from grape.ads.ARPA by MC.LCS.MIT.EDU 11 Jul 86 12:21:28 EDT
Received: from botolph by Godot.Think.COM via CHAOS; Fri, 11 Jul 86 12:18:24 edt
Date: Fri, 11 Jul 86 12:19 EDT
From: Guy Steele <gls@Think.COM>
Subject: My comments on the R↑RS
To: andy@sun3.ads.ARPA, jar%mit-mc@ads.ARPA
Cc: rrrs-authors%mit-mc@ads.ARPA, gls@AQUINAS.ARPA
In-Reply-To: <8607101959.AA12928@Zarathustra.Think.COM>
Message-Id: <860711121914.1.GLS@BOTOLPH.THINK.COM>
Date: Thu, 10 Jul 86 12:39:26 PDT
From: andy@sun3.ads.ARPA (Andy Cromarty)
Jonathan,
I've enclosed my comments on the R↑3RS in this note
separately from my answers to your specific questions you asked.
Hope this helps. By the way, I know that putting this all together
involves a lot of work (and sometimes a lot of refereeing), and you
should be aware that your contribution isn't going unappreciated. Thanks
for all the hard work you're putting in, and my apologies in advance
if I err here due to an insufficiently detailed reading of the report.
Hear, hear!
...
2. As you might expect, I would like to see a somewhat more vigilant
attitude in warding off the dark forces of Common Lisp. It is not
compatibilities or incompatibilities that are gratuitous; it is
the very act of being concerned with compatibility at all that is
gratuitous. We should have our own standards of what a good LISP
looks like and stick to them. The first job of a good language is
to be a good language, not to be just like another bad language
that's familiar (nor even just like another good language that's
familiar). Common Lisp's goals were nearly the opposite of
Scheme's, and however good a job the CL committee did, we owe them
no homage. I recognize that this is more an issue of the design
of Scheme than of its documentation in a report, but there seems
to me to be entirely too much concern for similarities and
dissimilarities w.r.t. Common Lisp in the report. It may be
appropriate to discuss the topic of Scheme vs. CL briefly in the
historical section, but there should be a very clear message to the
reader that CL followed Scheme -- and continues to, in the sense
that Scheme is meant to be a progressive attempt at (LISP) language
design rather than a codification and standardization of existing
ideas in prior LISPs. The CL people should be writing reports
that compare their work to ours, not the other way around. ``Let
them eat cake.'' [OK, flame off.]
[a] I think that many papers on Common Lisp have correctly attributed its
debt to Scheme.
[b] I disagree that concern with compatibility is gratuitous. Perhaps that
concern should be subordinate to other concerns, but when everything else is
truly equal then compatibility is a reasonable criterion for breaking ties.
This is because it is better to be able to tie a feature to something already
familiar than to make a user learn something new.
[c] There should be a very clear message to the reader that Scheme certainly
does owe debts to other sources, and one of them is Common Lisp. While
Scheme certainly has been the pioneer in the treatment of closures and
functional programming in a Lisp framework, I think it is fair to say that
Common lisp pioneered a rational (forgive the pun) treatment of numeric data
types in a Lisp framework, and my impression is that Scheme learned
something in this area from the Common Lisp experience.
[d] Don't forget that there are some people who worked on both Scheme and
Common Lisp at the same time (I do not count myself as one, by the way), to
whom I am grateful because they learned certain lessons in both contexts at
once and served to transfer ideas in both directions.
12. I cannot refrain from observing that DO is truly ugly, a
veritable pig of a construct, and we could have done better.
We are indeed fortunate that its use under practical circumstances
is rarely necessary.
I strongly disagree. DO is a construct that emphasizes the notion that
an iteration can proceed by initializing some state variables and then
repeatedly transforming them while maintaining some invariant until
a condition is reached. In particular, it emphasizes the fact that
outputs of the iteration as well as inputs can and should be expressed
as iterator-controlled variables. This is a lesson that the "algebraic"
languages ought to learn. It is an abomination to see
sum = 0
do i = 1 to 10 by 1
sum = sum + a(i)
end do
instead of
do i = 1 to 10 by 1; sum = 0 by a(i); result sum od
23. NOTES, p.35ff.: This material should stay somehow. We need to
make it clear that R↑3 Scheme is not being touted as Yet Another
Ultimate Solution To The Programming Language Problem, but rather
as a snapshot of a *process* of good design, for which not all
answers have yet been found. We also ought to use the opportunity
for publicity afforded us by SIGPLAN to advertise some of the thorny
unsolved problems that need further research, and encourage
language designers to work on them.
Yes.
--Guy
∂11-Jul-86 0935 @MC.LCS.MIT.EDU:cscott@bfly-vax.bbn.com tiny scheme
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 11 Jul 86 09:35:10 PDT
Received: from BFLY-VAX.BBN.COM by MC.LCS.MIT.EDU 11 Jul 86 12:26:51 EDT
Date: Fri, 11 Jul 86 12:22:23 EDT
From: "Curtis A. Scott" <cscott@bfly-vax.bbn.com>
To: michael@cs.columbia.edu
cc: scheme@mc.lcs.mit.edu
Subject: tiny scheme
It depends on the level of functionality you desire. A minimal kernel
with only the basic operations as primitives could be very small. I
wrote a student subset kernel in Z80 assembler which was much less
than 32K bytes, and I believe someone did one for the Apple II of
similar size. You have then moved much of the size of the system off
into interpreted code in the heap. None of the "real" systems are
this small; the MIT handcoded 68000 scheme was around 64K of code.
∂11-Jul-86 1142 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA Re: My comments on the R↑RS
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 11 Jul 86 11:42:36 PDT
Received: from grape.ads.ARPA by MC.LCS.MIT.EDU 11 Jul 86 14:42:04 EDT
Received: from ti-csl by csnet-relay.csnet id ab20493; 11 Jul 86 14:24 EDT
Received: by tilde id AA08236; Fri, 11 Jul 86 11:05:52 cdt
Date: Fri 11 Jul 86 10:59:37-CDT
From: David Bartley <Bartley%ti-csl.csnet@CSNET-RELAY.ARPA>
Subject: Re: My comments on the R↑RS
To: andy%sun3.ads@CSNET-RELAY.ARPA, jar%mit-mc%ads@CSNET-RELAY.ARPA
Cc: rrrs-authors%mit-mc%ads@CSNET-RELAY.ARPA,
Bartley%ti-csl.csnet@CSNET-RELAY.ARPA
In-Reply-To: Message from "Andy Cromarty <andy@sun3.ads.ARPA>" of Fri 11 Jul 86 04:08:40-CDT
Message-Id: <12221852261.67.BARTLEY@CSC60>
>Date: Thu, 10 Jul 86 12:39:26 PDT
>From: Andy Cromarty <andy@sun3.ads.ARPA>
> [...]
>2. As you might expect, I would like to see a somewhat more vigilant
> attitude in warding off the dark forces of Common Lisp. It is not
> compatibilities or incompatibilities that are gratuitous; it is
> the very act of being concerned with compatibility at all that is
> gratuitous. ...
I feel that this point of view is not in Scheme's best interest. Although
many potential converts to Scheme are unsullied by contact with lesser
lisps, others must either be won away from Common Lisp or must live with
both. Gratuitous differences in syntax and in the naming of standard
procedures make it much more difficult for them to give Scheme a fair
trial. Also, many of us are working on implementations in which Scheme
and Common Lisp programs want to share data and call each other.
Gratuitous differences in the data types and in the syntax of numbers (for
example) can make this very frustrating. I fear that Scheme will usually
be the one that loses if a development team decides the two languages are
not sufficiently compatible.
> ... We should have our own standards of what a good LISP
> looks like and stick to them. The first job of a good language is
> to be a good language, not to be just like another bad language
> that's familiar (nor even just like another good language that's
> familiar). Common Lisp's goals were nearly the opposite of
> Scheme's, and however good a job the CL committee did, we owe them
> no homage. ...
Although a certain amount of compromise is necessary in agreeing on what
is "gratuitous", it certainly is true that any compromise that changed
Scheme from a "good" language to a "bad" one would not be gratuitous.
> ... I recognize that this is more an issue of the design
> of Scheme than of its documentation in a report, but there seems
> to me to be entirely too much concern for similarities and
> dissimilarities w.r.t. Common Lisp in the report. It may be
> appropriate to discuss the topic of Scheme vs. CL briefly in the
> historical section, but there should be a very clear message to the
> reader that CL followed Scheme -- and continues to, in the sense
> that Scheme is meant to be a progressive attempt at (LISP) language
> design rather than a codification and standardization of existing
> ideas in prior LISPs. The CL people should be writing reports
> that compare their work to ours, not the other way around. ``Let
> them eat cake.'' [OK, flame off.]
I think we've all agreed that explicit references to Common Lisp in the
Report should be minimized.
Regards,
David Bartley
-------
∂11-Jul-86 1642 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU test
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 11 Jul 86 16:41:58 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 11 JUL 86 18:04:12 EDT
Date: Fri, 11 Jul 86 18:04:44 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: test
To: scheme@MC.LCS.MIT.EDU
Message-ID: <[AI.AI.MIT.EDU].68642.860711.JAR>
Test message. Please ignore.
∂12-Jul-86 1837 @MC.LCS.MIT.EDU:RPG@SU-AI.ARPA Compatibility with Common Lisp: A meta comment
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 12 Jul 86 18:37:17 PDT
Received: from SU-AI.ARPA by MC.LCS.MIT.EDU 12 Jul 86 21:37:07 EDT
Date: 12 Jul 86 1835 PDT
From: Dick Gabriel <RPG@SU-AI.ARPA>
Subject: Compatibility with Common Lisp: A meta comment
To: rrrs-authors@MC.LCS.MIT.EDU
Andy Cromarty comments that it is ``the very act of being concerned with
compatibility at all that is gratuitous.''
I regard it as lucky that this message only went to RRRS-authors, because
it represents a low point in political thinking. Although I am not an
active participant in the Scheme design, many of you know that I use
Scheme in my teaching, my research papers, and my research. When put on
the spot regarding the future of Lisp - in any forum - I point to Scheme
as the hope for the future.
However, I regard myself as a member of the Common Lisp community, and I
had a fair amount to do with its design and acceptance. When I read Andy's
message I felt insulted. Perhaps someone less sympathetic to the Scheme
movement would be completely turned away from Scheme by reading his
message.
If Andy wants to battle the dark forces, they are indeed lined up at the
perimeter. To the vast audience, Common Lisp and Scheme are
indistinguishable. The alternative is C. If Lisp cannot make a go of it
because other languages are seen as `better,' there will be less interest
in learning Lisp, and fewer people will be able to see the beauty of
Scheme. The battle is to win people over to `lisp programming,' which in
its best clothes is Scheme programming.
To an outsider, a `gratuitious' difference between Common Lisp and Scheme
is seen as evidence that the Lisp world is too religious to understand
real-world concerns. Unless there is a compelling reason to vary from Common
Lisp, I think compatibility is wise.
The Common Lisp community has learned and is learning a lot about how
people are won over to a new standard, and this community has many members
who are Scheme lovers. Perhaps it is a smart move to avoid alienating
them with comments like Andy's? Perhaps the Scheme community would like to
enlist the aid of the large Common Lisp community in advocating Scheme?
Don't let anyone outside this list see Andy's message.
-rpg-
ps. To be a pissant about it. I guess Andy feels that, because the goals of
Common Lisp were nearly the opposite of Scheme's, the goals of Scheme
are to be:
non-common
non-portable
inconsistent
inexpressive
incompatible
inefficient
not powerful
unstable
Common Lisp's goals were not bad. They were the stated ones, plus several
others: gain support among competing dialects, gain advocates from the
commercial Lisp programming world, and develop compromises among enemies. The
stated goals plus these three are such that we are lucky that the result
is as reasonable as it is.
∂13-Jul-86 1528 @MC.LCS.MIT.EDU:andy@sun3.ads.ARPA Scheme's DO construct
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 13 Jul 86 15:28:40 PDT
Received: from grape.ads.ARPA by MC.LCS.MIT.EDU 13 Jul 86 18:29:06 EDT
Date: Sat, 12 Jul 86 19:07:07 PDT
From: andy@sun3.ads.ARPA (Andy Cromarty)
To: rrrs-authors%mit-mc@ads.arpa
Subject: Scheme's DO construct
Cc: andy@ads.arpa, gls%think@ads.arpa
Reply-To: andy@ADS.arpa
Hmm, I seem to have generated some controversy. I'll attempt to
provide clarifications and responses separately on each topic to
help keep the discussions distinct. I'll start with "DO."
------------------------------------------------------------------------
I cannot refrain from observing that DO is truly ugly.... [asc]
I strongly disagree. DO is a construct that emphasizes the
notion that an iteration can proceed by initializing some state
variables and then repeatedly transforming them while maintaining
some invariant until a condition is reached. ... [gls]
I think Guy misguessed the source of my displeasure with DO. So I'll
clarify. (Warning: not a short message.)
I have no prima facie objection to the use of iterative constructs,
and in particular, none to supporting iteration in Scheme. Indeed, I think
that it is often very effective to think procedurally and iteratively rather
than functionally and recursively. (I understand these are apples and
oranges, but the styles are usually associated with each other.)
There may be interesting extremist arguments in favor of relying solely on
recursion for repetition, presumably based on strict minimalism and some
arguments concerning the elegance of recursion. But I probably wouldn't buy
them, and in any case that's not what my complaint is about. If we were going
to be minimalism extremists, we wouldn't provide IF, COND, and CASE in the same
language. Instead, I think we are trying to design an effective programming
environment while remaining "reasonably" elegant. The touchstone for the
appropriate degree of minimalism is that we provide the constructs that
a programmer will need, separating functionality out when the programmer's
abstraction of the control process is different (as opposed to merely the
underlying computation being different; hence CASE, IF, and COND).
So given the assumption that we are going to have one or more iteration
constructs, what should they look like and how should we select them?
My claim is that the DO we are using is a poor choice, and moreover,
that it probably reflects a correspondingly poor choice in selection criteria.
In a nutshell, DO does too much. It creates variables, binds them,
provides iteration, rebinds variables at tactically pleasing times,
tests a conditional expression, applies an implicit SEQUENCE to most
of its arguments, returns the result of evaluating an optionally present
expression... whew!
I submit that we have CommonLisp's DO (which is in use in other LISPS too,
of course) principally because it was being used by other LISPs and no one
really stopped to think what a good iteration construct for Scheme would
look like starting from first principles. We just grabbed what (some) (LISP)
programmers currently are using without treating this as an important
design problem.
I also submit that DO is too complex and that this complexity violates
two fundamental principles of good programming language construct design:
1. Keep constructs simple so people can learn, understand, read, debug,
and maintain them easily.
2. Each function should do one thing, and do it well. (No pun intended.)
Just to take a few pot shots at DO: we don't need variable binding and
creation, since we already have the LET family to do that nicely for us.
We don't need to confuse conditional exit from an iteration (i.e. using
a predicate expression) with FOR-class iteration that occurs, e.g.,
a predictable number of times and/or over a predictable set of values.
Certainly it's nice to have all these things around when you want them;
my point is simply that an iteration construct doesn't need to provide
all of them, that we can make intelligent choices about which ones
a given construct is to provide, and that if DO needs to contain all of
them, then the burden of proof is on those who would make that claim.
To reframe the challenge, the question is not whether you can come up
with times when you need conditional exit, and times when you need
FOR-style iteration, and... etc.; but rather, whether you can convincingly
demonstrate that all are needed in one iteration construct that appears in
the language definition.
Let me pose a few alternatives. Bear in mind that these are strawman
options, for illustrative purposes. If you don't like keywords in your
control constructs, imagine the examples without them.
(FOR i IN <list> DO <forms>) -- Evaluates <forms>, to which an implicit
SEQUENCE is applied, with i bound to successive values of <list>.
[This is like FOR-EACH except that you have the current value bound to
a lexically apparent locally-created locally-bound variable i. This is about
as similar to FOR-EACH as, say, COND and CASE are to each other.]
(VARYING i FROM n TO m BY s DO <forms>) -- Binds i to n, n+s, n+2s, ...
and evaluates <forms>, to which an implicit SEQUENCE is applied, for
each such binding, until i>m. Returns the result of the last evaluation
of <forms>.
[This is the classic FOR-loop construct used when you know the range
of values in advance, e.g. when you are stepping through a vector.]
(REPEAT n TIMES <forms>) -- Evaluates <forms>, to which an implicit
SEQUENCE is applied, n times. Returns the result of the last evaluation
of <forms>.
[Not frequently used, but highly perspicuous on those occasions when
this is exactly what you want to do.]
(WHILE <test> DO <forms>) -- Repeatedly evaluates <forms>, to which an
implicit SEQUENCE is applied, until <test> evaluates to #F, like
Pascal's WHILE.
[There's some interesting research by Jeff Bonar, among others,
with empirical results suggesting that Pascal's WHILE loop is actually
a dangerous, hard-to-learn construct. This is because (a) the classic
phase problem that occurs when you use a WHILE loop in a PROCESS,READ
paradigm is harder to learn than the more intuitive READ,PROCESS model,
and (b) beginners often think that WHILE really means "while," i.e.
"whenever <test> is true, do <forms>" or "the moment <test> would become
false, exit the loop." I also dislike the cooption of this word for this
iterative processing application, since its more intuitive meanings
actually might be useful in concurrent processing applications. In any
case, when not used in a PROCESS,READ paradigm, the construct (whatever
its name) is often quite useful.]
Hmm, that's a lot of extra stuff in a language to take the place of
one DO construct, isn't it? But that's precisely the point. DO is
a microcosm of MacLisp's and, by inheritance, Common Lisp's invasive
featurism. In the extreme, we could create a function F(x) and specify
which entire program we wanted simply by feeding F the proper number.
Many people would regard such a Goedlization of programs as a positive
step, if only they could determine which number to feed F. But: we wouldn't
call it programming; we wouldn't call F a "control construct" in the
sense that we normally use the word; and perhaps most importantly, we
wouldn't know how to meaningfully specify the x. Forgiving the hyperbole,
that is also true of DO: it is an expert's construct with options sticking
out all over and no coherent design principles underneath, hard to learn
and remember and even harder to read and understand quickly on sight.
I have performed the following informal experiment. I had one or
two of the people working with me who were true devotees of LOOP
and DO go back and recode fairly large (5000-15000 lines) LISP programs,
ripping out LOOP and DO and putting in DOLIST, DOTIMES, and mapping
functions. I should say that they did it "kicking and screaming," not
because of the work involved but because they so loved all the features
that LOOP offered. But a couple weeks later, they came back and said:
"You know, LOOP is really evil!"
"My code is infinitely easier to read and maintain now."
"I had no idea how ugly and impenetrable all that DO and LOOP code was
from all those `features' of DO and LOOP I was using."
"You have to have something seriously wrong with your head to be able to
use DO fluently."
"I'm not going to use LOOP again!"
I should say that the principal guy I have in mind here got his degree at
MIT. We're talking the hardest of sells, and when the dust had cleared,
he came to the conclusion that DO and LOOP are morally reprehensible.
We need to remember that programs are written not only to be executed,
but also to be read; and that well over 50% of programmer time is
spent maintaining existing code. Clear, clean, well-designed control
constructs can go a long way towards easing this burden. DO does not
seem to qualify as such a construct; rather, it seems like the incidental
union of numerous such constructs. We might be able to make a major
contribution to the utility of LISP in "practical" programming applications
by updating Scheme's iteration constructs so they provide better, cleaner,
more direct support for the variety of iteration models that are already
implicit in the code we write.
asc
∂14-Jul-86 0252 @MC.LCS.MIT.EDU:adams%tekchips.tek.csnet@CSNET-RELAY.ARPA Flaws of form
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 14 Jul 86 02:52:43 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 14 Jul 86 05:52:54 EDT
Received: from tektronix by csnet-relay.csnet id aa01226; 14 Jul 86 5:49 EDT
Received: by tektronix.TEK (5.31/6.16)
id AA28438; Sun, 13 Jul 86 10:01:39 PDT
Received: by tekchips.TEK (5.31/6.16)
id AA21626; Sun, 13 Jul 86 10:04:09 PDT
Date: Sun, 13 Jul 86 10:04:09 PDT
From: Norman Adams <adams%tekchips.tek.csnet@CSNET-RELAY.ARPA>
Message-Id: <8607131704.AA21626@tekchips.TEK>
Subject: Flaws of form
To: rrrs-authors@MC.LCS.MIT.EDU
I would prefer to see no dedication in preference to making the dedication
serious. I think a serious dedication would read as insincere because
the Scheme report is an obvious parody of the Algol 60 report.
As much for my asusement as for anything else, I wrote this explanation:
The Algol 60 report is gravely earnest. Among its many firsts, Algol was
first to use a grammar-like construct to define its syntax. The first
report -- "Preliminary report - International Algebraic Language" -- as
well as the revision, were published as cover stories in the
@i(Communucations of the ACM) (*). The report was the culmination of an
international effort, followed with international attention. In the style
of world war commentary, the reader learns of the Zurich meeting, the Paris
meeting, and of the seven European representatives who held a final
prepatory meeting in Mainz in December 1959. And let us not forget the
seven American representatives with a similar quest, in Boston that same
year. We are spared the details of the lunch meats; judged, with Ph.D.
precision I am certain, to be expendable from the accounting. In each
re-reading, I look (in vain) for the mention of Teller and Oppenheimer;
surely they were involved too. It is in this intensely sober context that
we read the full page eulogy of William Turanski (**), who died after being
struck by a car the day before the 1960 conference in Paris.
(*) CACM v1 #12, 1958; CACM v6 #1, 1963
(**) CACM v3 #5, 1960, p 298
Scheme is fun and happy, and a bit quirky -- or are CDR and CAR and so many
relatives the ideal names for those procedures? Scheme is as serious as
LAMBDA, but as casual as CAR. Alas, what has become of dear PROGN? The
names are arbitrary and incidental; CAR and CDR remind us. Scheme is as
much an approach as a detailed concrete specification. But to be taken
seriously, for Scheme to be widely used, we must have the details and
concretions; they are essential but unimportant.
The Algol 60 report is almost ludicrous in its sobriety. If we use the form
of Algol 60 to present happy little Scheme, we cannot avoid the parody;
try as we might.
Still, I think there is good reason to use the form. Presenting Scheme in
the form of the Algol 60 report may capture the attention of those who
clump together and ignore all Lisp-like languages because the culture is so
different from what they know. The contrast with @i(Chine Nual) and
@i(CLtL) is important. Perhaps Lisp can be other than a bag of features of
a metastasizing runtime environment. Perhaps it can even be described in
the style of the day!
Following the model of Algol 60 exactly points out that the form of
description is itself an arbitrary convention; and the point is made in
perfect Scheme style. Just as Scheme can provide the "their" control
constructs, it can be described in "their" form.
The parody pokes fun at all those essential but unimportant details.
It is the perfect couch for Scheme.
So for all this, I find a serious dedication inappropriate. Algol 60's
dedication was grave; to an Algol soldier, killed in his prime (he was 35).
Scheme's dedication should be to something unimportant. "Dedicated to the
memory of dynamic binding.", as Jonathan once suggested, fits well. It
seems to me so much better than to try to be as somber and important as
Algol 60. I think we would look foolish in the attempt.
-Norman
-------
∂14-Jul-86 0325 @MC.LCS.MIT.EDU:adams%tekchips.tek.csnet@CSNET-RELAY.ARPA Flaws of form
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 14 Jul 86 03:24:56 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 14 Jul 86 06:25:26 EDT
Received: from tektronix by csnet-relay.csnet id aa01226; 14 Jul 86 5:49 EDT
Received: by tektronix.TEK (5.31/6.16)
id AA28438; Sun, 13 Jul 86 10:01:39 PDT
Received: by tekchips.TEK (5.31/6.16)
id AA21626; Sun, 13 Jul 86 10:04:09 PDT
Date: Sun, 13 Jul 86 10:04:09 PDT
From: Norman Adams <adams%tekchips.tek.csnet@CSNET-RELAY.ARPA>
Message-Id: <8607131704.AA21626@tekchips.TEK>
Subject: Flaws of form
To: rrrs-authors@MC.LCS.MIT.EDU
I would prefer to see no dedication in preference to making the dedication
serious. I think a serious dedication would read as insincere because
the Scheme report is an obvious parody of the Algol 60 report.
As much for my asusement as for anything else, I wrote this explanation:
The Algol 60 report is gravely earnest. Among its many firsts, Algol was
first to use a grammar-like construct to define its syntax. The first
report -- "Preliminary report - International Algebraic Language" -- as
well as the revision, were published as cover stories in the
@i(Communucations of the ACM) (*). The report was the culmination of an
international effort, followed with international attention. In the style
of world war commentary, the reader learns of the Zurich meeting, the Paris
meeting, and of the seven European representatives who held a final
prepatory meeting in Mainz in December 1959. And let us not forget the
seven American representatives with a similar quest, in Boston that same
year. We are spared the details of the lunch meats; judged, with Ph.D.
precision I am certain, to be expendable from the accounting. In each
re-reading, I look (in vain) for the mention of Teller and Oppenheimer;
surely they were involved too. It is in this intensely sober context that
we read the full page eulogy of William Turanski (**), who died after being
struck by a car the day before the 1960 conference in Paris.
(*) CACM v1 #12, 1958; CACM v6 #1, 1963
(**) CACM v3 #5, 1960, p 298
Scheme is fun and happy, and a bit quirky -- or are CDR and CAR and so many
relatives the ideal names for those procedures? Scheme is as serious as
LAMBDA, but as casual as CAR. Alas, what has become of dear PROGN? The
names are arbitrary and incidental; CAR and CDR remind us. Scheme is as
much an approach as a detailed concrete specification. But to be taken
seriously, for Scheme to be widely used, we must have the details and
concretions; they are essential but unimportant.
The Algol 60 report is almost ludicrous in its sobriety. If we use the form
of Algol 60 to present happy little Scheme, we cannot avoid the parody;
try as we might.
Still, I think there is good reason to use the form. Presenting Scheme in
the form of the Algol 60 report may capture the attention of those who
clump together and ignore all Lisp-like languages because the culture is so
different from what they know. The contrast with @i(Chine Nual) and
@i(CLtL) is important. Perhaps Lisp can be other than a bag of features of
a metastasizing runtime environment. Perhaps it can even be described in
the style of the day!
Following the model of Algol 60 exactly points out that the form of
description is itself an arbitrary convention; and the point is made in
perfect Scheme style. Just as Scheme can provide the "their" control
constructs, it can be described in "their" form.
The parody pokes fun at all those essential but unimportant details.
It is the perfect couch for Scheme.
So for all this, I find a serious dedication inappropriate. Algol 60's
dedication was grave; to an Algol soldier, killed in his prime (he was 35).
Scheme's dedication should be to something unimportant. "Dedicated to the
memory of dynamic binding.", as Jonathan once suggested, fits well. It
seems to me so much better than to try to be as somber and important as
Algol 60. I think we would look foolish in the attempt.
-Norman
-------
∂14-Jul-86 0641 @MC.LCS.MIT.EDU:OXLEY%ti-csl.csnet@CSNET-RELAY.ARPA Re: Compatibility with Common Lisp: A meta comment
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 14 Jul 86 06:40:56 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 14 Jul 86 09:41:16 EDT
Received: from ti-csl by csnet-relay.csnet id aa01646; 14 Jul 86 9:37 EDT
Received: by tilde id AA09613; Mon, 14 Jul 86 08:20:24 cdt
Date: Mon 14 Jul 86 08:11:52-CDT
From: Don Oxley <OXLEY%ti-csl.csnet@CSNET-RELAY.ARPA>
Subject: Re: Compatibility with Common Lisp: A meta comment
To: RPG%su-ai@CSNET-RELAY.ARPA, rrrs-authors%mc.lcs.mit.edu@CSNET-RELAY.ARPA
In-Reply-To: Message from "Dick Gabriel <RPG@su-ai.ARPA>" of Sat 12 Jul 86 18:35:00-CDT
Message-Id: <12222608155.17.OXLEY@CSC60>
I must second Dick Gabriel's reply. A little "friendly rivalry" with
Common Lisp is fine, but the ultimate acceptance of Lisp (of either
dialect) is the crucial concern. I am probably as biased toward Scheme
as anyuone, but if Scheme is to succeed, it will owe a significant debt
to Common Lisp.
--Don
-------
∂14-Jul-86 0741 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA Common Lisp
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 14 Jul 86 07:41:27 PDT
Received: from mitre-bedford.ARPA by MC.LCS.MIT.EDU 14 Jul 86 10:41:54 EDT
Organization: The MITRE Corp., Bedford, MA
Received: from jymme.sun.uucp by linus.MENET (1.1/4.7)
id AA19058; Mon, 14 Jul 86 10:41:36 EDT
Posted-Date: Mon, 14 Jul 86 10:38:32 edt
Received: by jymme.sun.uucp (2.0/SMI-3.0DEV3)
id AA07736; Mon, 14 Jul 86 10:38:32 edt
Date: Mon, 14 Jul 86 10:38:32 edt
From: ramsdell%linus@mitre-bedford.ARPA
Message-Id: <8607141438.AA07736@jymme.sun.uucp>
To: rrrs-authors%mc.lcs.mit.edu@mitre-bedford.ARPA
Subject: Common Lisp
I certainly qualify an no fan of Common Lisp, however, I too would
like to point out a simple argument against gratuitous
incompatibilities with Common Lisp. Scheme's impact will be limited
if it is very difficult to convert CL code to Scheme, even if many
agree it is a superior language. The best way to port CL to Scheme is
in an environment that supports both languages. To me, Scheme would
be an excellent language in which to implement Common Lisp. A Scheme
implementation of Common Lisp would facilitate the conversion of CL
code by allowing versions the program to be written in a mixture of
both languages. Let's not make a Scheme implementation of Common Lisp
such a pain that no one will do it.
John
∂14-Jul-86 1008 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU [ANDY: dedication]
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 14 Jul 86 10:08:39 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 14 JUL 86 13:09:07 EDT
Date: Mon, 14 Jul 86 13:08:53 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: [ANDY: dedication]
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <[AI.AI.MIT.EDU].69636.860714.JAR>
Date: Mon 14 Jul 86 02:09:08-PDT
From: Andy Freeman <ANDY at sushi.STANFORD.EDU>
To: jar at AI.AI.MIT.EDU
Re: dedication
Message-ID: <12222563967.24.ANDY@sushi.STANFORD.EDU>
Has everyone else forgotten that Knuth dedicated his series to a 650
at case?
-andy
∂14-Jul-86 1337 @MC.LCS.MIT.EDU:RPG@SU-AI.ARPA Use of DO in Common Lisp Code
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 14 Jul 86 13:33:33 PDT
Received: from SU-AI.ARPA by MC.LCS.MIT.EDU 14 Jul 86 16:33:54 EDT
Date: 14 Jul 86 1332 PDT
From: Dick Gabriel <RPG@SU-AI.ARPA>
Subject: Use of DO in Common Lisp Code
To: rrrs-authors@MC.LCS.MIT.EDU
I looked at a spectrum of code in the Lucid implementation of Common
Lisp to see how DO is used where DOLIST and DOTIMES could not
be used. The breakdown of use of iteration is this:
the frequency of use of DO is the same as the use of DOTIMES
and DOLIST combined
the use of LABELS/FLET is used as often as DOLIST.
The uses of DO in place of DOTIMES and DOLIST are interesting.
Sometimes the stepper is not CDR, so the use of DO is exactly
like DOLIST, but with the stepper (and end test) different; typically:
(DO ((current data-structure (next-data current)))
((empty-data current)) ...)
Sometimes the use is exactly like DOLIST, but the test is different.
(DO ((l l (cdr l)))
((end-test l))
(let ((x (car l)))
...))
But the most frequent use (by a margin of 3 to 1) is a combination of
DOTIMES and DOLIST:
(do ((l l (cdr l))
(i 0 (1+ i)))
((null l))
(let ((x (car l)))
...))
The use of DO outside of these paradigms is almost non-existent. Hairier
control structures are usually done with LABELS/FLET, and there are
3 large ATN's in the implementation, written with (glarg) TAGBODY.
One principle of Lisp design that DO follows is that the binding of the
iterator, its initial value, and its updator are apparent immediately upon
inspection - they are usually on one line. This principle is the basis of
(LET ((x value)) ...) being preferred to ((lambda (x ...) ...) value ...):
X and VALUE are not near each other on the page.
I don't have a proposal to make, but this data might be of use in thinking
about iteration in Scheme.
-rpg-
∂14-Jul-86 1448 @MC.LCS.MIT.EDU:goodhart%cod@nosc.ARPA Scheme Request
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 14 Jul 86 14:46:18 PDT
Received: from bass.ARPA by MC.LCS.MIT.EDU 14 Jul 86 17:27:39 EDT
Received: by bass.ARPA (5.31/4.7)
id AA09836; Mon, 14 Jul 86 14:25:49 PDT
Received: by cod.ARPA (5.31/4.7)
id AA13068; Mon, 14 Jul 86 14:25:46 PDT
Date: Mon, 14 Jul 86 14:25:46 PDT
From: Curtis L. Goodhart <goodhart%cod@nosc.ARPA>
Message-Id: <8607142125.AA13068@cod.ARPA>
To: scheme@mit-mc.ARPA
Cc: goodhart@nosc.ARPA
Subject: Scheme Request
-------
I am interested in obtaining a version of Scheme that will run on a
VAX 11/780 running VMS 4.2 OR a PDP-11/70 running Unix 2.9 .
Can you provide me some info on this?
I also recall that I may be able to FTP a copy of Scheme?
Are there user manuals available too?
Also, I will be at MIT in the Fall and probably take Ableson, and Sussman's
course, in which Scheme is used. Are there any crucial differences
between the version I might get through you and the version and MIT?
Thanks,
Curt Goodhart (goodhart@nosc on the arpanet)
-------
∂14-Jul-86 1514 @MC.LCS.MIT.EDU:andy@sun3.ads.ARPA Scheme vs. Common Lisp, #1: Politics
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 14 Jul 86 15:13:31 PDT
Received: from grape.ads.ARPA by MC.LCS.MIT.EDU 14 Jul 86 17:33:32 EDT
Date: Mon, 14 Jul 86 14:31:19 PDT
From: andy@sun3.ads.ARPA (Andy Cromarty)
To: rrrs-authors%mit-mc@ads.arpa
Subject: Scheme vs. Common Lisp, #1: Politics
Cc: andy@ads.arpa, gls%think@ads.arpa, rpg%su-ai@ads.arpa
Reply-To: andy@ads.arpa
This is the first of two notes on CommonLisp vs. Scheme. I have
written two notes in an attempt to separate political concerns
from design concerns, in part to keep them clear in my own mind and
in part in consideration of those of you who, like me, generally
have neither the time nor the temperment for long political debates
on the ARPANET. This note concerns the politics, or what I
think of (perhaps a little unkindly) as the "form rather than
the content" of the CL-Scheme issue. Those of you who stick it out
and read through this note (and the ones that are sure to follow)
should bear in mind that, as we've already seen, politics is
necessarily a somewhat more personal discipline than is the
technology most of us are really interested in, and for that reason
writing styles for the political notes can be expected to differ
from those composed with primarily technical purposes in mind.
asc
------------------------------------------------------------------------
Shortly after receiving Dick's flame, the following scenario popped
into my head. You are listening in on a phone conversation somewhere
in Arlington, Virginia.
Squires: Clint, I hear a rumor that Andy Cromarty is concerned
about CommonLisp's influence on the development of
Scheme.
Kelly: Scheme?
Squires: Yes, another kinky LISP dialect being designed by some
researchers. It only has a fraction of CommonLisp's
features and they can't quite seem to decide what
it should look like.
Kelly: Well, Steve, I guess I'll have to ask you to simply
rescind DARPA's support for CommonLisp, then, and
from now on we'll require all our AI projects to
use Structured COBOL.
I suppose I should be flattered at the suggestion that a few sentences
from me would reshape the course of LISP history, especially coming as
it does from Dick Gabriel. But somehow I give the research funding
community and the commercial tool market a little more credit for
indepedence of thought than this scenario (or Dick's note) suggests.
Perhaps more importantly, I am somewhat troubled by the idea that
Dick would advocate censorship of ideas and opinions concerning LISP
design and development (viz. his instructions that we "Don't let
anyone outside this list see Andy's message."). My assumption is
that the RRRS-AUTHORS list exists for the purpose of supporting "open
discussion within a closed community" concerning what form Scheme
should take, and that we all implicitly agree to attempt to ground
our argumentation for our favored alternative views on a substantive
technical basis. In this regard, I probably agree with the
suggestion that my comment "represents a low point in political
thinking." I think the implied converse option -- that we all need
to suppress concern or public discussion about the *costs* of CL
compatibility, or for that matter, any other dangerous thoughts we
might have -- represents a new high water mark in politicization
of the Scheme design process, and I would not feel complimented to be
accused of having set that new standard. Certainly there are others
in the Scheme community with whom I disagree, but I cannot imagine
proposing (for example) that we censor Dan Friedman because his
ideas about internal DEFINE differ from mine. Quite the contrary: I
look forward to hearing why alternative views are held; and when I
decide I can't stand the heat, *I* get out of the kitchen.
But yes, please don't repeat my messages outside this community. I
think we all assume that our discussions are held reasonably private
by this community, since this is still a design-in-progress, and at
the present I'm sensitized by having been poorly quoted a little too
often in the press recently. (And anyway, if anyone at DARPA
wants to know what I think of CL, they have my phone number.)
Now let's take a good hard political look at who disagreed most
vocally with my comment. The few responses I've received so far all
have been from competent LISP designers and implementors, to be sure.
But it is also true that they have been from: the implementor(s) of
Texas Instruments' Common Lisp and Scheme products; the author of the
premier Common Lisp text; and the president of the most successful
and best know Common Lisp product company in the world. In addition,
many or most of these people were personally involved in the Common
Lisp design effort. Their credentials are impeccable, but their
goals and commitments may not be the same as those of, say, a
professor who is using Scheme for its pedagogical value and has no
career or financial stake per se in the long-term viability or
political acceptance of this year's best production quality LISP
environment. I certainly believe that having their views represented
is critical to a good Scheme's development, and I made it clear in my
original note that I do consider myself to be an outlying point in
the distribution of views on CL vs. Scheme. But I think they are,
too; and let us not assume that the most vociferous advocates of
extreme positions (myself included) represent either the norm or the
best compromise position to take.
Since Dick couldn't see from his location down the street that my
tongue was towards the side of my mouth when I used the term "dark
forces," let me say that (a) I think Common Lisp is one of the most
successful technology results of any standardization committee I've
seen and (b) my reference was to the risk of Scheme becoming just
like Common Lisp, rather than a criticism of the quality of Common Lisp
as a LISP. Overall, Common Lisp is very good at being what it tries to
be. I am utterly unconvinced that that's what Scheme is trying to
be, however. I will treat the question of the goals of the two
languages in my companion note, but for now suffice it to say that
the idea that these languages have (forgive the pun) common goals
strikes me as nonsensical. If that were true, we could submit Guy's
excellent book to SIGPLAN and retire this list. I might go so far as
to say that it is precisely because Scheme exists that Common Lisp
can be successful, in the following sense: Those of us who are
concerned with what LISP should look like for the next several
decades can preoccupy ourselves with design debates over Scheme
morality, while people like Dick and Guy go on to take a snapshot of
what the community knows about good LISP design and then integrate
that knowledge, addressing and overcoming all the political obstacles
along the way, to produce a viable, saleable LISP product. And good
luck to them; but I do not see that Lucid's chimeras need to be ours.
Rather than worry that people will learn that there is more than one
LISP, let's advertise the fact. Let's make it clear that LISP is an
ideal language for embedding new constructs in, and that the presence
of a good heavily-featured standardized dialect has not quenched the
long-standing historical drive for LISPers to remain at the
forefront of programming language and programming environment design.
Let's advocate a plethora of LISP-like languages to get people out of
the Pascal-derivative language design syndrome and instead get them
directly and cleanly addressing individual hard language design
problems, like the keyword shadowing problem, design of appropriate
multiprocessing constructs, embedding of evidential reasoning
techniques into a programming language, integration of advanced
database technology into the programming environment in a coherent
fashion, getting distributed inheritance graphs to work across
loosely-coupled processors, and (somebody, please!) developing a
reasonable model of I/O. Let's get them thinking that LISP is not
dead, that it is not a "solved problem," that it's there to
experiment with, and that there are and will continue to be good
reasons for all the debates we engage in on how languages should be
designed.
asc
p.s. Dick, if you're still pissed off at me, we can go out for
dinner at the LISP conference and you can throw darts at me.
∂14-Jul-86 1607 @MC.LCS.MIT.EDU:RPG@SU-AI.ARPA Politics
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 14 Jul 86 16:07:16 PDT
Received: from SU-AI.ARPA by MC.LCS.MIT.EDU 14 Jul 86 18:59:35 EDT
Date: 14 Jul 86 1557 PDT
From: Dick Gabriel <RPG@SU-AI.ARPA>
Subject: Politics
To: rrrs-authors@MC.LCS.MIT.EDU
Naturally I'm not pissed at Andy. Were I truly pissed, and truly
flaming, my message would have begun, ``Andy, you total and complete
bagbiter, you are such a big loser that they had to extend the
city limits to include....''
My point was that I could imagine someone forwarding Andy's vitriol
to Common-Lisp or ARPA-BBOARDS and thereby lose some allies that
we, who are Scheme lovers one and all, would prefer to not lose if
at all possible.
Someday I'd like Lucid to be the ``most successful and best-known
supplier of Scheme products,'' on that happy day when Common Scheme
becomes the standard.
Homage, an item of low cost to the RRRS-authors, buys a lot from the
Common Lisp troops. Messages like Andy's, keyboard-in-cheek as they
may be, possibly buy more grief than the fun of typing them gains.
Politics and science are not so radically removed from each other. When
one propose some technical viewpoint, his goal is to have it accepted,
usually before he dies. Having his viewpoint accepted helps his
self-esteem, his quest for fame as a scientist, his reach for tenure. This
isn't much different from politics, in which the goals are probably
self-esteem, fame, and a reach for office. Although there may be more
technical content to a technical debate, the tactics used in arguing for a
political end really don't differ significantly.
This design committee should aim at producing the best possible Lisp.
If that happens to mean that nothing in it is like the corresponding
thing in Common Lisp, that's fine. All technical debate regarding these
choices should be open. If nothing in Scheme is like the corresponding thing
in Common Lisp simply because Common Lisp is bad, and disjointness is a
goal, then I think this design committee will have blown it.
********************************
On a related note, now that there has been a fair bit of experience with
Common Lisp, it might be worthwhile for this group to ask some of the
Common Lisp hackers about their experience with the parts of Common Lisp
that the Schemers find objectionable. Similarly, it might be instructive to
look at what the Common Lisp hackers find nice about Common Lisp that might
be surprising.
-rpg-
∂14-Jul-86 1702 @MC.LCS.MIT.EDU:dyb%iuvax.indiana.edu@CSNET-RELAY.ARPA call-with-xput-port vs. call-with-xput-file
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 14 Jul 86 17:00:48 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 14 Jul 86 19:42:14 EDT
Received: from indiana by csnet-relay.csnet id ac02754; 14 Jul 86 19:26 EDT
Date: Mon, 14 Jul 86 11:47:21 est
From: Kent Dybvig <dyb%iuvax.indiana.edu@CSNET-RELAY.ARPA>
To: rrrs-authors%mit-mc.CSNET@CSNET-RELAY.ARPA
Subject: call-with-xput-port vs. call-with-xput-file
I favor changing call-with-input-file and call-with-output-file to
call-with-input-port and call-with-output-port. However, I have some
questions related to the change and to ports in general.
1. I saw lots of confusion over the fact that you open a file (with
open-input-file and open-output-file) but close a port (with close-
input-port and close-output-port). Changing the "call-with" names
could increase the confusion. Should we change open-input-file and
open-output-file to open-input-port and open-output-port?
2. I have added string ports to Chez Scheme and need to choose names.
If we have call-with-...-file and open-...-file, I can introduce the
names call-with-...-string and open-...-string. On the other hand,
if we have call-with-...-port and open-...-port, I can introduce the
names call-with-...-string-port and open-...-string-port. The names
are longer but perhaps more descriptive. How do these names sound?
The point of this question is that any names we choose should
generalize to other types of ports.
3. Currently, there is no way to change the current ports to anything
other than a freshly-opened file (as with the inessential with-input-
from-file and with-output-to-file). Stylistically, I think it is
better to never change the standard ports. But if they can be changed,
I'd like to have a way for a debugger, say, to change them back to an
existing file (usually the original current ports), so that anything
the user executes goes to the expected place. Without this we cannot
hope to write a reliable portable debugger (and debug code with calls
to with-input-from-file or with-output-to-file).
4. Also, there is no way to change the current ports permanantly.
That is, it is not possible to write (set-current-input! <port>) or
(set-current-output! <port>). Again, I don't think this is good
practice, but some might rue the inability to do so.
5. Why is call-with-input-file essential and open-input-file not?
If call-with-input-file is analogous to call-with-current-continuation,
why do we not have (call-with-new-string <length> <proc>) instead of
make-string or (call-with-pair <obj1> <obj2> <proc>) instead of cons,
etc? Because call-with-current-continuation is special---a function
make-continuation would be problematic. In short, while I see the
merit in with-input-from-file since it closes the file and rebinds a
standard port, I cannot see the merit in call-with-input-file. Can
we flush call-with-input-file and call-with-output-file and promote
open-input-file and open-output-file to essential status?
∂14-Jul-86 1814 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Scheme Request
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 14 Jul 86 18:06:40 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 14 JUL 86 21:00:38 EDT
Date: Mon, 14 Jul 86 20:58:54 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Scheme Request
To: goodhart@NOSC-COD.ARPA
cc: goodhart@NOSC.ARPA, scheme@MC.LCS.MIT.EDU
In-reply-to: Msg of Mon 14 Jul 86 14:25:46 PDT from Curtis L. Goodhart <goodhart%cod at nosc.ARPA>
Message-ID: <[AI.AI.MIT.EDU].69927.860714.JAR>
Date: Mon, 14 Jul 86 14:25:46 PDT
From: Curtis L. Goodhart <goodhart%cod at nosc.ARPA>
I am interested in obtaining a version of Scheme that will run on a
VAX 11/780 running VMS 4.2 OR a PDP-11/70 running Unix 2.9 .
I think most or all of your questions are answered by the contents of
the file "LSPMAI;SCHEME IMPLS" available on Internet hosts MIT-MC,
MIT-MX, and MIT-AI (I have copied it around to improve its
accessibility, in case one or two of these machines are down).
By the way, I'll mail this file (about 17K) to anyone who requests it,
although if you can FTP it that's preferable. These machines aren't
finicky about usernames or passwords or things like that.
Jonathan
∂14-Jul-86 2156 @MC.LCS.MIT.EDU:dyb%iuvax.indiana.edu@CSNET-RELAY.ARPA the colon (:) in identifier syntax
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 14 Jul 86 21:55:58 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 15 Jul 86 00:56:25 EDT
Received: from indiana by csnet-relay.csnet id aj05326; 15 Jul 86 0:48 EDT
Date: Mon, 14 Jul 86 21:34:01 est
From: Kent Dybvig <dyb%iuvax.indiana.edu@CSNET-RELAY.ARPA>
To: rrrs-authors%mit-mc.CSNET@CSNET-RELAY.ARPA
Subject: the colon (:) in identifier syntax
Can we omit colon (:) from the enumeration of characters that can
be used in identifiers, to allow implementations to support some
sort of package system using colon as the separator?
∂14-Jul-86 2159 @MC.LCS.MIT.EDU:dyb%iuvax.indiana.edu@CSNET-RELAY.ARPA exp versus expt
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 14 Jul 86 21:59:46 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 15 Jul 86 00:56:33 EDT
Received: from indiana by csnet-relay.csnet id ak05326; 15 Jul 86 0:49 EDT
Date: Mon, 14 Jul 86 21:47:54 est
From: Kent Dybvig <dyb%iuvax.indiana.edu@CSNET-RELAY.ARPA>
To: rrrs-authors%mit-mc.CSNET@CSNET-RELAY.ARPA
Subject: exp versus expt
We have a way to find an exponent of e (exp n) and of an arbitrary
base (expt b n). We have a function to find the log base e (log n)
but not the log in an arbitrary base. How about adding (log n b)?
Why do we have (expt b n)? We could instead give exp an optional
argument specifying the base, i.e., (expt b n) => (exp n b). Why
is it not done this way in Common Lisp, as it is for log? Perhaps
because the argument order would seem backwards?
Kent
∂15-Jul-86 0951 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU convergence
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 15 Jul 86 09:50:59 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 15 JUL 86 12:51:31 EDT
Date: Tue, 15 Jul 86 12:51:27 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: convergence
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <[AI.AI.MIT.EDU].70360.860715.JAR>
Apparently we could go on forever thinking of and arguing over ways to
improve the language. If you have changes you want considered for the
SIGPLAN version of the report, please send them right way (actually,
send them in several months ago). Otherwise PLEASE just sit on them for
a while, and when this report is out, then let's start discussing the
next version. For now, orient your messages towards achieving
stability. If you want perfection then nothing will ever get published.
And, as they say in the soaps, I need to get on with my life.
Thanks
Jonathan
∂15-Jul-86 1807 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA Re: Scheme's DO construct
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 15 Jul 86 18:07:03 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 15 Jul 86 21:07:47 EDT
Received: from tektronix by csnet-relay.csnet id aa14951; 15 Jul 86 20:49 EDT
Received: by tektronix.TEK (5.31/6.16)
id AA29117; Tue, 15 Jul 86 15:50:33 PDT
Received: by tekchips.TEK (5.31/6.16)
id AA19578; Tue, 15 Jul 86 15:52:54 PDT
Message-Id: <8607152252.AA19578@tekchips.TEK>
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: Re: Scheme's DO construct
Date: 15 Jul 86 15:52:52 PDT (Tue)
From: willc%tekchips.tek.csnet@CSNET-RELAY.ARPA
There are two things to be said in defense of Scheme's DO:
1. Unlike most general purpose iteration constructs, DO is useful
for functional programming.
2. DO is the only general purpose iteration construct in Scheme
that doesn't force you to think up a name (such as LOOP) for
the loop.
This is a long message, but the two points above are the gist of it.
It seems to me that Andy has missed the first point entirely, considering
his remarks that:
I have no prima facie objection to the use of iterative constructs,
and in particular, none to supporting iteration in Scheme. Indeed, I
think that it is often very effective to think procedurally and
iteratively rather than functionally and recursively. (I understand
these are apples and oranges, but the styles are usually associated
with each other.)
...
I have performed the following informal experiment. I had one or
two of the people working with me who were true devotees of LOOP
and DO go back and recode fairly large (5000-15000 lines) LISP programs,
ripping out LOOP and DO and putting in DOLIST, DOTIMES, and mapping
functions. I should say that they did it "kicking and screaming," not
because of the work involved but because they so loved all the features
that LOOP offered.
LOOP is indefensible, but Andy is mistaken to lump DO with LOOP.
If by "mapping functions" Andy here means the standard Scheme mapping
functions, then MAP is the only functional alternative to DO that Andy
offered his people. MAP isn't general enough to replace DO, and DOLIST,
DOTIMES, and FOR-EACH are completely useless for functional programming.
Thus it seems that in the name of style Andy was coercing his people to
convert functional programs that use DO into non-functional programs.
It seems to me that if we truly want to discourage people from writing
functional programs, a more effective way to do it would be to change
Scheme so people can't program in the functional style until they master
a set of arbitrarily chosen rules for inserting tokens like #' and FUNCALL
into their programs.
Let's consider the functional alternatives to DO using a simple example.
The example is not too simple; it cannot easily be written using Scheme's
standard mapping procedures. (Aside: In the example, SEQUENCE is a
procedure, not a special form, so this is not portable Scheme code.
The name SEQUENCE was meaningful to my audience, so I used it anyway.
As I recall the discussion at Brandeis, SEQUENCE as a special form was
supposed to disappear over time so we could use the name for such higher
purposes, and I was very disappointed that the recent vote was phrased
as a referendum on dropping BEGIN rather than on dropping SEQUENCE.)
The example is:
(define find-word-break
(lambda (x k2)
(do ((x x (rest x)))
((or (empty? x) (not (break? (first x))))
(do ((x x (rest x))
(word '() (concat word (sequence (first x)))))
((or (empty? x) (break? (first x)))
(k2 word x)))))))
The most straightforward elimination of DO yields:
(define find-word-break
(lambda (x k2)
(letrec ((loop1
(lambda (x)
(if (or (empty? x) (not (break? (first x))))
(letrec ((loop2
(lambda (x word)
(if (or (empty? x) (break? (first x)))
(k2 word x)
(loop2 (rest x)
(concat word
(sequence (first x))))))))
(loop2 x '()))
(loop1 (rest x))))))
(loop1 x))))
This code is rather forbidding, so I would probably define loop1 and loop2
in a single LETREC. That works in this case but would not work if a
variable introduced by the outer DO were free within the inner DO.
REC or NAMED-LAMBDA would improve the code a little.
Can Scheme do better? I could instead use named LET, which would have
the advantage of moving the initialization expression for each loop
variable into proximity with its binding, and would make some of the
LAMBDAs invisible:
(define find-word-break
(lambda (x k2)
(let loop1
((x x))
(if (or (empty? x) (not (break? (first x))))
(let loop2
((x x)
(word '()))
(if (or (empty? x) (break? (first x)))
(k2 word x)
(loop2 (rest x)
(concat word (sequence (first x))))))
(loop1 (rest x))))))
This version still has two disadvantages: (1) I had to think about (or avoid
thinking about!) the names LOOP1 and LOOP2; and (2) it is hard to find the
new bindings for the loop variables. The way to overcome these disadvantages
is to invent a new special form that moves the expressions that compute the
new values for the loop variables next to their bindings (Dick Gabriel has
already pointed out the value of doing this) and to suppress the names of
the loops; in other words, to invent DO.
Having invented DO, we still have to decide on its syntax. The syntax of
Scheme's DO is less than optimal for functional programming primarily
because it is designed to support an additional feature: you can insert
non-functional statements to be executed every time around the loop.
Because Scheme is not a purely functional language, this is a reasonable
feature to support; even I use it on occasion. Unless we can come up with
a significantly better syntax, we might as well enjoy the advantages of
Lisp tradition and compatibility, while fixing any randomness (as we did
by flushing the implicit binding of RETURN and by using binding instead of
assignment for the loop variables).
I could go on and talk about why functional loops such as the ones you
write using tail recursion or DO are easier to understand than imperative
loops such as the ones you write using DOTIMES, DOLIST, FOR-EACH, or
Andy's straw FOR, VARYING, REPEAT, or WHILE, but I don't think it's
necessary for this audience.
Peace, William Clinger
∂15-Jul-86 2019 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU rrrs-authors
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 15 Jul 86 20:18:55 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 15 JUL 86 23:19:19 EDT
Date: Tue, 15 Jul 86 23:19:07 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: rrrs-authors
To: adams%tekchips.tek.csnet@CSNET-RELAY.ARPA
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Tue 15 Jul 86 14:30:07 PDT from Norman Adams <adams%tekchips.tek.csnet at CSNET-RELAY.ARPA>
Message-ID: <[AI.AI.MIT.EDU].70741.860715.JAR>
Date: Tue, 15 Jul 86 14:30:07 PDT
From: Norman Adams <adams%tekchips.tek.csnet at CSNET-RELAY.ARPA>
To: jar at AI.AI.MIT.EDU
Re: rrrs-authors
Message-Id: <8607152130.AA18643@tekchips.TEK>
Who is on the rrrs-authors list? I'm just curious ... -N
Here's the current membership of the list. It's pretty much the same
people as were on the SCHEME mailing list before it was opened up to the
general public.
- Jonathan
;;; -*- Mode:LISP; -*-
;;; Authors of the Revised↑3 Report on the Algorithmic Language Scheme
;;; To be added or deleted, send mail to SCHEME-REQUEST.
;;; Sorted alphabetically by name of institution, and alphabetically
;;; within institution, except for MIT, which appears first.
(file [LSPMAI;RRRS MAIL]) ;Local archive file
(SCHEME-RRRS MIT-OZ) ;Oz people
;;; Also on SCHEME-TEAM
(LS.SRB EE)
(cherian vx)
YEKTA ;Yekta Gursel
JAR ;?
(katz vx)
(alco vx)
(CPH AI)
;;; Others
ALAN
NICK ;Nick Papadakis
RHH ;Bert Halstead
Daniel ;Daniel Weise
RDZ ;Ramin Zabih
;;; Non-MIT
(jleech aids-unix) ;AI & DS / Jay Leech
(william aids-unix) ; William Bricken
(andy aids-unix) ; Andy Cromarty
(wand%northeastern CSNET-Relay) ;Brandeis / Mitch Wand
(dyb%indiana CSNET-Relay) ;Indiana / Kent Dybvig
(scheme-rrrs%indiana CSNET-Relay) ;Indiana / ...
(linus!ramsdell Mitre-Bedford) ;MITRE / John Ramsdell
("#COMSCH.MSG[SCH,LSP]" SU-AI) ;Stanford / File archive
(ANDY SU-SUSHI) ; Andy Freeman
(RPG SU-AI) ; Dick Gabriel
KMP ;Symbolics / Kent Pitman
(adams%tekchips%tektronix csnet-relay) ;Tektronix / Norman Adams
(willc%tekchips%tektronix csnet-relay) ; Will Clinger
(Scheme-Local%TI-CSL CSNET-Relay) ;TI / ...
GLS ;TMI / Guy Steele
(patel CS.UCLA.EDU) ;UCLA / Dorab Patel
(Hudak Yale) ;Yale / Paul Hudak
(Kelsey Yale) ; Richard Kelsey
(Kranz Yale) ; David Kranz
(Philbin-Jim Yale) ; Jim Philbin
∂15-Jul-86 2105 @MC.LCS.MIT.EDU:jleech@sun6.ads the rrrs authors
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 15 Jul 86 21:05:30 PDT
Received: from grape.ads.ARPA by MC.LCS.MIT.EDU 16 Jul 86 00:05:50 EDT
Date: Tue, 15 Jul 86 21:03:00 PDT
From: jleech@sun6.ads (Jay Leech)
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: the rrrs authors
Cc: andy@sun3.ads.ARPA
Myself and a couple of others on the rrrs-authors mailing list were
associated with AI & DS.
We have changed our company name to Advanced Decision Systems, and
our arpanet address should now be ads or ads-unix.
Also, good work! I am looking forward to the publication of the report.
-- Jay Leech
∂16-Jul-86 1731 @MC.LCS.MIT.EDU:brooks%tilde%TI-CSL.CSNET@CSNET-RELAY.ARPA Substring & friends
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 16 Jul 86 17:31:44 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 16 Jul 86 16:21:33 EDT
Received: from ti-csl by csnet-relay.csnet id aq04187; 16 Jul 86 15:26 EDT
Received: by tilde id AA18614; Wed, 16 Jul 86 11:01:18 cdt
Date: Wed, 16 Jul 86 11:01:18 cdt
From: Gary Brooks <brooks%tilde%TI-CSL.CSNET@CSNET-RELAY.ARPA>
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: Substring & friends
As stated in the R↑3 Report, the documentation for the <start> and <end>
indices for substring & friends is consfused. The report states that
<start> and <end> must be valid indices (with <start> <= <end>). This
is certainly not the case if you are taking the substring of an entire
string, where the index for <end> must be one greater than the largest
valid index. The previous report, RRRS, included a paragraph explaining
that <start> is inclusive and <end> is exclusive, which is clearer
though still inconsistant with the documentation for substring. This
inconsistency should be rectified.
On the other hand <start> and <end> could be defined to both be
inclusive. Now, I realize that there are probably too many instances of
substring & friends running around, and that this would be incompatible
with CL's subsequence, but I for one dislike the notion of (exclusive)
indices that may not be (really) valid indices. Comments?
-- brooks
∂16-Jul-86 1732 @MC.LCS.MIT.EDU:Bartley%TI-CSL.CSNET@CSNET-RELAY.ARPA Re: number syntax
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 16 Jul 86 17:32:08 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 16 Jul 86 16:22:46 EDT
Received: from ti-csl by csnet-relay.csnet id bn04187; 16 Jul 86 15:40 EDT
Received: by tilde id AA19590; Wed, 16 Jul 86 11:21:40 cdt
Date: Wed 16 Jul 86 10:53:32-CDT
From: David Bartley <Bartley%TI-CSL.CSNET@CSNET-RELAY.ARPA>
Subject: Re: number syntax
To: JAR%ai.ai.mit.edu@CSNET-RELAY.ARPA
Cc: rrrs-authors%mc.lcs.mit.edu@CSNET-RELAY.ARPA,
Bartley%TI-CSL.CSNET@CSNET-RELAY.ARPA
In-Reply-To: <860710120911.5.JAR@ROCKY-GRAZIANO.LCS.MIT.EDU>
Message-Id: <12223161873.35.BARTLEY@CSC60>
> Date: Thu, 10 Jul 86 12:09 EDT
> From: Jonathan A Rees <JAR%ai.ai.mit.edu@CSNET-RELAY.ARPA>
>
> Date: Tue 17 Jun 86 16:00:31-CDT
> From: David Bartley <Bartley%ti-csl.csnet at CSNET-RELAY.ARPA>
>
> One irritant in the Report that we have neglected to comment on until
> now (sorry!) is the syntax of numbers. We believe that Scheme numbers
> are essentially equivalent to Common Lisp numbers except for the new
> notion of exactness. To the extent that that is so, it seems to be a
> (shudder!) ``gratuitous difference'' from Common Lisp to have an
> incompatible syntax. [...]
>
> What we'd like to see is an essential syntax for numbers which is
> compatible with Common Lisp's. Additional features, including
> exactness, would be optional extensions. Even so, they should not
> conflict with Common Lisp. For example, the use of `#s' and the order
> of <sign> and <prefix> are different in the two languages. [...]
>
> Does anyone agree with us? Is there time to make such a change before
> R↑3RS goes to press?
>
>I think everyone agrees with you, and that there is time. Could you
>please write a concrete proposal, preferably something close to being
>suitable for inclusion in the report. Also please provide BNF. Thanks.
>
>Jonathan
Here's a stab at it---we expect and welcome debate over the details.
The major differences between the syntax of numbers in Common Lisp (CL)
and heretofore in Scheme (R↑3RS) are:
(1) CL has the prefix denoting base precede the sign; R↑3RS has the sign
precede the prefix, which includes the base specifier. I see no reason to
differ from CL.
(2) CL uses several exponent markers to specify levels of precision for
floating point numbers; R↑3RS specifies precision levels (S and L) in the
prefix. Again, why differ from CL?
(3) CL does not provide for the use of `#' to indicate insignificant
digits. Making this a non-essential feature in R↑3RS seems reasonable.
(4) CL provides only the #C(real real) notation for complex numbers; R↑3RS
provides infix notations for both polar and rectangular forms. For
compatibility with CL, R↑3RS should support the #C notation and the infix
forms should be non-essential extensions.
(5) CL integers may optionally terminate in a decimal point; R↑3RS permits
such a number to be treated as floating point and it is debated whether it
is to be considered exact. This is a serious problem, since many
procedures are defined to accept only integer values. Is the call
(INTEGER->CHAR 55.) valid? We propose that this be a non-essential
feature in R↑3RS.
(6) CL integers and ratios are not permitted to have exponent markers.
This feature should be a non-essential extension to Scheme.
(7) CL does not have the concept of exactness. Most (all?) existing
implementations of Scheme do not support this feature, so it should be
non-essential.
We propose the following syntax for numbers in Scheme. (Recall that
letter case is insignificant in the grammar and that the rules for <ureal
R>, <prefix R>, etc., should be replicated for R = 2, 8, 10, and 16.)
<number> --> <real> | #c( <real> <real> )
<real> --> <prefix R> <sign> <ureal R>
<prefix R> --> <exactness> <radix R>
<exactness> --> <empty> | #i | #e
<radix 2> --> #b
<radix 8> --> #o
<radix 10> --> <empty> | #d
<radix 16> --> #x
<sign> --> <empty> | + | -
<ureal R> --> <integer R> | <ratio R> | <flonum R>
<integer R> --> <digit R>+ #*
<ratio R> --> <digit R>+ #* / <digit R>+ #*
<flonum R> --> . <digit R>+ #* <expon>
| <digit R>+ . <digit R>* #* <expon>
| <digit R>+ #* . #* <expon>
<expon> --> <empty> | <expon-marker> <sign> <digit>+
<expon-marker> --> e | f | d | l | s
<digit 2> --> 0 | 1
<digit 8> --> 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7
<digit 10> --> <digit 8> | 8 | 9
<digit 16> --> <digit 10> | a | b | c | d | e | f
Although we have incorporated <exactness> and the use of `#' above, they
should be stated to be non-essential features of Scheme.
Nonessential feature: integers with optional decimal points.
<integer R> --> <digit R>+ #* .
Nonessential feature: integers and ratios with exponents.
<integer R> --> <digit R>+ #* <expon>
<ratio R> --> <digit R>+ #* <expon> / <digit R>+ #* <expon>
Nonessential number productions representing complex numbers. We worry
that the forms <real>+<ureal>i and <real>-<ureal>i can be hard to parse.
Perhaps combining the suffix `i' with the infix `+' or `-' would be
palatable to those who want this feature.
<number> --> <real> +i <ureal>
| <real> -i <ureal>
| <real> @ <real>
Regards,
David Bartley
Mark Meyer
-------
∂16-Jul-86 1921 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU July 15 draft sent
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 16 Jul 86 19:20:50 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 16 JUL 86 22:21:14 EDT
Date: Wed, 16 Jul 86 22:21:24 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: July 15 draft sent
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <[AI.AI.MIT.EDU].71397.860716.JAR>
Today I US-mailed another draft to everyone (except GLS, KMP, and people
at MIT, who I'll get to Thursday or Friday, or who can steal them from
my desk). It is closer to done than the previous one was, but note that
it does NOT reflect any changes in number syntax, LOAD, or names of
call-with-*put-port. There are a few other things I didn't get to,
which I can't recall right now, but I'm confident that y'all will miss
them and tell me.
I probably won't start another pass over it until a week from tomorrow
(i.e. the 17th), so don't feel guilty if you don't send your remarks to
me before that. After the 20th is when you can start feeling guilty.
Jonathan
∂17-Jul-86 0851 @MC.LCS.MIT.EDU:CPH@AI.AI.MIT.EDU Substring & friends
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 17 Jul 86 08:50:17 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 17 JUL 86 11:50:47 EDT
Date: Thu, 17 Jul 86 11:50:46 EDT
From: Chris Hanson <CPH@AI.AI.MIT.EDU>
Subject: Substring & friends
To: brooks%tilde%TI-CSL.CSNET@CSNET-RELAY.ARPA
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Wed 16 Jul 86 11:01:18 cdt from Gary Brooks <brooks%tilde%TI-CSL.CSNET at CSNET-RELAY.ARPA>
Message-ID: <[AI.AI.MIT.EDU].71736.860717.CPH>
I object to changing the substring indexing scheme. I chose the
imbalanced inclusive-start/exclusive-end pair because it has a some
nice properties:
1. The pair for the entire string is (0, length(string)), which is
trivially computable.
2. The pair for the empty string is (i, i) for any i <=
length(string). There is no natural representation for this if both
indices are inclusive.
Don't think that no thought went into this. I know that on first
encountering this scheme it seems unintuitive, but experience has
shown it to be quite effective, and once learned, easy to remember.
I don't think that the issue of whether or not the end index is a
valid index for the string is very interesting. In practice, it is
easy to decide whether a given index pair is valid:
0 <= start <= end <= length(string)
∂17-Jul-86 1217 @MC.LCS.MIT.EDU:GJS%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU Re: Substring & friends
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 17 Jul 86 12:17:21 PDT
Received: from OZ.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 17 JUL 86 15:00:16 EDT
Date: Thu 17 Jul 86 13:09:44-EDT
From: "Gerald Jay Sussman" <GJS%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU>
Subject: Re: Substring & friends
To: CPH@AI.AI.MIT.EDU, rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: <[AI.AI.MIT.EDU].71736.860717.CPH>
Message-ID: <12223437888.36.GJS@OZ.AI.MIT.EDU>
I agree with CPH about his choice of "half-open interval"
representations of strings. I believe that the choice he made is
pretty optimal because of good nesting and adjacency relations that
are clear if one thinks abstractly.
-------
∂17-Jul-86 1412 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU [jtv%fingate.bitnet: Scheme Request]
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 17 Jul 86 14:12:40 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 17 JUL 86 17:01:37 EDT
Date: Thu, 17 Jul 86 16:39:45 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: [jtv%fingate.bitnet: Scheme Request]
To: scheme@MC.LCS.MIT.EDU
Message-ID: <[AI.AI.MIT.EDU].71910.860717.JAR>
If someone could translate the following for me, or even identify what
language it's written in, I'd be grateful.
Thanks,
Jonathan
Date: Tue, 15 Jul 86 20:12:38 +0200
From: Jukka Virtanen <jtv%fingate.bitnet at WISCVM.ARPA>
To: JAR at AI.AI.MIT.EDU
Re: Scheme Request
Tjaah, ei meilla KAI ole schemea...
JOs on, en tieda siita. Juha Heinasella (tre)
jh@tut on sellainen REF manual, jota ketselin
katselin
chanlmersiin mentaessa.
Etkos tilannut scheme listat?
Vois ton tilata tuolta, jos viitsit.
Juki
∂17-Jul-86 1442 @MC.LCS.MIT.EDU:adams%tekchips.tek.csnet@CSNET-RELAY.ARPA Re: Substring & friends
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 17 Jul 86 14:42:01 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 17 Jul 86 17:39:23 EDT
Received: from tektronix by csnet-relay.csnet id ah14030; 17 Jul 86 16:04 EDT
Received: by tektronix.TEK (5.31/6.16)
id AA02159; Thu, 17 Jul 86 09:42:29 PDT
Received: by tekchips.TEK (5.31/6.16)
id AA10005; Thu, 17 Jul 86 09:44:56 PDT
Date: Thu, 17 Jul 86 09:44:56 PDT
From: Norman Adams <adams%tekchips.tek.csnet@CSNET-RELAY.ARPA>
Message-Id: <8607171644.AA10005@tekchips.TEK>
Subject: Re: Substring & friends
To: Gary Brooks <brooks%tilde%TI-CSL.CSNET@CSNET-RELAY.ARPA>
Cc: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: Gary Brooks <brooks%tilde%TI-CSL.CSNET@csnet-relay.CSNET>, Wed, 16 Jul 86 11:01:18 cdt
On the other hand <start> and <end> could be defined to both be
inclusive. Now, I realize that there are probably too many instances of
substring & friends running around, and that this would be incompatible
with CL's subsequence, but I for one dislike the notion of (exclusive)
indices that may not be (really) valid indices. Comments?
Here's a comment:
Currently, if given <start> and <length>, then <end> = <start> + <length>;
whereas with inclusive indices <end> = <start> + <length> - 1. I prefer
to not have to adjust by 1 in index computations.
-Norman
-------
∂18-Jul-86 0012 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA Re: Substring & friends
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 18 Jul 86 00:12:20 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 18 Jul 86 03:13:19 EDT
Received: from tektronix by csnet-relay.csnet id af00418; 18 Jul 86 2:58 EDT
Received: by tektronix.TEK (5.31/6.16)
id AA19060; Thu, 17 Jul 86 15:26:12 PDT
Received: by tekchips.TEK (5.31/6.16)
id AA14145; Thu, 17 Jul 86 15:28:40 PDT
Message-Id: <8607172228.AA14145@tekchips.TEK>
To: brooks%tilde%TI-CSL.CSNET@CSNET-RELAY.ARPA
Cc: rrrs-authors@MC.LCS.MIT.EDU
Subject: Re: Substring & friends
In-Reply-To: Your message of Wed, 16 Jul 86 11:01:18 cdt.
<8607170501.AA05456@tekchips.TEK>
Date: 17 Jul 86 15:28:38 PDT (Thu)
From: willc%tekchips.tek.csnet@CSNET-RELAY.ARPA
An advantage of an inclusive <start> and an exclusive <end> is that
(substring s 0 (string-length s)) is the entire string. If both
were inclusive you'd have to say (substring s 0 (-1+ (string-length s))),
which seems less convenient. Using (- x 1) instead of (-1+ x) makes it
even harder to read.
An aside on -1+: As Marianne Moore said, I too dislike it. I can't
agree that it can't be pronounced, however, since I pronounce (-1+ x)
as "the predecessor of x" or "one less than x". As Kent Pitman once
pointed out, we can pronounce things however we like. (Kent wanted
things like EQ? to be pronounced "eek-pee". I propose that EQ? be
pronounced "eek-hunh?", with a rising inflection. Just kidding.)
By the way, I don't care whether 1+ and -1+ go or stay; whatever
Jonathan decides is fine with me.
Peace, Will
∂18-Jul-86 1428 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU [jtv%fingate.bitnet: Scheme Request]
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 18 Jul 86 14:27:42 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 18 JUL 86 17:23:00 EDT
Date: Fri, 18 Jul 86 17:22:04 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: [jtv%fingate.bitnet: Scheme Request]
To: scheme@MC.LCS.MIT.EDU
In-reply-to: Msg of Fri 18 Jul 86 12:01:19 MDT from Fons Botman <mcvax!vu44!fons at seismo.CSS.GOV>
Message-ID: <[AI.AI.MIT.EDU].72425.860718.JAR>
Thanks to everyone who replied to my query about the Finnish mail I
received.
Jonathan
∂21-Jul-86 0448 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA typos
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 21 Jul 86 04:38:44 PDT
Received: from mitre-bedford.ARPA by MC.LCS.MIT.EDU 21 Jul 86 07:39:53 EDT
Organization: The MITRE Corp., Bedford, MA
Received: from jymme.sun.uucp by linus.MENET (1.1/4.7)
id AA02999; Mon, 21 Jul 86 07:38:54 EDT
Posted-Date: Mon, 21 Jul 86 07:35:50 edt
Received: by jymme.sun.uucp (2.0/SMI-3.0DEV3)
id AA12384; Mon, 21 Jul 86 07:35:50 edt
Date: Mon, 21 Jul 86 07:35:50 edt
From: ramsdell%linus@mitre-bedford.ARPA
Message-Id: <8607211135.AA12384@jymme.sun.uucp>
To: rrrs-authors%mc.lcs.mit.edu@mitre-bedford.ARPA
Subject: typos
1) [Page 5, col 2, line 8] atsign => at-sign.
2) [Page 5, col 2, line -1] The note seems out of place.
I suggest deleting it.
3) [Page 5, col 1, line 19] #fand => #f and.
4) [Page 9, col 1, line 21] Odd indent.
5) [Page 10, col 2] Program example not indented correctly.
6) [Page 10, col 2, line -l] comma/at-sign/expression =>
comma at-sign expression OR comma-at-sign-expression.
7) [Page 12, col 2, line -14] In the phrase "equal? is the coarsest
or most liberal", liberal has too many meanings; I suggest
dropping the phrase "or most liberal".
8) [Page 20, col 1, line -20] rouding => rounding.
9) [Page 22, col 2, line -19] uppper => upper.
10) [Page 27, col 2] call-with-xxput-file => call-with-xxput-port.
11) [Page 38, col 1, ref 14] No page numbers.
Wow! What an improvement!
John
∂21-Jul-86 0737 @MC.LCS.MIT.EDU:Mike←Wilson%CARLETON.BITNET@WISCVM.WISC.EDU Performance and Evaluation of Scheme Systems...
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 21 Jul 86 07:37:40 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 21 Jul 86 10:35:36 EDT
Received: from wiscvm.wisc.edu by CSNET-RELAY.ARPA id aa26311;
21 Jul 86 10:33 EDT
Received: from (MIKE←WIL)CARLETON.BITNET by WISCVM.ARPA on 07/21/86 at
09:26:48 CDT
Received: from Mike←Wilson by CARLETON.BITNET on 21 Jul 86 08:37:12 EDT
Date: 21 Jul 86 08:04:00 EDT
From: Mike Wilson <Mike←Wilson%CARLETON.BITNET@WISCVM.WISC.EDU>
To: scheme%mc.lcs.mit.edu@CSNET-RELAY.ARPA
MMDF-Warning: Parse error in original version of preceding line at CSNET-RELAY.ARPA
Subject: Performance and Evaluation of Scheme Systems...
Hi,
I've just been looking through the book ←Performance and Evaluation
of Lisp Systems← (Richard P. Gabriel, The MIT Press). It's got benchmark
results for several simple programs run on the more common lisp systems.
Has anyone run these tests in CScheme/MacScheme/TIScheme? It would be
interesting to see how we stack up. (I have to admit I am *impressed*
with their times for the IBM 3081 and CRAY-XMP. Oh well...)
.Mike
∂21-Jul-86 0808 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU schedule
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 21 Jul 86 08:08:44 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 21 JUL 86 11:01:29 EDT
Date: Mon, 21 Jul 86 11:00:01 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: schedule
To: ramsdell%linus@MITRE-BEDFORD.ARPA
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Mon 21 Jul 86 07:47:45 edt from ramsdell%linus at mitre-bedford.ARPA
Message-ID: <[AI.AI.MIT.EDU].73291.860721.JAR>
Date: Mon, 21 Jul 86 07:47:45 edt
From: ramsdell%linus at mitre-bedford.ARPA
I cannot keep up with your schedule. I received the July 15th draft
on Friday afternoon, and did not have access to a computer until this
morning. There is no way I could have gotten my reply to you by July
20th.
Jeez, did I tell people to send me comments by the 20th? I meant to say
that I won't be doing anything until the 24th, so don't kill yourself to
get stuff to me before that. Within 5 days after the 24th would be very
nice. The main guideline is this: the report must absolutely be in its
final form before the Lisp conference; in fact, it probably has to be
done by Thursday July 31, so that there's time to make zillions of
copies of it to hand out at the conference.
Jonathan
∂21-Jul-86 0827 @MC.LCS.MIT.EDU:CLOWNEY@BLUE.RUTGERS.EDU Logic Continuations (Abstract)
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 21 Jul 86 08:20:45 PDT
Received: from BLUE.RUTGERS.EDU by MC.LCS.MIT.EDU 21 Jul 86 11:18:22 EDT
Date: 21 Jul 86 11:11 EDT (Mon)
From: Les <Clowney@BLUE.RUTGERS.EDU>
To: Chris Haynes <cth%indiana.csnet@CSNET-RELAY.ARPA>
Cc: scheme@MC.LCS.MIT.EDU, clowney@BLUE.RUTGERS.EDU
Subject: Logic Continuations (Abstract)
Hi Chris,
I am generally interested in reports on Scheme that have come
out of Indiana University, and am currently interested in the report
on continuations as applied to the implementation of logic programming in
Scheme (Computer Science Department Technical Report No. 183). Where
should I inquire about this report and a general index of Scheme
related reports?
les
∂21-Jul-86 1014 @MC.LCS.MIT.EDU:gls@Think.COM Scheme's DO construct
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 21 Jul 86 10:14:48 PDT
Received: from grape.ads.ARPA by MC.LCS.MIT.EDU 21 Jul 86 12:40:47 EDT
Received: from boethius by Godot.Think.COM via CHAOS; Mon, 21 Jul 86 12:36:35 edt
Date: Mon, 21 Jul 86 12:37 EDT
From: Guy Steele <gls@Think.COM>
Subject: Scheme's DO construct
To: andy@AIDS-UNIX.ARPA, rrrs-authors%mit-mc@AIDS-UNIX.ARPA
Cc: gls@AQUINAS.ARPA
In-Reply-To: <8607132227.AA23925@Zarathustra.Think.COM>
Message-Id: <860721123716.3.GLS@BOETHIUS.THINK.COM>
Well, you have constructed a great case based on anecdotal evidence,
which is worth having, but I think you have not even addressed my main
point. The other constructs you mentioned (FOR, REPEAT, and WHILE) have
what I regard as an important flaw: a reliance on side effects to
accomplish some part of the iterative process. There is seldom any use
in stepping just one variable in an iteration; you want to step two or
more. Because FOR, REPEAT, and WHILE (and for that matter DOLIST and
DOTIMES) each step at most one variable, it is necessary to have some
side effect in the body to get anything done.
DO is the only iteration construct we have (other than LOOP) that
encapsulates completely the notion of iteration: the iterative
transformation of a state (normally a compound state, therefore
consisting of two or more quantities) in such a way that an invariant is
maintained at each step, terminated when the state satisfies some
condition. The problem is not that DO has too many features, but that
each of the other iteration constructs is incomplete in a way that must
be patched up using side effects.
I would be quite happy to eliminate one feature of DO: the body! If the
body is used, then side effects are necessarily involved. The most
perspicuous uses of DO have no body.
The other problem with DO is that sometimes there is more than one
reason to exit. I admit that as a flaw; but then again, sometimes there
is reason to return more than one value from a function, and I believe
SCHEME is not yet addressing that either with explicit features.
(Having a body compensates somewhat for that:
(defun memq (x l)
(do ((z l (cdr z)))
((null z) nil)
(when (eql x (car z)) (return z))))
This leads me to propose that a good iteration construct would be
like DO but instead of having a body would have more COND clauses.)
--Guy
∂21-Jul-86 1057 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA Re: Performance and Evaluation of Scheme Systems...
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 21 Jul 86 10:57:44 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 21 Jul 86 13:55:04 EDT
Received: from ti-csl by csnet-relay.csnet id aa27733; 21 Jul 86 13:37 EDT
Received: by tilde id AA15867; Mon, 21 Jul 86 11:06:17 cdt
Date: Mon 21 Jul 86 10:52:21-CDT
From: David Bartley <Bartley%ti-csl.csnet@CSNET-RELAY.ARPA>
Subject: Re: Performance and Evaluation of Scheme Systems...
To: Mike←Wilson%CARLETON.BITNET%wiscvm.wisc.edu@CSNET-RELAY.ARPA,
scheme%mc.lcs.mit.edu@CSNET-RELAY.ARPA
Cc: Bartley%ti-csl.csnet@CSNET-RELAY.ARPA
In-Reply-To: Message from "Mike Wilson <Mike←Wilson%CARLETON.BITNET%wiscvm.wisc.edu@CSNET-RELAY.ARPA>" of Mon 21 Jul 86 08:04:00-CDT
Message-Id: <12224472379.36.BARTLEY@CSC60>
>Date: 21 Jul 86 08:04:00 EDT
>From: Mike Wilson
>Subject: Performance and Evaluation of Scheme Systems...
>
> I've just been looking through the book ←Performance and Evaluation
>of Lisp Systems← (Richard P. Gabriel, The MIT Press). It's got benchmark
>results for several simple programs run on the more common lisp systems.
>Has anyone run these tests in CScheme/MacScheme/TIScheme? It would be
>interesting to see how we stack up. (I have to admit I am *impressed*
>with their times for the IBM 3081 and CRAY-XMP. Oh well...)
I will be presenting a paper on TI's PC Scheme at the conference on LISP
and Functional Programming in Cambridge the first week of August. Part of
the paper consists of a brief comparison of PC Scheme and other PC-based
LISP implementations on 7 benchmark programs, some of which come from
Gabriel's test suite. After the conference, I'll be glad to forward this
information to anyone interested.
Regards,
David Bartley
-------
∂21-Jul-86 1143 @MC.LCS.MIT.EDU:bc@MEDIA-LAB.MIT.EDU Bobcat scheme
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 21 Jul 86 11:43:10 PDT
Received: from MEDIA-LAB.MIT.EDU by MC.LCS.MIT.EDU 21 Jul 86 14:40:25 EDT
Received: by MEDIA-LAB.MIT.EDU (5.31/4.8) id AA03625; Mon, 21 Jul 86 14:38:21 EDT
Date: Mon, 21 Jul 86 14:38:21 EDT
From: William H Coderre <bc@MEDIA-LAB.MIT.EDU>
Message-Id: <8607211838.AA03625@MEDIA-LAB.MIT.EDU>
To: scheme@mc.lcs.mit.edu
Subject: Bobcat scheme
I did a rather trivial test between CScheme on Bobcat and MacScheme.
I suspect my data, since it appeared that CScheme was GCing a LOT.
Silly Question:
Does anybody know offhand how to tell unix to give Scheme more memory?
We have the "deluxe" bobcats with graphics stuff andapproximately 8
megs of core, and we'd like to use them!
"Tzima Narki"............................................................bc
∂21-Jul-86 1228 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Logic Continuations (Abstract)
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 21 Jul 86 12:27:49 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 21 JUL 86 15:08:31 EDT
Date: Mon, 21 Jul 86 15:06:42 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Logic Continuations (Abstract)
To: Clowney@BLUE.RUTGERS.EDU
cc: cth%indiana.csnet@CSNET-RELAY.ARPA, scheme@MC.LCS.MIT.EDU
In-reply-to: Msg of 21 Jul 86 11:11 EDT (Mon) from Les <Clowney at BLUE.RUTGERS.EDU>
Message-ID: <[AI.AI.MIT.EDU].73379.860721.JAR>
Date: 21 Jul 86 11:11 EDT (Mon)
From: Les <Clowney at BLUE.RUTGERS.EDU>
... Where should I inquire about this report and a general index of
Scheme related reports?
I'm trying to maintain a moderately thorough bibliography. Here's what
it looks like at present (this is the bibliography for the new version
of the scheme report). If anyone has additions to suggest, please send
me mail.
- Jonathan
\begin{thebibliography}{99}
\bibitem{SICP}
Harold Abelson and Gerald Jay Sussman with Julie Sussman.
{\em Structure and Interpretation of Computer Programs.}
MIT Press, Cambridge, 1985.
\bibitem{Bartley86}
David H.~Bartley and John C.~Jensen.
The implementation of PC Scheme.
To appear in {\em Proceedings of the 1986 ACM Conference on Lisp
and Functional Programming}.
\bibitem{Scheme81}
John Batali, Edmund Goodhue, Chris Hanson, Howie Shrobe, Richard
M.~Stallman, and Gerald Jay Sussman.
The Scheme-81 architecture---system and chip.
In {\em Proceedings, Conference on Advanced Research in VLSI},
pages 69--77.
Paul Penfield, Jr., editor.
Artech House, 610 Washington Street, Dedham MA, 1982.
\bibitem{RRRS}
William Clinger, editor.
The revised revised report on Scheme, or an uncommon Lisp.
MIT Artificial Intelligence Memo 848, August 1985.
Also published as Computer Science Department Technical Report 174,
Indiana University, June 1985.
\bibitem{Clinger84}
William Clinger.
The Scheme 311 compiler: An exercise in denotational semantics.
In {\em Conference Record of the 1984 ACM Symposium on Lisp and
Functional Programming}, pages 356--364.
\bibitem{Dybvig86}
R.~Kent Dybvig, Daniel P.~Friedman, and Christopher T.~Haynes.
Expansion-passing style: Beyond conventional macros.
To appear in {\em Proceedings of the 1986 ACM Conference on Lisp and
Functional Programming.}
\bibitem{Eisenberg85}
Michael A.~Eisenberg.
Bochser: an integrated Scheme programming system.
MIT Laboratory for Computer Science Technical Report 349,
October 1985.
\bibitem{Feeley86}
Marc Feeley.
Deux approches \`{a} l'implantation du language Scheme.
M.Sc.~thesis, Department of Computer Science and Operations Research,
University of Montreal, May 1986.
\bibitem{Felleisen86}
Matthias Felleisen, Daniel P.~Friedman, Eugene Kohlbecker, and Bruce Duba.
Reasoning with continuations.
In {\em Proceedings of the Symposium on Logic in Computer Science},
pages 131--141.
IEEE Computer Society Press, Washigton DC, 1986.
\bibitem{Scheme311}
Carol Fessenden, William Clinger, Daniel P.~Friedman, and Christopher Haynes.
Scheme 311 version 4 reference manual.
Indiana University Computer Science Technical Report 137, February 1983.
\bibitem{Scheme84}
D.~Friedman, C.~Haynes, E.~Kohlbecker, and M.~Wand.
Scheme 84 interim reference manual.
Indiana University Computer Science Technical Report 153, January 1985.
\bibitem{Friedman85}
Daniel P.~Friedman and Christopher T.~Haynes.
Constraining control.
In {\em Proceedings of the Twelfth Annual Symposium on Principles of
Programming Languages}, pages 245--254.
ACM, January 1985.
\bibitem{Haynes84}
Christopher T.~Haynes, Daniel P.~Friedman, and Mitchell Wand.
Continuations and coroutines.
In {\em Conference Record of the 1984 ACM Symposium on Lisp and
Functional Programming,} pages 293--298.
\bibitem{Haynes86}
Christopher T.~Haynes.
Logic continuations.
In {\em Proceedings of the Third International Conference on
Logic Programming,\/} pages \todo{x--y}.
Springer-Verlag, July 1986.
% and to appear in {\it The Journal of Logic Programming.}
\bibitem{Engines}
Christopher T.~Haynes and Daniel P.~Friedman.
Engines build process abstracions.
In {\em Conference Record of the 1984 ACM Symposium on Lisp and
Functional Programming,\/} pages 18--24.
\bibitem{Henderson82}
Peter Henderson. Functional Geometry.
In {\em Conference Record of the 1982 ACM Symposium on Lisp and
Functional Programming}, pages 179--187.
\bibitem{Kohlbecker86}
Eugene Edmund Kohlbecker~Jr.
{\em Syntactic Extensions in the Programming Language Lisp.}
PhD thesis, Indiana University, August 1986.
\bibitem{Kranz86}
David Kranz, Richard Kelsey, Jonathan Rees, Paul Hudak, James Philbin,
and Norman Adams.
Orbit: An optimizing compiler for Scheme.
In {\em Proceedings of the SIGPLAN '86 Symposium on Compiler
Construction}, pages 219--233.
ACM, June 1986.
\bibitem{Landin65}
Peter Landin.
A correspondence between Algol 60 and Church's lambda notation: Part I.
{\em Communications of the ACM} 8(2):89--101, February 1965.
\bibitem{McDermott80}
Drew McDermott.
An efficient environment allocation scheme in an interpreter for a
lexically-scoped lisp.
In {\em Conference Record of the 1980 Lisp Conference,} pages
154--162.
The Lisp Conference, P.O.~Box 487, Redwood Estates CA,
August 1980.
\bibitem{MITScheme}
MIT Department of Electrical Engineering and Computer Science.
Scheme manual, seventh edition.
September 1984.
\bibitem{Muchnick80}
Steven S.~Muchnick and Uwe F.~Pleban.
A semantic comparison of Lisp and Scheme.
In {\em Conference Record of the 1980 Lisp Conference}, pages 56--64.
The Lisp Conference, August 1980.
\bibitem{Naur63}
Peter Naur et al.
Revised report on the algorithmic language Algol 60.
{\em Communications of the ACM} 6(1):1--17, January 1963.
\bibitem{Penfield81}
Paul Penfield, Jr.
Principal values and branch cuts in complex APL.
In {\em APL '81 Conference Proceedings,} pages 248--256.
ACM SIGAPL, San Francisco, September 1981.
Proceedings published as {\em APL Quote Quad} 12(1), ACM, September 1981.
\bibitem{Pitman83}
Kent M.~Pitman.
The revised MacLisp manual (saturday evening edition).
MIT Artificial Intelligence Laboratory Technical Report 295, May 1983.
\bibitem{Pitman80}
Kent M.~Pitman.
Special forms in Lisp.
In {\em Conference Record of the 1980 Lisp Conference}, pages 179--187.
The Lisp Conference, August 1980.
\bibitem{Rees82}
Jonathan A.~Rees and Norman I.~Adams IV.
T: A dialect of Lisp or, lambda: The ultimate software tool.
In {\em Conference Record of the 1982 ACM Symposium on Lisp and
Functional Programming}, pages 114--122.
\bibitem{Rees84}
Jonathan A.~Rees, Norman I.~Adams IV, and James R.~Meehan.
The T manual, fourth edition.
Yale University Computer Science Department, January 1984.
\bibitem{Reynolds72}
John Reynolds.
Definitional interpreters for higher order programming languages.
In {\em ACM Conference Proceedings}, pages 717--740.
ACM, \todo{month?}~1972.
\bibitem{Rozas84}
Guillermo J.~Rozas.
Liar, an Algol-like compiler for Scheme.
S.~B.~thesis, MIT Department of Electrical Engineering and Computer
Science, January 1984.
\bibitem{Smith84}
Brian C.~Smith.
Reflection and semantics in a procedural language.
MIT Laboratory for Computer Science Technical Report 272, January 1982.
\bibitem{Stallman80}
Richard M.~Stallman.
Phantom stacks---if you look too hard, they aren't there.
MIT Artificial Intelligence Memo 556, July 1980.
\bibitem{Imperative}
Guy Lewis Steele Jr.~and Gerald Jay Sussman.
Lambda, the ultimate imperative.
MIT Artificial Intelligence Memo 353, March 1976.
\bibitem{Declarative}
Guy Lewis Steele Jr.
Lambda, the ultimate declarative.
MIT Artificial Intelligence Memo 379, November 1976.
\bibitem{Debunking}
Guy Lewis Steele Jr.
Debunking the ``expensive procedure call'' myth, or procedure call
implementations considered harmful, or lambda, the ultimate GOTO.
In {\em ACM Conference Proceedings}, pages 153--162.
ACM, 1977.
\bibitem{Macaroni}
Guy Lewis Steele Jr.
Macaroni is better than spaghetti.
In {\em Proceedings of the Symposium on Artificial Intelligence and
Programming Languages}, pages 60--66.
These proceedings were published as a special joint issue of {\em
SIGPLAN Notices} 12(8) and {\em SIGART Newsletter} 64, August 1977.
\bibitem{Rabbit}
Guy Lewis Steele Jr.
Rabbit: a compiler for Scheme.
MIT Artificial Intelligence Laboratory Technical Report 474, May 1978.
\bibitem{CLoverview}
Guy Lewis Steele Jr.
An overview of Common Lisp.
In {\em Conference Record of the 1982 ACM Symposium on Lisp and
Functional Programming}, pages 98--107.
\bibitem{CLtL}
Guy Lewis Steele, Jr.
{\em Common Lisp: The Language.}
Digital Press, Burlington MA, 1984.
\bibitem{Scheme78}
Guy Lewis Steele, Jr.~and Gerald Jay Sussman.
The revised report on Scheme, a dialect of Lisp.
MIT Artificial Intelligence Memo 452, January 1978.
\bibitem{TAOTI}
Guy Lewis Steele, Jr.~and Gerald Jay Sussman.
The art of the interpreter, or the modularity complex (parts zero, one,
and two).
MIT Artificial Intelligence Memo 453, May 1978.
\bibitem{DOALBP}
Guy Lewis Steele, Jr.~and Gerald Jay Sussman.
Design of a Lisp-based processor.
{\em Communications of the ACM} 23(11):628--645, November 1980.
\bibitem{Dream}
Guy Lewis Steele, Jr.~and Gerald Jay Sussman.
The dream of a lifetime: a lazy variable extent mechanism.
In {\em Conference Record of the 1980 Lisp Conference}, pages 163--172.
The Lisp Conference, August 1980.
\bibitem{Scheme75}
Gerald Jay Sussman and Guy Lewis Steele, Jr.
Scheme: an interpreter for extended lambda calculus.
MIT Artificial Intelligence Memo 349, December 1975.
\bibitem{Scheme79}
Gerald Jay Sussman, Jack Holloway, Guy Lewis Steele, Jr., and Alan Bell.
Scheme-79---Lisp on a chip.
{\em IEEE Computer} 14(7):10--21, July 1981.
\bibitem{Stoy77}
Joseph E.~Stoy.
{\em Denotational Semantics: The Scott-Strachey Approach to
Programming Language Theory.}
MIT Press, Cambridge, 1977.
\bibitem{TI85}
Texas Instruments, Inc.
{\em TI Scheme Language Reference Manual.}
Preliminary version 1.0, November 1985.
\bibitem{Wand78}
Mitchell Wand.
Continuation-based program transformation strategies.
{\em Journal of the ACM} 27(1):174--180, 1978.
\bibitem{Wand80}
Mitchell Wand.
Continuation-based multiprocessing.
In {\em Conference Re\-cord of the 1980 Lisp Conference}, pages 19--28.
The Lisp Conference, August 1980.
\end{thebibliography}
∂21-Jul-86 1325 @MC.LCS.MIT.EDU:gls@Think.COM Re: Scheme's DO construct
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 21 Jul 86 13:22:39 PDT
Received: from Godot.Think.COM by MC.LCS.MIT.EDU 21 Jul 86 16:10:31 EDT
Received: from boethius by Godot.Think.COM via CHAOS; Mon, 21 Jul 86 15:12:23 edt
Date: Mon, 21 Jul 86 15:13 EDT
From: Guy Steele <gls@Think.COM>
Subject: Re: Scheme's DO construct
To: willc%tekchips.tek.csnet@CSNET-RELAY.ARPA, rrrs-authors@MC.LCS.MIT.EDU
Cc: gls@AQUINAS
In-Reply-To: <8607152252.AA19578@tekchips.TEK>
Message-Id: <860721151311.0.GLS@BOETHIUS.THINK.COM>
Date: 15 Jul 86 15:52:52 PDT (Tue)
From: willc%tekchips.tek.csnet@CSNET-RELAY.ARPA
...
It seems to me that if we truly want to discourage people from writing
functional programs, a more effective way to do it would be to change
Scheme so people can't program in the functional style until they master
a set of arbitrarily chosen rules for inserting tokens like #' and FUNCALL
into their programs.
Heh, heh, heh. Well put, Will!
--Guy
∂21-Jul-86 1357 @MC.LCS.MIT.EDU:YEKTA@AI.AI.MIT.EDU Bobcat scheme
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 21 Jul 86 13:56:49 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 21 JUL 86 16:53:21 EDT
Date: Mon, 21 Jul 86 16:37:10 EDT
From: Yekta Gursel <YEKTA@AI.AI.MIT.EDU>
Subject: Bobcat scheme
To: bc@MEDIA-LAB.MIT.EDU
cc: scheme@MC.LCS.MIT.EDU
In-reply-to: Msg of Mon 21 Jul 86 14:38:21 EDT from William H Coderre <bc at MEDIA-LAB.MIT.EDU>
Message-ID: <[AI.AI.MIT.EDU].73422.860721.YEKTA>
Just say "scheme -heap nnn" where "nnn" is the number of kilo-items...
I think the default is 150 and I have run programs with heaps as high as 1200.
(You should have enough swap space for that if you are planning run at that
heap value).
Best, Yekta
∂22-Jul-86 0710 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU title wars
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 22 Jul 86 07:10:16 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 22 JUL 86 10:11:32 EDT
Date: Tue, 22 Jul 86 10:10:29 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: title wars
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <[AI.AI.MIT.EDU].73688.860722.JAR>
The title I chose for the report is under siege. I guess this means we
need to discuss what it should be. I think the complaint is that the
superscript will pose typesetting and pronunciation problems for people
who cite the report. But think of the hundreds of papers with "SL←2(R)"
in their title. Oh well.
The main thing that's important to me is that it be as similar as
possible to "Revised Report on the Algorithmic Language ALGOL 60".
Beyond that I don't much care. Here are other possibilities:
- Dan Friedman has suggested "Revised Report on the Algorithmic Language
SCHEME" but this could be confused much too easily with the "Revised
Report on Scheme".
- "Another Report on the Algorithmic Language SCHEME"
(suggestive of YACC.) I sort of like this one.
- "A Report on the Algorithmic Language SCHEME"
- "Thrice Revised Report on the Algorithmic Language SCHEME"
This raises fomatting problems, since without the "thrice" it's
already as wide as it can be without deviating from the Algol report
layout.
- "Fourth Report on the Algorithmic Language SCHEME"
This has the advantage that it makes the next version easier to name.
"Report #4 on...", "The Next Report on ..." [imitative of "the
next whole earth catalog"], ...
or we could give the language a new name? no.
∂22-Jul-86 0717 @MC.LCS.MIT.EDU:HAL%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU title wars
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 22 Jul 86 07:16:59 PDT
Received: from OZ.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 22 JUL 86 10:17:57 EDT
Date: Tue, 22 Jul 1986 10:16 EDT
Message-ID: <HAL.12224716985.BABYL@MIT-OZ>
From: HAL%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU
To: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Cc: rrrs-authors@MC.LCS.MIT.EDU
Subject: title wars
In-reply-to: Msg of 22 Jul 1986 10:10-EDT from Jonathan A Rees <JAR at AI.AI.MIT.EDU>
i like the title as it is.
∂22-Jul-86 1143 @MC.LCS.MIT.EDU:CPH@AI.AI.MIT.EDU title wars
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 22 Jul 86 11:42:28 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 22 JUL 86 14:09:25 EDT
Date: Tue, 22 Jul 86 14:08:30 EDT
From: Chris Hanson <CPH@AI.AI.MIT.EDU>
Subject: title wars
To: JAR@AI.AI.MIT.EDU
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Tue 22 Jul 86 10:10:29 EDT from Jonathan A Rees <JAR at AI.AI.MIT.EDU>
Message-ID: <[AI.AI.MIT.EDU].73801.860722.CPH>
A minor note: I'd prefer that the word "Scheme" not be upper-cased in
the report. While this is appropriate for an acronym like "ALGOL", it
does not seem to be for "Scheme", which is not an abbreviation for
anything.
I don't really feel strongly about this, I just thought I would point
it out.
BTW, if we *must* change the title, I vote for "Fourth Report...".
∂22-Jul-86 1157 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU title wars
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 22 Jul 86 11:57:24 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 22 JUL 86 14:58:42 EDT
Date: Tue, 22 Jul 86 14:57:41 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: title wars
To: CPH@AI.AI.MIT.EDU
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Tue 22 Jul 86 14:08:30 EDT from Chris Hanson <CPH at AI.AI.MIT.EDU>
Message-ID: <[AI.AI.MIT.EDU].73822.860722.JAR>
Date: Tue, 22 Jul 86 14:08:30 EDT
From: Chris Hanson <CPH at AI.AI.MIT.EDU>
A minor note: I'd prefer that the word "Scheme" not be upper-cased in
the report. While this is appropriate for an acronym like "ALGOL", it
does not seem to be for "Scheme", which is not an abbreviation for
anything.
Rationale:
I agree that "Scheme" generally shouldn't generally be in upper case,
and I think that it's "Scheme" everywhere else in the report. However,
I wanted to capitalize it in the title because this helps make it look
like the Algol 60 report.
∂22-Jul-86 1243 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA Re: title wars
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 22 Jul 86 12:43:15 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 22 Jul 86 15:44:34 EDT
Received: from ti-csl by csnet-relay.csnet id aa08670; 22 Jul 86 15:37 EDT
Received: by tilde id AA23855; Tue, 22 Jul 86 13:40:20 cdt
Date: Tue 22 Jul 86 13:32:20-CDT
From: David Bartley <Bartley%ti-csl.csnet@CSNET-RELAY.ARPA>
Subject: Re: title wars
To: JAR%ai.ai.mit.edu@CSNET-RELAY.ARPA,
rrrs-authors%mc.lcs.mit.edu@CSNET-RELAY.ARPA
Cc: Bartley%ti-csl.csnet@CSNET-RELAY.ARPA
In-Reply-To: <[AI.AI.MIT.EDU].73688.860722.JAR>
Message-Id: <12224763647.36.BARTLEY@CSC60>
I have no real problem with leaving the title the way it is. Another
alternative would be ``1986 Revised Report ...''.
David Bartley
-------
∂22-Jul-86 1252 @MC.LCS.MIT.EDU,@YALE-BULLDOG.ARPA:hudak@YALE.ARPA Re: Performance and Evaluation of Scheme Systems...
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 22 Jul 86 12:52:28 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 22 Jul 86 15:46:50 EDT
Received: from yale-bulldog.arpa by CSNET-RELAY.ARPA id aa08705;
22 Jul 86 15:45 EDT
Received: by Yale-Bulldog.YALE.ARPA; 22 Jul 86 15:13:41 EDT (Tue)
Date: 22 Jul 86 15:13:41 EDT (Tue)
From: Paul Hudak <hudak@YALE.ARPA>
Message-Id: <8607221913.AA06470@Yale-Bulldog.YALE.ARPA>
Subject: Re: Performance and Evaluation of Scheme Systems...
To: Mike Wilson <Mike←Wilson%CARLETON.BITNET@WISCVM.WISC.EDU>
Cc: scheme%mc.lcs.mit.edu@CSNET-RELAY.ARPA
In-Reply-To: Mike Wilson <Mike←Wilson%CARLETON.BITNET@WISCVM.WISC.EDU>, 21 Jul 86 08:04:00 EDT
I've just been looking through the book ←Performance and Evaluation
of Lisp Systems← (Richard P. Gabriel, The MIT Press). It's got benchmark
results for several simple programs run on the more common lisp systems.
Has anyone run these tests in CScheme/MacScheme/TIScheme? It would be
interesting to see how we stack up. (I have to admit I am *impressed*
with their times for the IBM 3081 and CRAY-XMP. Oh well...)
The following is an excerpt from the paper:
Kranz, D., Kelsey, R., Rees, J., Hudak, P., Philbin, J., and Adams, N.
"ORBIT: an optimizing compiler for Scheme" in Proceedings of ACM
SIGPLAN '86 Symposium on Compiler Construction, June 1986, pp. 219-233.
Also to be published as SIGPLAN Notices Vol. 21, No. 7, July 1986.
Orbit vs. Other Lisp Engines:
Orbit 3600 Dorado 8600 780
Program (SUN III) +IFU (Dec CL) (Dec CL)
-------------------------------------------------------
Tak 0.25 0.43 0.52 0.45 1.83
Takl 1.63 4.95 3.62 2.03 7.34
Boyer 15.84 9.40 17.08 12.18 46.79
Browse 40.28 21.43 52.50 38.69 118.51
Destructive 1.24 2.18 3.77 2.10 6.38
Deriv 3.62 3.79 15.70 4.27 13.76
Dderiv 4.92 3.89 17.70 6.58 19.00
IDiv2 0.24 1.51 3.43 1.65 5.00
RDiv2 0.36 2.50 4.08 2.52 9.84
Triangle 84.36 116.99 252.20 99.73 360.85
Fprint 2.18 2.60 2.93 1.08 3.94
Fread 2.62 4.60 1.57 2.34 7.24
Tprint 1.66 4.89 5.55 0.70 2.85
Orbit vs. PSL vs. Franz:
Orbit PSL Franz
Program DN300 DN300 Sun II
-------------------------------------
Tak 1.34 1.62 2.37
Takl 6.21 12.90 12.82
Boyer 63.16 46.92 37.94
Destructive 7.91 10.16 9.57
Dderiv 28.12 28.95 16.95
Orbit vs. Algol-like Languages:
DEC DEC
Program Orbit Unix C DEC C Pascal Modula II
---------------------------------------------------
Perm 1.26 2.6 2.5 2.5 2.0
Tower 1.65 2.6 2.7 2.6 1.9
ORBIT was built (primarily) at Yale, and its availability will be
announced at the upcoming LISP Conference. If you want more details
about ORBIT or the benchmarks, please read the above cited paper.
-Paul
∂22-Jul-86 1529 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA Re: title wars
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 22 Jul 86 15:28:33 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 22 Jul 86 18:11:14 EDT
Received: from ti-csl by csnet-relay.csnet id al09489; 22 Jul 86 17:49 EDT
Received: by tilde id AA28902; Tue, 22 Jul 86 15:46:53 cdt
Date: Tue 22 Jul 86 15:37:57-CDT
From: David Bartley <Bartley%ti-csl.csnet@CSNET-RELAY.ARPA>
Subject: Re: title wars
To: JAR%ai.ai.mit.edu@CSNET-RELAY.ARPA, CPH%ai.ai.mit.edu@CSNET-RELAY.ARPA
Cc: rrrs-authors%mc.lcs.mit.edu@CSNET-RELAY.ARPA,
Bartley%ti-csl.csnet@CSNET-RELAY.ARPA
In-Reply-To: <[AI.AI.MIT.EDU].73822.860722.JAR>
Message-Id: <12224786515.36.BARTLEY@CSC60>
Date: Tue, 22 Jul 86 14:57:41 EDT
From: Jonathan A Rees <JAR%ai.ai.mit.edu@CSNET-RELAY.ARPA>
Date: Tue, 22 Jul 86 14:08:30 EDT
From: Chris Hanson <CPH at AI.AI.MIT.EDU>
A minor note: I'd prefer that the word "Scheme" not be upper-cased in
the report. While this is appropriate for an acronym like "ALGOL", it
does not seem to be for "Scheme", which is not an abbreviation for
anything.
Rationale:
I agree that "Scheme" generally shouldn't generally be in upper case,
and I think that it's "Scheme" everywhere else in the report. However,
I wanted to capitalize it in the title because this helps make it look
like the Algol 60 report.
I agree with Chris -- Scheme is a word, not an acronym. ALGOL is an
acronym and should be written in all caps. If you want it to look EXACTLY
like the Algol 60 report, name the language ALGOL!
David Bartley
-------
∂22-Jul-86 1755 @MC.LCS.MIT.EDU:GJS%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU title
Received: from MC.LCS.MIT.EDU by SU-AI.ARPA with TCP; 22 Jul 86 17:55:00 PDT
Received: from OZ.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 22 JUL 86 20:56:23 EDT
Date: Tue 22 Jul 86 20:41:50-EDT
From: "Gerald Jay Sussman" <GJS%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU>
Subject: title
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <12224830912.34.GJS@OZ.AI.MIT.EDU>
I think that the current title -- R↑4 and all -- is really nice.
-------
∂24-Jul-86 1244 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU call-with-xput-port vs. call-with-xput-file
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 24 Jul 86 12:22:56 PDT
Received: from LIVE-OAK.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 24 JUL 86 15:24:28 EDT
Received: from ROCKY-GRAZIANO.LCS.MIT.EDU by MIT-LIVE-OAK.ARPA via CHAOS with CHAOS-MAIL id 4905; Thu 24-Jul-86 15:13:30-EDT
Date: Thu, 24 Jul 86 15:12 EDT
From: Jonathan A Rees <JAR@MIT-AI.ARPA>
Subject: call-with-xput-port vs. call-with-xput-file
To: rrrs-authors@MIT-MC.ARPA
Message-ID: <860724151248.1.JAR@ROCKY-GRAZIANO.LCS.MIT.EDU>
Date: Mon, 14 Jul 86 11:47:21 est
From: Kent Dybvig <dyb%iuvax.indiana.edu@CSNET-RELAY.ARPA>
To: rrrs-authors%mit-mc.CSNET@CSNET-RELAY.ARPA
Subject: call-with-xput-port vs. call-with-xput-file
I favor changing call-with-input-file and call-with-output-file to
call-with-input-port and call-with-output-port. However, I have some
questions related to the change and to ports in general.
1. I saw lots of confusion over the fact that you open a file (with
open-input-file and open-output-file) but close a port (with close-
input-port and close-output-port). Changing the "call-with" names
could increase the confusion. Should we change open-input-file and
open-output-file to open-input-port and open-output-port?
2. I have added string ports to Chez Scheme and need to choose names.
If we have call-with-...-file and open-...-file, I can introduce the
names call-with-...-string and open-...-string. On the other hand,
if we have call-with-...-port and open-...-port, I can introduce the
names call-with-...-string-port and open-...-string-port. The names
are longer but perhaps more descriptive. How do these names sound?
The point of this question is that any names we choose should
generalize to other types of ports.
I see these two points (together with general conservatism) as arguments
AGAINST changing the names. I am now inclined not to make the change.
5. Why is call-with-input-file essential and open-input-file not?
This resulted from a general spirit of minimalism at the Brandeis
meeting. The first is sufficient while the second isn't. Personally, I
never use the second.
If call-with-input-file is analogous to
call-with-current-continuation, why do we not have
(call-with-new-string <length> <proc>) instead of make-string or
(call-with-pair <obj1> <obj2> <proc>) instead of cons, etc? Because
call-with-current-continuation is special---a function
make-continuation would be problematic. In short, while I see the
merit in with-input-from-file since it closes the file and rebinds a
standard port, I cannot see the merit in call-with-input-file.
The merit is that it makes certain that the port gets closed. If we had to
deallocate resources and locks associated with allocated objects like strings,
then I think it would be a good idea to have call-with things for
those too.
Jonathan.
∂25-Jul-86 0022 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA Re: July 15 draft sent
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 25 Jul 86 00:22:18 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 25 Jul 86 03:24:07 EDT
Received: from ti-csl by csnet-relay.csnet id ab19183; 25 Jul 86 3:23 EDT
Received: by tilde id AA27498; Fri, 25 Jul 86 00:40:16 cdt
Date: Fri 25 Jul 86 00:35:05-CDT
From: David Bartley <Bartley%ti-csl.csnet@CSNET-RELAY.ARPA>
Subject: Re: July 15 draft sent
To: JAR%ai.ai.mit.edu@CSNET-RELAY.ARPA,
rrrs-authors%mc.lcs.mit.edu@CSNET-RELAY.ARPA
Cc: Bartley%ti-csl.csnet@CSNET-RELAY.ARPA
In-Reply-To: <[AI.AI.MIT.EDU].71397.860716.JAR>
Message-Id: <12225408585.58.BARTLEY@CSC60>
I probably won't start another pass over it until a week from tomorrow
(i.e. the 17th), so don't feel guilty if you don't send your remarks to
me before that. After the 20th is when you can start feeling guilty.
I received my copy of the new revision to the R↑3RS yesterday (July 23)
and enclose my detailed comments below (boy, do I feel guilty!). I am
quite impressed overall with the current state of the document and want to
commend Jonathan for the success of his efforts! Nearly all of my
objections to the previous draft have been resolved satisfactorily. I
will repeat below some that have not, but in general I am content to leave
their resolution in JAR's hands.
[page 1]
I prefer to change "SCHEME" in the title to "Scheme", since it is not an
acronym.
[page 3]
I prefer to change "Snobol" to "SNOBOL", since it IS an acronym.
[page 4]
[line 4, left col] Change "if the feature is not AS essential feature"
to "if the feature is not AN essential feature".
[line 21, left col] Change "for a call to the procedures" (plural) to
"for a call to the procedure" (singular).
[line 29, left col] Change "indicates that THE in" to "indicates that, in".
[first bullet under 2.1] Remove the comma after "Certain identifiers".
[page 5]
[first paragraph of 2.2] Whitespace may also occur in the space
character (denoted by "#\ ").
[near the end of 2.3] You say that #T and #F are boolean CONSTANTs and
that #\ introduces a character CONSTANT; shouldn't you say that #(
introduces a vector CONSTANT also?
[last 2 lines of 2.3] If my proposed number syntax is adopted, #S and #L
will not exist.
[last 2 lines, right col] Flush the "Note: ..."; I assume it is a note
to yourself (?).
[page 6]
[section 3.2] Change "#fand" to "#f and".
[paragraph 6, sec 3.2] Change "Note that THAT the" to "Note that the".
[page 7]
[last paragraph of sec. 4.1.3] Change "Note also that in many
dialects..." to "{\em Note:} In many dialects...".
[page 8]
[line 6, right col] Shouldn't the notation (<test> => <recipient>) be
listed as a non-essential syntax in the heading rather than buried as an
implementation note in the body of the text?
[last paragraph, right col] I was very happy with your use of {\em
Syntax:} and {\em Semantics:} headers but they disappeared from AND
onward. I guess you ran out of time...
[page 9]
[first paragragh, sec 4.2.2] There is a mysterious whitespace at the
beginning of the fourth line of the paragragh.
[description of LET*] Shouldn't you replicate the description of
<bindings> and <body>? You do for LETREC.
Try to avoid the "widow" line for the heading of LET*.
[last line, right col] Here, and elsewhere, you have incomplete sentences
in which the subject is missing. This doesn't particularly offend me, and
it seems to read well, so I see no reason to correct it right away...
[page 10]
[end of 4.2.4] The indenting for the "(LET LOOP ((NUMBERS ..." example
has gone awry.
[page 12]
[end of 6.1] I'd like to see the example (EQ? NIL 'NIL) ==> #F added.
This reinforces the wording in the last paragraph of the left column,
which might be missed by someone looking only at the definition of NIL.
[page 14]
[last paragraph of the description of EQ?] Omit the words "instead of as
a subroutine call". It seems to imply that anything other than a pointer
comparison must be performed out of line, or that a pointer comparison
would necessarily be performed in line.
[page 17]
[lines 10, 11 of left col] Omit the sentence: "It is questionable
whether these features [slashification and uninterned symbols] are worth
their complexity, so they are not standard in Scheme." This editorial
comment is unnecessary and invites the response: "Then why is
SYMBOL->STRING worth while?"
[page 22]
[sec 6.6] Clarify the sentence: "This rule resolves the ambiguous case
... the space character AS AS the ...".
[page 30]
[sec 7.1.2, syntax of numbers] I mailed out a proposal for a syntax of
numbers compatible with Common Lisp last week but haven't received any
feedback. Did it fail to make it to the mailing list or is it that
non-controversial?
[page 36]
Try to avoid the "widow" line for the subtitle "EXAMPLE".
[Index]
Add #T and #F, and possibly #!TRUE and #!FALSE (page 12), to the index.
Regards,
David Bartley
-------
∂25-Jul-86 1026 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA Re: number syntax
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 25 Jul 86 10:17:32 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 25 Jul 86 13:19:12 EDT
Received: from tektronix by csnet-relay.csnet id ab23107; 25 Jul 86 12:51 EDT
Received: by tektronix.TEK (5.31/6.16)
id AA08596; Wed, 23 Jul 86 11:48:49 PDT
Received: by tekchips.TEK (5.31/6.16)
id AA29292; Wed, 23 Jul 86 11:51:24 PDT
Message-Id: <8607231851.AA29292@tekchips.TEK>
To: Bartley%TI-CSL.CSNET@CSNET-RELAY.ARPA
Cc: JAR@AI.AI.MIT.EDU, rrrs-authors@MC.LCS.MIT.EDU
Subject: Re: number syntax
In-Reply-To: Your message of Wed 16 Jul 86 10:53:32-CDT.
<12223161873.35.BARTLEY@CSC60>
Date: 23 Jul 86 11:51:22 PDT (Wed)
From: willc%tekchips.tek.csnet@CSNET-RELAY.ARPA
After studying the recent proposal by David Bartley and Mark Meyer, I'm
afraid I have to object to using it in the report. I probably just don't
understand it, and I might change my mind if they'll explain it to me
better. I don't have much problem with the syntactic changes they propose.
The main problem I have with their proposal is that it addresses the syntax,
which I don't much care about, but doesn't address the semantic properties
like exactness and integer-ness. I have repeated most of their proposal
(indented two spaces) in order to point out the parts I object to.
(4) CL provides only the #C(real real) notation for complex numbers; R↑3RS
provides infix notations for both polar and rectangular forms. For
compatibility with CL, R↑3RS should support the #C notation and the infix
forms should be non-essential extensions.
Shouldn't the #C syntax be inessential also, since integer-only
implementations are allowed? Shouldn't all productions with decimal
points or slashes be inessential as well?
(5) CL integers may optionally terminate in a decimal point; R↑3RS permits
such a number to be treated as floating point and it is debated whether it
is to be considered exact. This is a serious problem, since many
procedures are defined to accept only integer values. Is the call
(INTEGER->CHAR 55.) valid? We propose that this be a non-essential
feature in R↑3RS.
It seems to me that most procedures that are currently defined to accept
only integer values should have been defined to accept only exact integer
values. Our concept of an integer needs to be tightened up. I propose
that INTEGER? be defined to be compatible with
(define integer?
(lambda (x)
(and (real? x) (= x (truncate x)))))
With a definition such as this it seems likely that 55. will be an integer.
The real question is whether it is exact. I haven't been able to answer
that question on the basis of the proposal.
We propose the following syntax for numbers in Scheme. (Recall that
letter case is insignificant in the grammar and that the rules for <ureal
R>, <prefix R>, etc., should be replicated for R = 2, 8, 10, and 16.)
<number> --> <real> | #c( <real> <real> )
<real> --> <prefix R> <sign> <ureal R>
<prefix R> --> <exactness> <radix R>
<exactness> --> <empty> | #i | #e
<radix 2> --> #b
<radix 8> --> #o
<radix 10> --> <empty> | #d
<radix 16> --> #x
<sign> --> <empty> | + | -
<ureal R> --> <integer R> | <ratio R> | <flonum R>
<integer R> --> <digit R>+ #*
<ratio R> --> <digit R>+ #* / <digit R>+ #*
<flonum R> --> . <digit R>+ #* <expon>
| <digit R>+ . <digit R>* #* <expon>
| <digit R>+ #* . #* <expon>
<expon> --> <empty> | <expon-marker> <sign> <digit>+
I believe the <digit>+ in the above production was intended to be
<digit 10>+.
<expon-marker> --> e | f | d | l | s
<digit 2> --> 0 | 1
<digit 8> --> 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7
<digit 10> --> <digit 8> | 8 | 9
<digit 16> --> <digit 10> | a | b | c | d | e | f
Although we have incorporated <exactness> and the use of `#' above, they
should be stated to be non-essential features of Scheme.
Nonessential feature: integers with optional decimal points.
<integer R> --> <digit R>+ #* .
This production is redundant, since all the strings it generates are
generated by the third production for <flonum R>. I judge by this
and other redundancies that the name of the non-terminal is intended
to carry semantic freight, but I can't tell what semantics is intended.
This is my fundamental objection to the proposal: it is a syntax
without a semantics.
Nonessential feature: integers and ratios with exponents.
<integer R> --> <digit R>+ #* <expon>
<ratio R> --> <digit R>+ #* <expon> / <digit R>+ #* <expon>
Similarly the production above for <integer R> is redundant, since it is
exactly the same as the first production for <flonum R>.
Nonessential number productions representing complex numbers. We worry
that the forms <real>+<ureal>i and <real>-<ureal>i can be hard to parse.
Perhaps combining the suffix `i' with the infix `+' or `-' would be
palatable to those who want this feature.
<number> --> <real> +i <ureal>
| <real> -i <ureal>
| <real> @ <real>
I'm not sure that this syntax is any easier to parse than the old syntax,
but it isn't any worse.
Regards,
David Bartley
Mark Meyer
-------
Peace, Will Clinger
∂25-Jul-86 1127 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU (eqv? #e1 #i1)
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 25 Jul 86 11:25:02 PDT
Received: from LIVE-OAK.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 25 JUL 86 14:26:41 EDT
Received: from ROCKY-GRAZIANO.LCS.MIT.EDU by MIT-LIVE-OAK.ARPA via CHAOS with CHAOS-MAIL id 5047; Fri 25-Jul-86 14:24:41-EDT
Date: Fri, 25 Jul 86 14:25 EDT
From: Jonathan A Rees <JAR@MIT-AI.ARPA>
Subject: (eqv? #e1 #i1)
To: rrrs-authors@MIT-MC.ARPA
Message-ID: <860725142516.4.JAR@ROCKY-GRAZIANO.LCS.MIT.EDU>
Date: 22 Jul 86 11:31:02 PDT (Tue)
From: willc%tekchips.tek.csnet at CSNET-RELAY.ARPA
Technical question relating to exactness: Are 1 and 1.0 operationally
equivalent? (That is, if we wind up adopting the proposal that 1 be
read as an exact integer while 1.0 is read as an inexact integer, then
(EQV? 1 1.0) must be false. This is incompatible with the RRRS, which
says that EQV? returns true when its arguments are numbers that are
equal according to the = procedure. This incompatibility is not listed
in the notes on page 35. I wonder if the incompatibility was recognized
and intended.)
I assumed that this detail was an unintentional omission from RRRS.
Clearly #e1 and #i1 are distinguishable. I'll list this in the notes
section.
- Jonathan
∂25-Jul-86 1346 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA July 15th draft
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 25 Jul 86 13:46:05 PDT
Received: from mitre-bedford.ARPA by MC.LCS.MIT.EDU 25 Jul 86 15:47:55 EDT
Organization: The MITRE Corp., Bedford, MA
Received: from clyde.sun.uucp by linus.MENET (1.1/4.7)
id AA09549; Fri, 25 Jul 86 15:45:49 EDT
Posted-Date: Fri, 25 Jul 86 15:42:54 edt
Received: by clyde.sun.uucp (2.0/SMI-3.0DEV3)
id AA01028; Fri, 25 Jul 86 15:42:54 edt
Date: Fri, 25 Jul 86 15:42:54 edt
From: ramsdell%linus@mitre-bedford.ARPA
Message-Id: <8607251942.AA01028@clyde.sun.uucp>
To: rrrs-authors%mc.lcs.mit.edu@mitre-bedford.ARPA
Subject: July 15th draft
On title wars, I am reminded of Norman's comments:
Scheme is fun and happy, and a bit quirky -- or are CDR and CAR and so many
relatives the ideal names for those procedures? Scheme is as serious as
LAMBDA, but as casual as CAR. Alas, what has become of dear PROGN? The
names are arbitrary and incidental; CAR and CDR remind us. Scheme is as
much an approach as a detailed concrete specification. But to be taken
seriously, for Scheme to be widely used, we must have the details and
concretions; they are essential but unimportant.
While publishers will most likely want to put out contracts on the
typing fingers of those who perpetrated the weird title, I think we
should have a little fun and keep the superscript in the title.
However, I do like the idea of NOT using all caps for Scheme in the
title.
David Bartley suggests changing "Snobol" into "SNOBOL" because it is
an acronym. If we do that, shouldn't we change "Algol" into "ALGOL"
and "Lisp" into "LISP"?
1) [Page 2, col 1, line 3] I am worried about the phrase "with
absolutely no restrictions on how they are composed". Certainly, the
expressions "1" and "2" should not be composed as "(1 2)". Doesn't
Scheme show that a small number of rules for forming expression
combined with a simple, uniform method of combining the expressions,
suffices to form a practical and efficient programming language?
2) [Page 5, col 1, paragraph 2] Too many parentheses. Only the first
pair are needed. Use commas for the others.
3) [Page 3, col 1, paragraph 3] Too many parentheses.
4) [Page 6, col 1, paragraph 1] From my reading of the paragraph, I
conclude that Common Lisp has no dynamic variables. After all, it
says that "To each place where a variable is bound in a program there
corresponds a region of the program text within which the binding is
effective." The lack of dynamic variables distinguishes Scheme from
Common Lisp and makes the above statement true.
5) [Page 10, col 1, line -16] Odd space between the words "region" and
"of".
6) [Page 10, col 2, line 1] Change to "general looping construct than
do, and may also be used to express recursive procedures."
7) [Page 14, col 1, line 22] The previous page states that there is
only one empty string. Therefore, (eqv? "" "") => #t, which implies
that (eq? "" "") => #t. If I am wrong, what does the statement about
the existence of one empty string mean?
8) [Page 27, col 2] I will simply say that, in my opinion,
call-with-xxput-port gives a user a better idea of what is going on,
as compared to call-with-xxput-file. In the interest of harmony, I
will rest my case unless I hear support from others.
John
∂26-Jul-86 2137 @MC.LCS.MIT.EDU:cth%iuvax.indiana.edu@CSNET-RELAY.ARPA corrections and suggestions
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 26 Jul 86 21:37:14 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 27 Jul 86 00:39:23 EDT
Received: from indiana by csnet-relay.csnet id ac11703; 27 Jul 86 0:39 EDT
Date: Thu, 24 Jul 86 17:21:19 est
From: Chris Haynes <cth%iuvax.indiana.edu@CSNET-RELAY.ARPA>
To: rrrs-authors%mit-mc.CSNET@CSNET-RELAY.ARPA
Subject: corrections and suggestions
I prefer "A Report ..." or "Fourth Report ...". In any case, remove
the bit about the ↑3 not being a footnote. No one is apt to mistake
the title's ↑3, for it is big and bold. It is *references* to the title
in other publications where the ↑3 will cause confusion, and the note
in the report won't do any good then.
I prefer "C.T. Haynes" in the author list, and "Christopher Haynes" in the
Background (p. 2).
In the summary, delete "and very few different ways to form expressions",
which is unnecessary and questionable.
p. 2: make those features --> make additional features
first real programming language -->
first widely used programming language
sub-dialects --> dialects
, while many others remain to be adopted. --> .
With Kent Dybvig, I would prefer that : not be an extended
alphabetic character, but be reserved for special uses.
2.3. unspecified future uses --> possible extensions in
discussion of [ ] and { }.
3.1. may name --> names
Question: Why say "A variable that does so is said to be bound to the
location." Is it possible to have variables that aren't bound to
locations? If so, how? The reader should not be kept in the dark.
Delete "Note: internale definitions not mentioned here."
3.2. #fand --> #f and
4.1 and 4.2. The "Syntax:" and "Semantics:" paragraph flags are
nice, but are not used after "case" (p. 8). I suggest flushing them.
Better to be consistent, and they aren't necessary for understanding.
4.2.4. Some implementations of Scheme permit a ... --> This ...
pretty printing of (let loop ...) is messed up.
5.1. consists a sequence --> consists of a sequence
6.2. if applying a mutation procedure to one causes the other to
change as well.
-->
if they have operationally equivalent values in corresponding
positions and applying a mutation procedure to one causes the
other to change as well.
For example, two pairs are equivalent if a set-car! operation on
one changes the car field of the other.
-->
For example, two pairs are not equivalent if a set-car!
operation on one does not change the car field of the other.
Questions: is "side-effect" defined anywhere? (A referee
recently critisized me for not defining it.)
6.4. (in the sense of eqv?) --> (in the sense of eq?)
[[the reader should be encouraged to think eq? on symbols]]
6.9, p. 27. is an ordinary Scheme procedure --> is a Scheme procedure
The classic use --> A common use
flush "when programmers need to do something fancy,"
I don't like the last sentence of 6.9. Opinions also differ on the
merits of SEQUENCE, but we didn't apologize for it or give SEQUENCE
less than optional status by not listing it under BEGIN as an
(optional) form. List CALL/CC as a procedure under
CALL-WITH-CURRENT-CONTINUATION and replace the last sentence with a
statement that CALL/CC is equivalent. Several of us feel rather
strongly about this.
6.10.1. I also prefer CALL-WITH-*-PORT and OPEN-*-PORT.
Replace the last sentence of the WITH-*-*-FILE paragraph with
"Furthermore, when these procedures return, they close the
default port and restore the previous default. If an escape procedure
is used to escape from the continuation of these procedures, their
behavior is implementation dependent."
[[Rational: the existing "in constrast" statement is incorrect.
Where is the contrast? And more important, some systems will
automatically change the default port if the continuation is escaped,
but we probably don't want to even mention, let alone require, such
behavior.]]
6.10.4. Delete the LOAD rational. The LOAD description expressly
says that expressions and definitions are read, so any uses of LOAD to
load such things as compiled files are implementation extensions anyway.
Delete the TRANSCRIPT-* Note. We haven't provided elementary tips
to implementers anywhere else.
BIBLIOGRAPHY: add the following
Daniel P. Friedman, Christopher T. Haynes, and Eugene Kohlbecker,
Programming with continuations. {\it In Programming Transformation and
Programming Environments,\/} P. Pepper (Ed.), pages 263--274,
Springer-Verlag, 1984.
The Report reads quite well now, and has come a long way in the last
few months. Thanks for all your efforts, Jonathan.
Chris Haynes
∂28-Jul-86 0810 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA Fault logic in eq? comment
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 28 Jul 86 08:10:43 PDT
Received: from mitre-bedford.ARPA by MC.LCS.MIT.EDU 28 Jul 86 11:10:39 EDT
Organization: The MITRE Corp., Bedford, MA
Received: from jymme.sun.uucp by linus.MENET (1.1/4.7)
id AA27194; Mon, 28 Jul 86 11:08:54 EDT
Posted-Date: Mon, 28 Jul 86 11:06:06 edt
Received: by jymme.sun.uucp (2.0/SMI-3.0DEV3)
id AA02270; Mon, 28 Jul 86 11:06:06 edt
Date: Mon, 28 Jul 86 11:06:06 edt
From: ramsdell%linus@mitre-bedford.ARPA
Message-Id: <8607281506.AA02270@jymme.sun.uucp>
To: rrrs-authors%mc.lcs.mit.edu@mitre-bedford.ARPA
Subject: Fault logic in eq? comment
Opps! I used faulty logic in:
7) [Page 14, col 1, line 22] The previous page states that there is
only one empty string. Therefore, (eqv? "" "") => #t, which implies
that (eq? "" "") => #t. If I am wrong, what does the statement about
the existence of one empty string mean?
Please ignore it!
[Page 27, col 2] I think there is support for changing
call-with-xxput-file to call-with-xxput-port. I am not convinced that
open-xxput-port is any better than open-xxput-file, the latter
expresses what the function does just as well as the former does.
[Page 2] While the introduction implies Scheme has no dynamic
variables and no separate name spaces for global values and functions,
maybe that difference with existing Lisps should be made more
explicit. Thus, after "... in the same way as an operand position."
one might add "In contrast, many other dialects of Lisp associate two
values with some variables, and the bindings in effect at run time may
depend on the run time history of a program --- not simply the static
program structure."
John
∂28-Jul-86 1616 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA Re: corrections and suggestions
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 28 Jul 86 16:05:28 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 28 Jul 86 18:47:41 EDT
Received: from tektronix by csnet-relay.csnet id ai01735; 28 Jul 86 18:43 EDT
Received: by tektronix.TEK (5.31/6.16)
id AA07871; Mon, 28 Jul 86 09:51:20 PDT
Received: by tekchips.TEK (5.31/6.16)
id AA02924; Mon, 28 Jul 86 09:54:03 PDT
Message-Id: <8607281654.AA02924@tekchips.TEK>
To: cth%indiana.csnet@CSNET-RELAY.ARPA
Cc: rrrs-authors@MC.LCS.MIT.EDU
Subject: Re: corrections and suggestions
In-Reply-To: Your message of Thu, 24 Jul 86 17:21:19 est.
<8607270553.AA19279@tekchips.TEK>
Date: 28 Jul 86 09:54:02 PDT (Mon)
From: willc%tekchips.tek.csnet@CSNET-RELAY.ARPA
3.1. may name --> names
Question: Why say "A variable that does so is said to be bound to the
location." Is it possible to have variables that aren't bound to
locations? If so, how? The reader should not be kept in the dark.
There exist identifiers that are not syntactic keywords. According to the
first sentence of 3.1, any such identifier may be used as a variable. The
catch comes in an implementation with unbound variables, such as PC Scheme,
where just using an identifier as a variable does not make it name a
location; that must be done with a binding construct. I see your point,
but I suspect that many readers would prefer to remain in the dark about
this sort of thing until the next paragraph.
A related issue is that (top level) DEFINE is missing from the list of
binding constructs in the next paragraph.
I don't like the last sentence of 6.9. Opinions also differ on the
merits of SEQUENCE, but we didn't apologize for it or give SEQUENCE
less than optional status by not listing it under BEGIN as an
(optional) form. List CALL/CC as a procedure under
CALL-WITH-CURRENT-CONTINUATION and replace the last sentence with a
statement that CALL/CC is equivalent. Several of us feel rather
strongly about this.
Whoa! Two wrongs don't make a right. Let's try to get rid of SEQUENCE
instead. Several of us feel rather strongly that CALL/CC ought to call
the C compiler. Seriously, to add alternative names for procedures now
would be inconsistent with our success in getting rid of =? et cetera.
Replace the last sentence of the WITH-*-*-FILE paragraph with
"Furthermore, when these procedures return, they close the
default port and restore the previous default. If an escape procedure
is used to escape from the continuation of these procedures, their
behavior is implementation dependent."
[[Rational: the existing "in constrast" statement is incorrect.
Where is the contrast? And more important, some systems will
automatically change the default port if the continuation is escaped,
but we probably don't want to even mention, let alone require, such
behavior.]]
The contrast is that WITH-*-*-FILE will close the default port whenever
you throw out of it without having done a CALL-WITH-CURRENT-CONTINUATION,
even if you stored the value of (CURRENT-*-PORT) in a global variable
before you did the throw. CALL-WITH-*-FILE would never do a thing like
that. To me, this is a striking contrast.
Peace, Will
∂29-Jul-86 1331 @MC.LCS.MIT.EDU:dyb@iuvax.indiana.edu critical problems with call---file, with---file
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 29 Jul 86 13:01:13 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 29 Jul 86 15:58:06 EDT
Received: from indiana by csnet-relay.csnet id ab02982; 29 Jul 86 9:57 EDT
Date: Tue, 29 Jul 86 02:10:41 est
From: "R. Kent Dybvig" <dyb@iuvax.indiana.edu>
To: rrrs-authors%mit-mc.CSNET@CSNET-RELAY.ARPA
Subject: critical problems with call---file, with---file
Cc: bartley%ti-csl.CSNET@CSNET-RELAY.ARPA, jar%mit-mc.CSNET@CSNET-RELAY.ARPA,
willc%tekchips@iuvax.indiana.edu
Regarding these quotes from the latest revision:
(under call-with-input-file, call-with-output-file)
If the procedure returns, then the port is closed
automatically and the value yielded by the procedure is
returned. If the procedure does not return, then Scheme
will not close the port unless it can prove that the
port will never again be used for a read or write operation.
(under with-input-from-file, with-output-to-file)
Furthermore, in contrast to call-with-input-file and
call-with-output-file, these procedures will arrange to
close the default port and restore the previous default
whenever the system can prove that the call to the
thunk will never return.
I have two problems with the wording of these two quotes. One of
these probems can be ignored, and we'll only have an ill-specified
and confusing set of procedures. The other cannot be ignored.
First, the one that cannot be ignored: From the wording of the
second quote, it is technically possible (and perhaps required!)
for a Scheme system to close a port out from under a procedure in
a way we do not intend. For example, if I write:
(with-input-from-file "foo.in"
(letrec ((loop (lambda ()
(write-char (read-char))
(loop))))
loop)),
it is clear that a clever Scheme system can prove that the thunk
will never return; however, it would be entirely inappropriate to
close the new default port and restore the old.
The second problem takes a little more explaining: I think that
most users will be very confused and rather upset that
call-with-input-file does not close the port automatically in the
case of a non-local exit, either programmed or through some sort
of error. Also, in the case of with---file, it is not clear
whether an implementation is required to close the port as soon as
it can prove that the call will never return, or sometime thereafter.
Furthermore, it is not clear how sophisticated the system must be
in proving this fact.
In the most recent version of Chez Scheme, ports are closed by the
storage manager once it determines there is no possibility of
reference. This will not necessarily occur as soon as the port
becomes inaccessible, but it is guaranteed that the system will not
run out of ports if there are any open, inaccessible ports around.
In addition, all ports are closed on exit from the system. This
is a much more general and reasonable solution to the problem of
closing ports than forcing the programmer to use confusing,
ill-defined procedures that don't necessarily help in the case
of non-local exits or errors.
It is fine to say that the port is closed when the procedure or thunk
returns, but we should flush the descriptions of what happens when
the procedure or thunk does not return, perhaps mentioning that, in
order to avoid running out of file-system resources, implementations
usually close ports it can prove are inaccessible. This would be
in the spirit of the earlier statement about not (usually!) running
out of storage (section 1.1, paragraph 4), and would also reinforce
the first-class status of ports.
Kent
p.s. We don't have much time, so please respond quickly.
∂29-Jul-86 1423 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU schedule
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 29 Jul 86 13:52:36 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 29 JUL 86 16:52:21 EDT
Date: Tue, 29 Jul 86 16:35:08 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: schedule
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <[AI.AI.MIT.EDU].77171.860729.JAR>
A version of the report is now at the printer. There will be a copy
in every Lisp conference registration packet.
As for SIGPLAN, I seem to have screwed up pretty badly; I thought that
having it done by early August would be good, since it would then get
into the October issue. However, I just found out from Wexelblat that
the October issue is proceedings for some conference. (This decision
was made rather late; the previous time I spoke with him, the October
issue was still open.) Therefore the earliest it can be out is the
November issue, and our new deadline is September 12.
For the Lisp conference version, I didn't do anything about number
syntax, since there seemed to be a bit of controversy remaining; also I
did nothing about the question of number input exactness, and didn't
rename the call-with-transput-pile procedures. What got printed was
rather close to the July 15 draft, incorporating, of course, most of the
corrections people sent me. Maybe we can fix these and other problems
by September, though.
Thanks to everyone who read the July 15 and other drafts so carefully.
If you won't be at the Lisp conference, let me know and I'll mail you a
copy of the latest thing.
Jonathan
∂29-Jul-86 1814 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA Re: critical problems with call---file, with---file
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 29 Jul 86 18:13:50 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 29 Jul 86 20:14:24 EDT
Received: from tektronix by csnet-relay.csnet id am07403; 29 Jul 86 18:48 EDT
Received: by tektronix.TEK (5.31/6.16)
id AA06974; Tue, 29 Jul 86 15:23:57 PDT
Received: by tekchips.TEK (5.31/6.16)
id AA22297; Tue, 29 Jul 86 15:26:48 PDT
Message-Id: <8607292226.AA22297@tekchips.TEK>
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: Re: critical problems with call---file, with---file
Date: 29 Jul 86 15:26:46 PDT (Tue)
From: willc%tekchips.tek.csnet@CSNET-RELAY.ARPA
...For example, if I write:
(with-input-from-file "foo.in"
(letrec ((loop (lambda ()
(write-char (read-char))
(loop))))
loop)),
it is clear that a clever Scheme system can prove that the thunk
will never return; however, it would be entirely inappropriate to
close the new default port and restore the old.
Nice example. Should we say instead that "If the procedure does not
return, Scheme will not close the port unless it can prove that the
continuation with which the procedure was called has become
inaccessible"?
I can't get very excited if ports aren't closed the instant they become
inaccessible, because I suspect that pairs aren't added to the free list
the instant they become inaccessible either. I can't see how it affects
my life.
As I read the report, implementations are not required to try to close
ports in the exceptional cases. Likewise, though implementations are
"permitted to reclaim the storage occupied by an object if they can
prove that the object cannot possibly matter to any future computation",
I don't see where implementations are actually required to reclaim
storage. I think it's clear that implementations are encouraged to do
both, and it's great that Chez Scheme is setting such a good example for
us to follow.
It would be reasonable to say that "in order to avoid running out of
file-system resources, implementations usually close ports it can
prove are inaccessible" if it were true. Is it?
Implementation note: In a very large multiprocessing implementation of
Scheme it might be more practical to remove limits on file-system
resources than to determine whether ports are accessible.
----------------------------------------------------------------
The section that describes differences between RRRS and R3RS should
note that (DEFINE (FOO ...) ...) is now equivalent to
(DEFINE FOO (LAMBDA (...) ...)) instead of to
(DEFINE FOO (REC FOO (LAMBDA (...) ...))).
Peace, Will
∂31-Jul-86 0732 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU rrrs authors meeting, lunch Tuesday
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 31 Jul 86 07:32:27 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 31 JUL 86 09:54:34 EDT
Date: Thu, 31 Jul 86 09:52:31 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: rrrs authors meeting, lunch Tuesday
To: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Wed 30 Jul 86 17:01:20 PDT from Norman Adams <adams%tekchips.tek.csnet at CSNET-RELAY.ARPA>
Message-ID: <[AI.AI.MIT.EDU].77967.860731.JAR>
Date: Wed, 30 Jul 86 17:01:20 PDT
From: Norman Adams <adams%tekchips.tek.csnet at CSNET-RELAY.ARPA>
To: jar at AI.AI.MIT.EDU
It occurred to me that the bulk of the RRRS authoripods will be at
the lisp conference and that a meeting might bring quick resolution
to issues outstanding for the SIGPLAN edition of the R3RS. A
meeting might be fun even if there is nothing to resolve... What
say you? Perhaps there is not enough time to get a note out on
RRRS; maybe we could post something at the registration desk.
Good idea. What with Monday night being the banquet, and Tuesday night
being various Eulisp and Common Lisp meetings, I think lunchtime would
be best. Therefore I propose lunch on Tuesday, promptly following
cessation of the morning sessions.
If there's a major problem with this time then we can change it to lunch
Wednesday or some other time. I'll post something near the registration
desk in any case. See y'all there.
Jonathan
∂31-Jul-86 1111 @MC.LCS.MIT.EDU:fateman@DALI.BERKELEY.EDU Re: Performance and Evaluation of Scheme Systems...
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 31 Jul 86 11:11:19 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 31 Jul 86 14:04:02 EDT
Received: from dali.berkeley.edu by CSNET-RELAY.ARPA id aa27481;
31 Jul 86 12:45 EDT
Received: by dali.Berkeley.EDU (5.53/1.14)
id AA17087; Thu, 31 Jul 86 08:49:56 PDT
Date: Thu, 31 Jul 86 08:49:56 PDT
From: Richard Fateman <fateman@DALI.BERKELEY.EDU>
Message-Id: <8607311549.AA17087@dali.Berkeley.EDU>
To: Mike←Wilson%CARLETON.BITNET@WISCVM.WISC.EDU,
scheme%mc.lcs.mit.edu@CSNET-RELAY.ARPA
Subject: Re: Performance and Evaluation of Scheme Systems...
since the programs used for timing were allowed to be different from
the ones in RPG's book, (e.g. declarations) and at least some of the
programs are unrunnnable as given, the benchmark timings are somewhat
less useful than you might think. If YOU run them benchmarks on various
machines/lisps, you may get much different numbers.
∂04-Aug-86 0107 @MC.LCS.MIT.EDU:facility%cantuar.waterloo.edu@CSNET-RELAY.ARPA
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 4 Aug 86 01:07:30 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 4 Aug 86 03:41:37 EDT
Received: from waterloo by csnet-relay.csnet id ac03100; 4 Aug 86 3:32 EDT
Received: from cantuar.uucp by watmath; Mon, 4 Aug 86 03:02:42 edt
Date: Mon, 4 Aug 86 18:50:44+1200
From: Facilities Committee <facility%cantuar.waterloo.edu@CSNET-RELAY.ARPA>
To: SCHEME <@CSNET-RELAY.ARPA,@watmath.waterloo.edu:SCHEME@MC.LCS.MIT.EDU>
Date: Thu, 31 Jul 86 10:44:24+1200
From: wolfgang@cantuar.Waterloo.edu (W. Kreutzer)
To: SCHEME@MIT-MC.csnet@watmath.Waterloo.edu
Subject: Chez Scheme
We would be interested in more info on Chez Scheme. Who can we contact ?
Since we are using an experimental connection from New Zealand, please
reply through either: wolfgang%cantuar@waterloo.csnet OR
...watmath!cantuar!wolfgang. Thanks. w.kreutzer Univ. of Canterbury, NZ
∂04-Aug-86 0158 @MC.LCS.MIT.EDU:facility%cantuar.waterloo.edu@CSNET-RELAY.ARPA
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 4 Aug 86 01:58:15 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 4 Aug 86 03:41:30 EDT
Received: from waterloo by csnet-relay.csnet id ab03100; 4 Aug 86 3:31 EDT
Received: from cantuar.uucp by watmath; Mon, 4 Aug 86 03:02:07 edt
Date: Mon, 4 Aug 86 18:50:44+1200
From: Facilities Committee <facility%cantuar.waterloo.edu@CSNET-RELAY.ARPA>
To: SCHEME <@CSNET-RELAY.ARPA,@watmath.waterloo.edu:SCHEME@MC.LCS.MIT.EDU>
Date: Thu, 31 Jul 86 10:44:24+1200
From: wolfgang@cantuar.Waterloo.edu (W. Kreutzer)
To: SCHEME@MIT-MC.csnet@watmath.Waterloo.edu
Subject: Chez Scheme
We would be interested in more info on Chez Scheme. Who can we contact ?
Since we are using an experimental connection from New Zealand, please
reply through either: wolfgang%cantuar@waterloo.csnet OR
...watmath!cantuar!wolfgang. Thanks. w.kreutzer Univ. of Canterbury, NZ
∂06-Aug-86 0150 @MC.LCS.MIT.EDU:facility%cantuar.waterloo.edu@CSNET-RELAY.ARPA
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 6 Aug 86 01:50:07 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 6 Aug 86 04:49:37 EDT
Received: from waterloo by csnet-relay.csnet id aa13776; 6 Aug 86 4:32 EDT
Received: from cantuar.uucp by watmath; Wed, 6 Aug 86 03:54:00 edt
Date: Wed, 6 Aug 86 19:30:29 nzt
From: Facilities Committee <facility%cantuar.waterloo.edu@CSNET-RELAY.ARPA>
To: scheme <@CSNET-RELAY.ARPA,@watmath.waterloo.edu:scheme@MC.LCS.MIT.EDU>
Date: Thu, 31 Jul 86 10:44:24+1200
From: wolfgang@cantuar.Waterloo.edu (W. Kreutzer)
To: SCHEME@MIT-MC.csnet@watmath.Waterloo.edu
Subject: Chez Scheme
We would be interested in more info on Chez Scheme. Who can we contact ?
Since we are using an experimental connection from New Zealand, please
reply through either: wolfgang%cantuar@waterloo.csnet OR
...watmath!cantuar!wolfgang. Thanks. w.kreutzer Univ. of Canterbury, NZ
∂07-Aug-86 0136 @MC.LCS.MIT.EDU:JAR%MX.LCS.MIT.EDU@MC.LCS.MIT.EDU non-list arguments
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 7 Aug 86 01:35:52 PDT
Received: from MX.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 7 AUG 86 04:34:17 EDT
Date: Thu, 7 Aug 86 04:30:58 EDT
From: Jonathan A Rees <JAR%MX.LCS.MIT.EDU@MC.LCS.MIT.EDU>
Subject: non-list arguments
To: rhh@MC.LCS.MIT.EDU
cc: scheme@MC.LCS.MIT.EDU, t-discussion@MC.LCS.MIT.EDU
In-reply-to: Msg of Tue 1 Apr 86 15:26 EST from Robert Halstead <rhh at MIT-VAX.ARPA>
Message-ID: <[MX.LCS.MIT.EDU].939050.860807.JAR>
Date: Tue, 1 Apr 86 15:26 EST
From: Robert Halstead <rhh at MIT-VAX.ARPA>
To summarize, I think it should be permissible for
(eq? ((lambda x x) l) l)
to return true, but it should not be a requirement. Furthermore, it
should be permissible for an implementation to report an error if l in
the above expression is not a true list, but an implementation should
not be required to do so. Of course, it would still be true that
((lambda x x) 3 4 5)
would return a freshly consed list, just like (list 3 4 5). An
interesting question: do people expect (apply list l) to return a
top-level copy of l? -b.
Permitting sharing between the argument passed to apply and the
rest-argument leads to all kinds of obscure bugs - especially if sharing
isn't guaranteed. In fact I have written and used interpreters which
shared the list, and I regretted it every time. Efficiency shouldn't
guide the design on this issue. A compiler could easily detect the
situation you described (a rest-variable referenced only as the last
argument to APPLY) and generate code which doesn't cons.
Jonathan
∂07-Aug-86 0301 @MC.LCS.MIT.EDU:Pase@DOCKMASTER.ARPA Scheme for the Atari ST
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 7 Aug 86 03:01:42 PDT
Received: from MX.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 7 AUG 86 06:00:12 EDT
Received: from DOCKMASTER.ARPA by MC.LCS.MIT.EDU 4 Apr 86 16:23:17 EST
Date: Fri, 4 Apr 86 00:59 EST
From: Bill Pase <Pase@DOCKMASTER.ARPA>
Subject: Scheme for the Atari ST
To: scheme@MIT-MC.ARPA
Message-ID: <860404055925.041933@DOCKMASTER.ARPA>
Does anyone know if Scheme is available for the Atari ST? I know there
are versions for the IBMPC and the Macintosh. It wouIt would seem
especially with the later that an Atari version should be easy. Does
anyone have any plans to develop it? /bill
∂07-Aug-86 0730 @MC.LCS.MIT.EDU:jcm@ORNL-MSR.ARPA Re: Scheme for the Atari ST
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 7 Aug 86 07:30:35 PDT
Received: from ORNL-MSR.ARPA by MC.LCS.MIT.EDU 7 Aug 86 10:29:37 EDT
Received: by ORNL-MSR.ARPA (4.12/4.9)
id AA05596; Thu, 7 Aug 86 10:24:46 edt
Date: Thu, 7 Aug 86 10:24:46 edt
From: jcm@ORNL-MSR.ARPA (James A. Mullens)
Message-Id: <8608071424.AA05596@ORNL-MSR.ARPA>
To: scheme@mit-mc
Subject: Re: Scheme for the Atari ST
from Bill Pase (Pase@DOCKMASTER.ARPA)
>Does anyone know if Scheme is available for the Atari ST?
I recently asked similar questions here, which lead me to some
history which may be helpful. I'll summarize what I've learned from
people on this list and the archives.
The archives for this group contain some references to "Scheme 312".
This is the ancestor of MacScheme. MacScheme is actually being
developed on the Stride (Sage) computer under the CP/M-68K operating
system, so the author has an decent version working in that
environment. (The author is not interested in distributing or
supporting that version, however).
I have heard that the Atari ST runs GEM on top of CP/M-68K (or a
minor mutation of CP/M). If this is true, it might be easy to port
to the Atari -- maybe easier than porting to the Mac. Perhaps the
author is not aware of this possibility and would be interested in
doing the port?
The author's name is Will Clinger, and he used to be at
willc%indiana.csnet@csnet-relay.arpa which is Indiana U on CSnet
from my ARPAnet BSD Unix machine. I'm not sure if he monitors this
list... The MacScheme distributor address:
Semantic Microsystems
4470 SW Hall Street, Suite 340
Beaverton OR 97005
(503) 643-4539
Dave Alcocer (alco@mit-vax) was working with CScheme. He says this
public domain version is portable. Dave said he was interested
having it on his Amiga, but it might need to be trimmed down from
approximately 2 megabytes by removing some trimmings.
Wouldn't it be amazing to see a group of Mac, Amiga, and ST owners
cooperating on a public domain Scheme!
The GNU project has started distributing CScheme. I'm not sure why
they have decided to do so.
Good Luck -
- jim mullens / oak ridge national lab
∂08-Aug-86 0819 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Aug 86 08:19:18 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 8 AUG 86 11:18:43 EDT
Date: Fri, 8 Aug 86 11:16:47 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
To: wolfgang%cantuar%waterloo.csnet@CSNET-RELAY.ARPA
cc: scheme@MC.LCS.MIT.EDU
In-reply-to: Msg of Wed 6 Aug 86 19:30:29 nzt from Facilities Committee <facility%cantuar.waterloo.edu at CSNET-RELAY.ARPA>
Message-ID: <[AI.AI.MIT.EDU].80950.860808.JAR>
Date: Wed, 6 Aug 86 19:30:29 nzt
From: Facilities Committee <facility%cantuar.waterloo.edu at CSNET-RELAY.ARPA>
To: scheme < at CSNET-RELAY.ARPA, at watmath.waterloo.edu:scheme@MC.LCS.MIT.EDU>
Date: Thu, 31 Jul 86 10:44:24+1200
From: wolfgang@cantuar.Waterloo.edu (W. Kreutzer)
To: SCHEME@MIT-MC.csnet@watmath.Waterloo.edu
Subject: Chez Scheme
We would be interested in more info on Chez Scheme. Who can we contact ?
Since we are using an experimental connection from New Zealand, please
reply through either: wolfgang%cantuar@waterloo.csnet OR
...watmath!cantuar!wolfgang. Thanks. w.kreutzer Univ. of Canterbury, NZ
Implementation: Chez Scheme
Authored by: Kent Dybvig
Supported by: limited support by the author
Hardware: VAX
Operating Systems: 4.2 BSD UNIX (or ULTRIX)
Implementation: incrementally compiled to native code
Intended Use: education and research
Price: Per site: $400 for US colleges and universities,
and $1000 for companies who will use the
system for research and education only.
Chez Scheme was first released earlier this year and is now being used
at about 10 universities for classes and research. Chez Scheme supports
almost all of the required and optional features of the RRRS. The next
major release (in spring or summer 1986) will support 100% of the
required features of the standard.
In addition to the features of the RRRS, Chez Scheme provides error and
exception handling, engines, programmable cafes and waiters (fancy
read-eval-print loops), tracing and statistics- gathering facilities,
and fast-loading compiled files. Chez Scheme provides floating point
numbers, arbitrary-precision ratios, and arbitrary-precision integers,
but no imaginary numbers at this time.
Chez Scheme's biggest claim to fame is the speed and size of its
implementation. It outperforms Franz Lisp and DEC Common Lisp on most
programs, but the initial core image is less than 500K bytes, about half
of which is read-only and sharable.
For the license forms and ordering information, contact:
Kent Dybvig
Cadence Research Systems
620 Park Ridge Road
Bloomington, IN 47401
812/333-9269
You can also reach me during the day at 812/335-8653, or by electronic
mail to dyb.indiana@csnet-relay.
∂08-Aug-86 1230 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU [Masinter.pa: synonym streams..]
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Aug 86 12:29:48 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 8 AUG 86 11:20:48 EDT
Date: Fri, 8 Aug 86 11:19:12 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: [Masinter.pa: synonym streams..]
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <[AI.AI.MIT.EDU].80953.860808.JAR>
How about a similar rule for Scheme? With the obvious extension to ports created by
with-input-file, etc.
- Jonathan.
Date: 5 Aug 86 11:09 PDT
From: Masinter.pa at Xerox.COM
To: common-lisp at su-ai.ARPA
Re: synonym streams..
In-reply-to: David Bein <pyramid!bein@hplabs.HP.COM>'s message of 5 Aug
86 09:05 PDT
Message-ID: <860805-111034-2460@Xerox>
I propose the following rule: "It is an error to attempt to close a
stream that wasn't created with open."
With this rule, it would follow that, since synonym, broadcast and
two-way streams are not created with open, it is an error to perform
"close" on them.
∂08-Aug-86 1712 @MC.LCS.MIT.EDU:Bartley%ti-csl.csnet@CSNET-RELAY.ARPA "Final" comments on RRRRS
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Aug 86 17:12:33 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 8 Aug 86 20:16:20 EDT
Received: from ti-csl by csnet-relay.csnet id ai03255; 8 Aug 86 18:15 EDT
Received: by tilde id AA15700; Fri, 8 Aug 86 15:48:46 cdt
Date: Fri 8 Aug 86 15:20:50-CDT
From: David Bartley <Bartley%ti-csl.csnet@CSNET-RELAY.ARPA>
Subject: "Final" comments on RRRRS
To: RRRS-Authors%mit-mc@CSNET-RELAY.ARPA
Cc: Bartley%ti-csl.csnet@CSNET-RELAY.ARPA
Message-Id: <12229239846.30.BARTLEY@CSC60>
Before I go on vacation, I'd like to submit a (very) few comments on the
current draft report for consideration for the SIGPLAN revision.
-- I'm very pleased with its appearance and happy that it was distributed
to all of the attendees at the LISP conference. Thanks again to Jonathon.
-- Kent Dybvig has asked that the colon (:) be removed from the set of
extended alphabetic characters (section 2.3). I agree completely. My
joint implementations of Scheme and Common LISP need a reasonable syntax
for Scheme procedures to refer to symbols in various Common LISP packages.
Using Common LISP's syntax seems best.
-- Reference [2] to our conference paper on PC Scheme may now be updated
to refer to pages 86-93 of the proceedings. The same goes for reference
[6] by Dybvig, Friedman, and Haynes. Reference [51] to the TI Scheme
manual should be changed from ``preliminary version 1.0, November 1985''
to ``Original issue: December 1985''.
-- I hope that Jonathon will be able to incorporate our proposed number
syntax.
Regards,
David Bartley
-------
∂11-Aug-86 0855 @MC.LCS.MIT.EDU,@MIT-MULTICS.ARPA:SRAUCH@UNBMVS1.BITNET Instructor's manual for S&ICP by Julie Sussman
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 11 Aug 86 08:55:45 PDT
Received: from MIT-MULTICS.ARPA by MC.LCS.MIT.EDU 11 Aug 86 11:50:28 EDT
Received: from UNBMVS1(MAILER) by MITVMA (Mailer X1.23) id 8365;
Mon, 11 Aug 86 11:48:58 EDT
Date: 11 Aug 86 10:34:28 ADT
From: <SRAUCH@UNBMVS1>
To: scheme@mc.lcs.mit.edu
Subject: Instructor's manual for S&ICP by Julie Sussman
Message-ID: <ID45752.D860811.T103428.SRAUCH@UNBMVS1>
- Can anyone tell me whether the "Instructors Manual" for
Structure and Interpretation of Computer Programs by Abelson and
Sussman, written by Julie Sussman is available? If so, how can it be
obtained? McGraw-Hill Canada doesn't seem to have heard of it. Any help
with this would be greatly appreciated.
Steve R.
SRAUCH@UNBMVS1.BITNET
∂13-Aug-86 0238 NET-ORIGIN@MC.LCS.MIT.EDU Re: define
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 13 Aug 86 02:38:35 PDT
Received: from MX.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 13 AUG 86 05:32:10 EDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 17 Apr 86 00:50:16 EST
Received: from tektronix by csnet-relay.csnet id ak29970; 17 Apr 86 0:43 EST
Received: by tektronix (5.31/5.14)
id AA20915; Wed, 16 Apr 86 13:06:21 PST
Received: by tekchips (5.31/5.14)
id AA02612; Wed, 16 Apr 86 13:06:41 PST
Date: Wed, 16 Apr 86 13:06:41 PST
From: Will Clinger <willc%tekchips%tektronix.csnet@CSNET-RELAY.ARPA>
Message-Id: <8604162106.AA02612@tekchips>
To: SCHEME%MIT-MC%tektronix.csnet@CSNET-RELAY.ARPA
Subject: Re: define
Cc:
Roger Kirchner writes:
>Kent M Pitman said that there are other possible interpretations of
>(DEFINE (((...) ...) ...) ...)
>besides as an extended template for procedure definition.
>What would be the objections to making this interpretation standard?
Your interpretation is already standard, though not essential; see
page 18 of MIT AI Memo 848. Though other interpretations are possible,
they would be in conflict with the Revised Revised Report.
The extended syntax began in MIT Scheme and was picked up by MacScheme
and PC Scheme. T2 doesn't support it. I don't know about Chez Scheme
et cetera.
Peace, Will
∂14-Aug-86 1728 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA Minutes from lunch 5 August 1986
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 14 Aug 86 17:28:20 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 14 Aug 86 20:27:24 EDT
Received: from tektronix by csnet-relay.csnet id aa00212; 14 Aug 86 18:43 EDT
Received: by tektronix.TEK (5.31/6.16)
id AA09292; Thu, 14 Aug 86 12:57:59 PDT
Received: by tekchips.TEK (5.31/6.16)
id AA24878; Thu, 14 Aug 86 13:00:49 PDT
Message-Id: <8608142000.AA24878@tekchips.TEK>
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: Minutes from lunch 5 August 1986
In-Reply-To: Your message of Tue, 29 Jul 86 16:35:08 EDT.
<[AI.AI.MIT.EDU].77171.860729.JAR>
Date: 14 Aug 86 13:00:46 PDT (Thu)
From: willc%tekchips.tek.csnet@CSNET-RELAY.ARPA
Minutes from lunch on Tuesday, 5 August 1986
Attendance was not taken.
Jonathan Rees was congratulated on getting a draft of the R↑3RS done in
time for the conference.
After lunch we drew up a list of language areas that need work. In a few
of these areas we have proposals on the table, while a few others are
difficult research areas:
ERRORS & INTERRUPTS. What are the errors? How are they signalled?
How are the handlers found, what do they do, how are they defined?
What about I/O devices?
OPAQUE TYPES. Three new procedures have been proposed for creating
and manipulating objects that answer false to all the standard type
predicates and cannot be taken apart by any of the standard deconstructors.
One procedure -- call it INJECT -- takes two objects and returns a new
opaque object consisting of the first object tagged by the second.
The second procedure -- call it IN? -- takes two objects and returns
true if the first object was created by calling INJECT with the second
object as the tag, and returns false otherwise. The third procedure --
call it PROJECT -- takes an opaque object and a tag object and returns
the object encapsulated by the opaque object provided the tags match.
Axiomatically:
(IN? (INJECT x y) y) ==> #t
(IN? (INJECT x y) z) ==> #f provided (NOT (EQV? y z))
(PROJECT (INJECT x y) y) ==> x
MACROS. Difficult research area. We're awaiting Eugene Kohlbecker's
thesis.
DYNAMIC-WIND. DYNAMIC-WIND seems like a good generalization of
UNWIND-PROTECT, but what about multiprocessing? Should an UNWIND/WIND
occur on every process switch? What about I/O? The formal semantics
of DYNAMIC-WIND is very operational, which I take to be a danger signal.
INPUT/OUTPUT. What should happen to the current ports on a process
switch? What should happen if the debugger gains control? What should
happen if a transcript is desired?
SYNCHRONIZATION. Ought to have some means of synchronization before we
have multiple processes.
MODULE SYSTEM. First class environments do most things right, but they
render inter-module constant folding (e.g. procedure integration)
impractical. I think we're finally agreed that the issue of first class
environments can usefully be separated from the question of incremental
definitions as used in S&ICP, and I don't think anyone is enthusiastic
about Common Lisp style packages as a mechanism for modularity.
SEMANTICS OF QUASIQUOTE, QUOTE. In question are things like (EQ? '(A) '(A))
and (SET-CAR! `(A B ,C) 3) and (SET-CAR! `(A B ,@C) 3). Does it matter to
the last two examples whether the compiler can determine that C is a
constant?
DECLARATIONS. It is important to be able to say things like "CAR is a
constant", "N is an exact nonnegative integer less than 2↑20", "This
procedure should be optimized for speed at the expense of space but
not safety". Which declarations signal an error if violated, and which
are merely hints for better performance? What is the syntax and scope
of a declaration?
SYNTAX CHECKER & CANONIZER. How about a program that converts programs
written in full Scheme into a canonical form that uses only the primitive
expressions, checking syntax as it does so? Tektronix has volunteered to
supply such a program.
VERIFICATION SUITE. How about a verification suite to locate bugs?
Someone volunteered to coordinate this, but I'm not sure I remember
who it was, so please re-volunteer.
BENCHMARK SUITE. This wasn't discussed at lunch, but I talked to
several people who would like to have a benchmark suite that generates
more meaningful and more easily interpreted numbers than do the Gabriel
benchmarks. For example, the Gabriel benchmarks test property lists
and fluid variables but don't do anything with lexical closures.
MULTIPLE RETURN VALUES. Two new procedures have been proposed for
multiple return values. One procedure -- call it RETURN -- takes
arbitrarily many values and returns them. The other procedure --
call it RECEIVE-VALUES -- takes a thunk and a procedure, and calls
the procedure on the (possibly multiple) values returned by the
thunk. The semantics that appears in R↑3RS was designed to work
with multiple return values, but we might want to change the help
function "single" so that extra return values (e.g. in the test
position of a conditional) are ignored as in Common Lisp. (With
the current version of "single", extra return values would be an
error.) Since RETURN doesn't do anything remotely like what RETURN
does in Common Lisp (and is identical to CL's VALUES function),
we might want to discuss the name. We might also want to discuss
the argument order for RECEIVE-VALUES.
OPTIONALS. Should there be a special syntax for optional arguments
so we don't have to use a rest argument and destructure it ourselves?
What should the syntax be?
∂14-Aug-86 1855 @MC.LCS.MIT.EDU:ANDY@Sushi.Stanford.EDU Re: Minutes from lunch 5 August 1986
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 14 Aug 86 18:55:39 PDT
Received: from Sushi.Stanford.EDU by MC.LCS.MIT.EDU 14 Aug 86 21:34:10 EDT
Date: Thu 14 Aug 86 18:30:00-PDT
From: Andy Freeman <ANDY@Sushi.Stanford.EDU>
Subject: Re: Minutes from lunch 5 August 1986
To: willc%tekchips.tek.csnet@CSNET-RELAY.ARPA
cc: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: <8608142000.AA24878@tekchips.TEK>
Message-ID: <12230868993.15.ANDY@Sushi.Stanford.EDU>
I'd be happier if the Scheme community said nothing about
multitasking, multiprocessing, or anything related to parallelism.
This isn't intended to discourage informal communication, but any hint
of agreement/standardization is premature.
Why is this coming up now anyway? We don't understand macros, errors,
interrupts, declarations, etc.
I'd rather have (hash) tables than project/inject/in?.
-andy
-------
∂14-Aug-86 2053 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA substring indexes
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 14 Aug 86 20:51:53 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 14 Aug 86 23:00:21 EDT
Received: from tektronix by csnet-relay.csnet id ab00212; 14 Aug 86 18:46 EDT
Received: by tektronix.TEK (5.31/6.16)
id AA09635; Thu, 14 Aug 86 13:06:50 PDT
Received: by tekchips.TEK (5.31/6.16)
id AA25920; Thu, 14 Aug 86 13:09:35 PDT
Message-Id: <8608142009.AA25920@tekchips.TEK>
To: kend%tekla.tek.csnet@CSNET-RELAY.ARPA
Cc: rrrs-authors@MC.LCS.MIT.EDU
Subject: substring indexes
In-Reply-To: Your message of 13 Aug 86 08:37:36 PDT (Wed).
<8608131537.AA25142@tekla.TEK>
Date: 14 Aug 86 13:09:33 PDT (Thu)
From: willc%tekchips.tek.csnet@CSNET-RELAY.ARPA
The following comes from Ken Dickey (kend@tekla). I favor changing
the description of substring-fill! to say START *to* END. Peace, Will.
----------------------------------------------------------------
Will,
I have not yet read the full report, but R-cubed is a significant
improvement over R-squared. I did find section 6.7 on strings,
however, to be somewhat confusing. Some functions (eg substring) use
START *to* END, while others (eg substring-fill!) use START *through*
END.
I think it would be better to either maintain
0 <= START <= END < (string-length <string>)
XOR use 1 based indexing.
In both cases, I favor using start through end (both inclusive). The
latter is probably more in keeping with the spirit of Scheme in that
one based indexing seems more natural to naive programmers**.
Pax,
-Ken
-------------
** (based on my experience teaching Pascal and C).
∂14-Aug-86 2233 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA r-cubed syntax (nits)
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 14 Aug 86 22:33:27 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 15 Aug 86 00:58:33 EDT
Received: from tektronix by csnet-relay.csnet id ag02938; 15 Aug 86 0:47 EDT
Received: by tektronix.TEK (5.31/6.16)
id AA10107; Thu, 14 Aug 86 13:55:24 PDT
Received: by tekchips.TEK (5.31/6.16)
id AA01706; Thu, 14 Aug 86 13:58:17 PDT
Message-Id: <8608142058.AA01706@tekchips.TEK>
To: JAR@AI.AI.MIT.EDU
Cc: rrrs-authors@MC.LCS.MIT.EDU
Subject: r-cubed syntax (nits)
In-Reply-To: Your message of Tue, 29 Jul 86 16:35:08 EDT.
<[AI.AI.MIT.EDU].77171.860729.JAR>
Date: 14 Aug 86 13:58:14 PDT (Thu)
From: willc%tekchips.tek.csnet@CSNET-RELAY.ARPA
The following comes from Ken Dickey (kend%tekla@tek.csnet; my previous
note said kend@tekla, but I don't think that works unless you're at
Tektronix.).
----------------------------------------------------------------
Will,
parsimony: 7.1.1: <suffix>:
<digit> <digit>*
can be written <digit>+
ambiguity?: 7.1.3: <case clause> and <cond clause> both allow
(else <sequence>)
to be any clause, rather than the last clause. Is this intentional?
Again, let me say that this is the best language spec that I have read
in some time (I still have 7.2 to slog through).
-Ken
∂15-Aug-86 0902 @MC.LCS.MIT.EDU:dyb%iuvax.indiana.edu@CSNET-RELAY.ARPA Re: Minutes from lunch 5 August 1986
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 15 Aug 86 09:02:09 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 15 Aug 86 11:50:44 EDT
Received: from indiana by csnet-relay.csnet id aa07414; 15 Aug 86 11:12 EDT
Date: Fri, 15 Aug 86 00:51:46 est
From: "R. Kent Dybvig" <dyb%iuvax.indiana.edu@CSNET-RELAY.ARPA>
To: rrrs-authors%mit-mc.CSNET@CSNET-RELAY.ARPA
Subject: Re: Minutes from lunch 5 August 1986
It was I who volunteered to coordinate the verification suite.
Kent
∂15-Aug-86 1106 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU r-cubed syntax (nits)
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 15 Aug 86 11:06:33 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 15 AUG 86 13:46:41 EDT
Date: Fri, 15 Aug 86 13:47:03 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: r-cubed syntax (nits)
To: willc%tekchips.tek.csnet@CSNET-RELAY.ARPA
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of 14 Aug 86 13:58:14 PDT (Thu) from willc%tekchips.tek.csnet at CSNET-RELAY.ARPA
Message-ID: <[AI.AI.MIT.EDU].84074.860815.JAR>
Date: 14 Aug 86 13:58:14 PDT (Thu)
From: willc%tekchips.tek.csnet at CSNET-RELAY.ARPA
parsimony: 7.1.1: <suffix>:
<digit> <digit>*
can be written <digit>+
OK, will fix.
ambiguity?: 7.1.3: <case clause> and <cond clause> both allow
(else <sequence>)
to be any clause, rather than the last clause. Is this intentional?
I had it this way for a while, and decided that it was unnecessary
clutter in the syntax. You need to give two rules instead of one for
the syntax of cond (and case), and it looks really bad. But the fact
that someone noticed & cared is probably enough to indicate that I
should change it back to the more verbose, pedantic form.
∂15-Aug-86 1112 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU scheme report tar file
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 15 Aug 86 11:10:55 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 15 AUG 86 13:57:24 EDT
Date: Fri, 15 Aug 86 13:57:51 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: scheme report tar file
To: goodhart@NOSC-COD.ARPA
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Wed 6 Aug 86 10:26:55 PDT from Curtis L. Goodhart <goodhart%cod at nosc.ARPA>
Message-ID: <[AI.AI.MIT.EDU].84083.860815.JAR>
OK, there's now a tar file for the draft of the scheme report on host
MIT-PREP in the file "/u/jar/r3rs.tar". Use user scheme password scheme
if user & password are required. The tar file is about .25 Mbytes.
Sorry this took so long.
Jonathan
∂15-Aug-86 1223 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU "Final" comments on RRRRS
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 15 Aug 86 12:23:14 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 15 AUG 86 15:22:24 EDT
Date: Fri, 15 Aug 86 15:22:44 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: "Final" comments on RRRRS
To: Bartley%ti-csl.csnet@CSNET-RELAY.ARPA
cc: RRRS-Authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Fri 8 Aug 86 15:20:50-CDT from David Bartley <Bartley%ti-csl.csnet at CSNET-RELAY.ARPA>
Message-ID: <[AI.AI.MIT.EDU].84135.860815.JAR>
Date: Fri 8 Aug 86 15:20:50-CDT
From: David Bartley <Bartley%ti-csl.csnet at CSNET-RELAY.ARPA>
-- Kent Dybvig has asked that the colon (:) be removed from the set of
extended alphabetic characters (section 2.3). I agree completely. My
joint implementations of Scheme and Common LISP need a reasonable syntax
for Scheme procedures to refer to symbols in various Common LISP packages.
Using Common LISP's syntax seems best.
I have no strong objection to this. It's conceivable that it could be
construed by the uninitiated as an endorsement of read-time packaging,
but I think we should be able to guard against that.
I would like to hear from people who object to the this (Hanson?)
before making the change. If the screams aren't too loud I'll do it.
-- I hope that Jonathan will be able to incorporate our proposed number
syntax.
Sorry, I just won't have time to work on it, and I don't think there's
time for proper review. If you could prepare the changes in fine detail
(maybe edit the TeX sources yourself), this might be feasible, but a
last-minute change of this magnitude is bound to have problems with it.
Probably it would be best to just include a statement to the effect that
this change is being considered for a future revision of the report.
Jonathan
∂15-Aug-86 2150 @MC.LCS.MIT.EDU:CPH@AI.AI.MIT.EDU "Final" comments on RRRRS
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 15 Aug 86 21:50:17 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 16 AUG 86 00:49:37 EDT
Date: Sat, 16 Aug 86 00:50:15 EDT
From: Chris Hanson <CPH@AI.AI.MIT.EDU>
Subject: "Final" comments on RRRRS
To: JAR@AI.AI.MIT.EDU
cc: RRRS-Authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Fri 15 Aug 86 15:22:44 EDT from Jonathan A Rees <JAR at AI.AI.MIT.EDU>
Message-ID: <[AI.AI.MIT.EDU].84332.860816.CPH>
Date: Fri, 15 Aug 86 15:22:44 EDT
From: Jonathan A Rees <JAR at AI.AI.MIT.EDU>
To: Bartley%ti-csl.csnet at CSNET-RELAY.ARPA
Date: Fri 8 Aug 86 15:20:50-CDT
From: David Bartley <Bartley%ti-csl.csnet at CSNET-RELAY.ARPA>
-- Kent Dybvig has asked that the colon (:) be removed from
the set of extended alphabetic characters (section 2.3). I
agree completely. My joint implementations of Scheme and
Common LISP need a reasonable syntax for Scheme procedures to
refer to symbols in various Common LISP packages. Using
Common LISP's syntax seems best.
I have no strong objection to this. It's conceivable that it could be
construed by the uninitiated as an endorsement of read-time packaging,
but I think we should be able to guard against that.
I would like to hear from people who object to the this (Hanson?)
before making the change. If the screams aren't too loud I'll do it.
I guess that I should respond to this. I really, truly abhor the
read-time package system and would strenuously object to any such
thing being introduced into Scheme. I have gone out of my way (a
little) to use colons in my code just to parody the package system
and, unfortunately, that would make my code non-portable given this
decision.
Understand, I have no really serious objections to this suggestion,
except that if anyone tries to define what `:' means when it appears
in an identifier, I promise to raise heck. But I don't mind agreeing
to disagree about it.
And, of course, anyone who implements this change will not be able to
port my code without significant rewriting. Sigh. I guess that would
be your loss, not mine.
(Seriously, though, what would the symbol
`rtl:interpreter-call:lookup' mean in a system with such a syntax?)
∂18-Aug-86 0051 @MC.LCS.MIT.EDU:ram@YALE.ARPA Re: The generality of define
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 18 Aug 86 00:51:37 PDT
Received: from MX.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 18 AUG 86 03:41:46 EDT
Received: from yale-bulldog by MC.LCS.MIT.EDU 23 Apr 86 21:58:42 EST
Received: by Yale-Bulldog.YALE.ARPA; 23 Apr 86 21:46:26 EST (Wed)
Date: 23 Apr 86 21:46:26 EST (Wed)
From: Ashwin Ram <ram@YALE.ARPA>
Message-Id: <8604240246.AA12180@Yale-Bulldog.YALE.ARPA>
Subject: Re: The generality of define
To: andy@aids-unix.ARPA (Andy Cromarty)
Cc: SCHEME@MC.LCS.MIT.EDU
In-Reply-To: andy@aids-unix.ARPA (Andy Cromarty), Wed, 23 Apr 86 19:09:53 EST
Date: 21 Apr 1986 09:43-PST
From: andy@aids-unix (Andy Cromarty)
Subject: Re: The generality of define
Actually, a properly implemented
(define (square x) (* x x))
is not equivalent to
(define square (lambda (x) (* x x)))
at all, but rather to
(define square (rec square (lambda (x) (* x x))))
(define (fact1 n)
(if (<? n 2)
1
(* n (fact1 (-1+ n)))))
(define fact2
(lambda (n)
(if (<? n 2)
1
(* n (fact2 (-1+ n))))))
asc
-------
In T there is *no* difference between these two forms (except that you
get a named-lambda in the first case rather than a lambda).
> (pp copy1)
(LAMBDA (N) (IF (<? N 2) 1 (* N (FACT1 (-1+ N))))) <<<<| Both closed
| in the same
> (pp copy2) | environment.
(LAMBDA (N) (IF (<? N 2) 1 (* N (FACT2 (-1+ N))))) <<<<|
> (copy1 5)
20
> (copy2 5)
20
This makes sense to me since (DEFINE (FOO ...) ...) is specified to
be equivalent to (DEFINE FOO (LAMBDA (...) ...)). In both cases, FOO is
defined to be a closure whose environment is the environment of definition,
i.e., the REPL-ENV.
To get the definition analogous to your REC case, you need to use LABELS
explicitly:
> (define fact3
(labels (((fact3 n) (if (< n 2) 1 (* n (fact3 (-1+ n))))))
fact3))
> (define copy3 fact3)
> (define fact3 (lambda (x) x))
> (copy3 5)
120
It might make more sense to make this the default expansion since you
would usually expect the recursive call to refer to the definition-time
procedure (as opposed to its "name"), though now the variables FACT3 and
N have different reference semantics within the same form. In the case of
two or more mutually recursive functions, you still have to rely on the
run-time values of the cells that the variables in the closure refer to
in the environment that the closure was defined in. It's debatable,
therefore, whether special reference semantics for the name of the lambda
form is the "proper implementation", though it does seem more natural
albeit hairier.
-- Ashwin.
-------
∂18-Aug-86 1650 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA define syntax (an apology)
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 18 Aug 86 16:50:08 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 18 Aug 86 19:44:47 EDT
Received: from tektronix by csnet-relay.csnet id ac01742; 18 Aug 86 18:44 EDT
Received: by tektronix.TEK (5.31/6.16)
id AA07543; Mon, 18 Aug 86 10:42:41 PDT
Received: by tekchips.TEK (5.31/6.16)
id AA03638; Mon, 18 Aug 86 10:45:31 PDT
Message-Id: <8608181745.AA03638@tekchips.TEK>
To: scheme@MC.LCS.MIT.EDU
Cc: willc%tekchips.tek.com@CSNET-RELAY.ARPA
Subject: define syntax (an apology)
In-Reply-To: Your message of Fri, 15 Aug 86 13:47:03 EDT.
<[AI.AI.MIT.EDU].84074.860815.JAR>
Date: 18 Aug 86 10:45:30 PDT (Mon)
From: willc%tekchips.tek.csnet@CSNET-RELAY.ARPA
A message I sent several months ago recently made it to this mailing list.
By now, my message is incorrect. I wish to apologize for the confusion I
have caused.
There is an important difference between the 1985 Scheme standard (MIT AI
Memo 848) and the draft of the new 1986 Scheme standard (distributed at
the ACM Conference on Lisp and Functional Programming and expected to
appear in November SIGPLAN Notices). In the 1985 standard
(define (foo ...) ...)
was equivalent to
(define foo (rec foo (lambda (...) ...))).
In the 1986 standard (define (foo ...) ...) is equivalent to
(define foo (lambda (...) ...)).
As I understand it, the motivation for this change is that in the 1985
semantics, mutual recursion goes through the obvious binding of foo,
but self-recursion goes through the invisible (and therefore mysterious)
binding of foo created by the implicit rec. It's hard to explain why
self-recursion should behave differently from mutual recursion, so the
1986 semantics gets rid of the implicit rec and the mystery.
This change was inadvertently omitted from the list of changes that
appears in the draft distributed at the Lisp conference, so you have
to read the draft very carefully to spot it. By the way, the
(define ((foo ...) ...) ...) syntax was also dropped from the draft
as a simplifying measure.
Peace, Will
∂20-Aug-86 2002 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA numbers
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 20 Aug 86 20:02:07 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 20 Aug 86 23:02:06 EDT
Received: from tektronix by csnet-relay.csnet id ag24407; 20 Aug 86 22:44 EDT
Received: by tektronix.TEK (5.31/6.16)
id AA21860; Wed, 20 Aug 86 17:10:36 PDT
Received: by tekchips.TEK (5.31/6.16)
id AA03947; Wed, 20 Aug 86 17:13:22 PDT
Message-Id: <8608210013.AA03947@tekchips.TEK>
To: rrrs-authors@MC.LCS.MIT.EDU
Cc: willc%tekchips.tek.com@CSNET-RELAY.ARPA,
adams%tekchips.tek.com@CSNET-RELAY.ARPA
Subject: numbers
In-Reply-To: Your message of Wed 16 Jul 86 10:53:32-CDT.
<12223161873.35.BARTLEY@CSC60>
Date: 20 Aug 86 17:13:20 PDT (Wed)
From: willc%tekchips.tek.csnet@CSNET-RELAY.ARPA
Abstract: Scheme numbers are still inadequately specified in several
respects. I propose several improvements. Some are minor enough to
deserve incorporation in the SIGPLAN Notices publication of the Revised↑3
Report, but the others probably deserve more debate.
Some problems that I perceive with Scheme numbers are:
1. The quotient procedure is not adequately specified.
2. The floor etc procedures are not adequately specified.
3. The syntax for numbers has a redundancy.
4. The integer? procedure may not be adequately specified.
5. Valid indexes may not be adequately specified.
6. The read and string->number procedures are not adequately specified.
(David Bartley has also suggested that the syntax should be made more
compatible with Common Lisp and has proposed that the report be clearer
on which parts of the number syntax are essential and which are not
essential.)
1. Norman Adams pointed out to me that it is unclear from the description
of quotient in 6.5.4 whether (quotient -13 4) should be -3 or -4; likewise
(quotient 13 -4). I propose that the sentence beginning "For positive
integers n1 and n2" be followed by the sentence
For all integers n1 and n2 with n2 not equal to 0,
(= n1 (+ (* n2 (quotient n1 n2)) (remainder n1 n2))) ==> #t
2. In the description of floor, ceiling, truncate, round, and rationalize,
the sentence "Their results are not exact---in fact, their results are
clearly inexact, though they can be made exact with an explicit exactness
coercion" is incorrect. I propose that the sentence be replaced by "Their
results are exact if and only if their arguments are exact."
3. The third production for <ureal R> is redundant.
4. In MacScheme and a few other implementations, (integer? 4.0) evaluates
to #f. Even assuming that 4.0 is inexact, this seems wrong. I would like
to see an example in the report to show that it's wrong.
5. I believe the index or size arguments to list-tail, list-ref,
make-string, string-ref, string-set!, substring-fill!, make-vector,
vector-ref, and vector-set! should be required to be exact integers
instead of just integers.
6. It isn't clear from the report whether 3.0 reads as an exact or inexact
number. Indeed the same can be said of 3, or 3/1, or 3###-4###i. I propose
that this sort of thing be specified more formally, as in the following
example---which does not match up very well with the syntax and is not my
favorite proposal anyway.
exactness [ <real> + <ureal> i ] = exactness [ <real> - <ureal> i ]
= minexact (exactness [ <real> ], exactness [ ureal ])
exactness [ <real←1> @ <real←2> ]
= minexact (exactness [ <real←1> ], exactness [ <real←2> ]
exactness [ <sign> <ureal> ] = exactness [ <ureal> ]
exactness [ <prefix> <x> <suffix> ]
= if explicit [ <prefix> ]
then prexact [ <prefix> ]
else if empty [ <suffix> ]
then exactness [ <x> ]
else #f ; this is what I don't like
exactness [ <uinteger> <suffix> ]
= if empty [ <suffix> ] then exactness [ <uinteger> ] else #f
exactness [ <digit>+ #+ ] = #f
exactness [ <digit>+ ] = #t
exactness [ <uinteger←1> / <uinteger←2> ]
= minexact (exactness [ <uinteger←1> ], exactness [ <uinteger←2> ])
exactness [ <digit>+ #+ ] = #f
exactness [ <digit>+ ] = #t
exactness [ <digit>* . <digit>+ #* ] = #f
exactness [ <digit>* . #+ ] = #f
exactness [ <digit>+ . ] = #t
exactness [ <digit>+ #+ . ] = #f
minexact (b1, b2) = if b1 then b2 else #f
explicit [ ... #i ... ] = explicit [ ... #e ... ] = #t
explicit [ ... <empty exactness> ... ] = #f
prexact [ ... <exactness> ... ] = prexact [ <exactness> ]
prexact [ #i ] = #f
prexact [ #e ] = #t
Peace, Will
∂22-Aug-86 0555 @MC.LCS.MIT.EDU:dyb%iuvax.indiana.edu@CSNET-RELAY.ARPA a few more comments
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 22 Aug 86 05:38:43 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 22 Aug 86 08:38:51 EDT
Received: from indiana by csnet-relay.csnet id ac02619; 22 Aug 86 8:33 EDT
Date: Fri, 22 Aug 86 03:03:54 est
From: "R. Kent Dybvig" <dyb%iuvax.indiana.edu@CSNET-RELAY.ARPA>
To: rrrs-authors%mit-mc.CSNET@CSNET-RELAY.ARPA
Subject: a few more comments
It may be too late to bother with any of this, but here are a few
comments on the R3RS copy handed out at the conference.
Functionality
-------------
char-ready? looks too much like char-lower-case?, char-alphabetic?,
etc., and not enough like read-char. I think read-char-ready? would
be much more appropriate. Besides, some implementation or future
RnRS may want to have a write-char-ready?. Is there any reason not
to change the name?
In the number formats, the syntax (exactness) is used within two of
the examples of 6.5.6, but this form is not explicitly allowed in
6.5.7. My feeling is that the modifier s or e should be required,
as implied in 6.5.7. The formats are pretty complicated as is.
What happens on string<?, string>?, string<=?, string>=?, string-ci<?,
string-ci>?, string-ci<=?, string-ci>=? when one string is longer
than the other? I would add "If two strings differ in length but
are the same up to the length of the shorter string, the shorter string
is considered to be lexographically less than the longer string".
The procedure substring-fill! is the only procedure left that sticks
out to me as unnecessary and rarely useful. Perhaps someone can
explain to me why it should be in the standard.
Why is there not a vector-null? function..., or why not delete null?
and string-null? to be consistent?
Presentation
------------
1.3.1 strike the word "will"
2.1 it is not clear what "extended alphabetic characters" are here;
I think that the list should be moved here from 2.3, which is, after
all, titled "other" notations. At the least, a forward pointer is
needed.
2.1 last sentence, replace "between" with "among"
2.3 mention that ) is used to close a vector constant
6.9 optional if syntax should not be used in example
True Nitpick
------------
7.3 in first case description...
(let ((key <key> )
↑ extra space
Kent
∂22-Aug-86 1208 @MC.LCS.MIT.EDU,@SEBASTIAN.THINK.COM:gls@AQUINAS.THINK.COM 1986 Lisp conference bibliography
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 22 Aug 86 12:07:06 PDT
Received: from Godot.Think.COM by MC.LCS.MIT.EDU 22 Aug 86 14:08:11 EDT
Received: from SEBASTIAN.THINK.COM by Godot.Think.COM; Fri, 22 Aug 86 14:05:52 edt
Date: Fri, 22 Aug 86 14:06 EDT
From: Guy Steele <gls@Think.COM>
Subject: 1986 Lisp conference bibliography
To: common-lisp@SU-AI.ARPA, rrrs-authors@MC.LCS.MIT.EDU
Cc: gls@AQUINAS
Message-Id: <860822140628.4.GLS@SEBASTIAN.THINK.COM>
With the help of Bill Scherlis, I have massaged the table of contents
(with some corrections) for the 1986 ACM Conference on Lisp and
Functional Programming into the form of a bibliography database suitable
for use with LaTeX/BibTeX and (almost) SCRIBE. The database has been
tested with BibTeX, and uses TeX conventions for forcing capitalization
and for accenting characters (there are three accents acute, one umlaut,
and one "i" with a circumflex over it). The database should require
only slight modification to make it suitable for use with SCRIBE.
I am mailing out the database in the interest of making it easier for
everyone to refer to all these great papers from the conference. The
database follows at the end of this message, followed by the BibTeX
transcription of it for a bibliography format very similar to that
required by CACM. (I considered just mailing out a pointer to an
FTP-able file, but I find that in practice this method is rather clumsy
and people don't use it.)
--Guy
----------------------------------------------------------------
@InProceedings(LAWS-IN-MIRANDA
,Key = "Thompson"
,Author = "Simon Thompson"
,Title = "Laws in {M}iranda"
,Pages = "1-12"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(MINI-ML
,Key = "Clement"
,Author = "Dominique Cl\'ement and {Jo\"elle} Despeyroux and Thierry Despeyroux and Gilles Kahn"
,Title = "A Simple Applicative Language: {M}ini-{ML}"
,Pages = "13-27"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(INTEGRATING-FUNCTIONAL-AND-IMPERATIVE-PROGRAMMING
,Key = "Gifford"
,Author = "David K. Gifford and John M. Lucassen"
,Title = "Integrating Functional and Imperative Programming"
,Pages = "28-38"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(EXPERIENCE-WITH-AN-UNCOMMON-LISP
,Key = "Alberga"
,Author = "Cyril N. Alberga and Chris Bosman-Clark and Martin Mikelsons and Mary S. Van Deusen and Julian Padget"
,Title = "Experience with an Uncommon {L}isp"
,Pages = "39-53"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(DESIDERATA-FOR-THE-STANDARDISATION-OF-LISP
,Key = "Padget"
,Author = "Julian Padget and others"
,Title = "Desiderata for the Standardisation of {L}isp"
,Pages = "54-66"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(OPTIMIZING-DYNAMICALLY-RETARGETABLE-COMPILER-FOR-COMMON-LISP
,Key = "Brooks"
,Author = "Rodney A. Brooks and David B. Posner and James L. McDonald and Jon L. White and Eric Benson and Richard P. Gabriel"
,Title = "Design of an Optimizing, Dynamically Retargetable Compiler for {C}ommon {L}isp"
,Pages = "67-85"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(IMPLEMENTATION-OF-PC-SCHEME
,Key = "Bartley"
,Author = "David H. Bartley and John C. Jensen"
,Title = "The Implementation of {PC} {S}cheme"
,Pages = "86-93"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(CODE-GENERATION-TECHNIQUES-FOR-FUNCTIONAL-LANGUAGES
,Key = "Fairbairn"
,Author = "Jon Fairbairn and Stuart C. Wray"
,Title = "Code Generation Techniques for Functional Languages"
,Pages = "94-104"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(ARCHITECTURE-FOR-MOSTLY-FUNCTIONAL-LANGUAGES
,Key = "Knight"
,Author = "Tom Knight"
,Title = "An Architecture for Mostly Functional Languages"
,Pages = "105-112"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(EFFICIENT-MULTIPROCESSOR-COMBINATOR-REDUCTION
,Key = "Lemaitre"
,Author = "M. Lema\↑\itre and M. Castan and M.-H. Durand and G. Durrieu and B. Lecussan"
,Title = "Mechanisms for Efficient Multiprocessor Combinator Reduction"
,Pages = "113-121"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(CURRY-CHIP
,Key = "Ramsdell"
,Author = "John D. Ramsdell"
,Title = "The {CURRY} Chip"
,Pages = "122-131"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(VARIATIONS-ON-STRICTNESS-ANALYSIS
,Key = "Bloss"
,Author = "Adrienne Bloss and Paul Hudak"
,Title = "Variations on Strictness Analysis"
,Pages = "132-142"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(EXPANSION-PASSING-STYLE
,Key = "Dybvig"
,Author = "R. Kent Dybvig and Daniel P. Friedman and Christopher T. Haynes"
,Title = "Expansion-Passing Style: Beyond Conventional Macros"
,Pages = "143-150"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(HYGIENIC-MACRO-EXPANSION
,Key = "Kohlbecker"
,Author = "Eugene Kohlbecker and Daniel P. Friedman and Matthias Felleisen and Bruce Duba"
,Title = "Hygienic Macro Expansion"
,Pages = "151-161"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(EXACT-REAL-ARITHMETIC
,Key = "Boehm"
,Author = "Hans-J. Boehm and Robert Cartwright and Mark Riggle and Michael J. O'Donnell"
,Title = "Exact Real Arithmetic: A Case Study in Higher Order Programming"
,Pages = "162-173"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(RECONFIGURABLE-RETARGETABLE-BIGNUMS
,Key = "White"
,Author = "Jon L. White"
,Title = "Reconfigurable, Retargetable Bignums: A Case Study in Efficient, Portable {L}isp System Building"
,Pages = "174-191"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(LISP-ON-A-REDUCED-INSTRUCTION-SET-PROCESSOR
,Key = "Steenkiste"
,Author = "Peter Steenkiste and John Hennessy"
,Title = "{L}isp on a Reduced-Instruction-Set-Processor"
,Pages = "192-201"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(PARTITIONING-PARALLEL-PROGRAMS-FOR-MACRO-DATAFLOW
,Key = "Sarkar"
,Author = "Vivek Sarkar and John Hennessy"
,Title = "Partitioning Parallel Programs for Macro-Dataflow"
,Pages = "202-211"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(NORMA-GRAPH-REDUCTION-PROCESSOR
,Key = "Scheevel"
,Author = "Mark Scheevel"
,Title = "{NORMA}: A Graph Reduction Processor"
,Pages = "212-219"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(FOUR-STROKE-REDUCTION-ENGINE
,Key = "Clack"
,Author = "Chris Clack and Simon L. Peyton Jones"
,Title = "The Four-Stroke Reduction Engine"
,Pages = "220-232"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(USE-OF-LISP-IN-IMPLEMENTING-DENOTATIONAL-SEMANTICS
,Key = "Lee"
,Author = "Peter Lee and Uwe Pleban"
,Title = "On the Use of {L}isp in Implementing Denotational Semantics"
,Pages = "233-248"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(SEMANTICS-DIRECTED-COMPILING-FOR-FUNCTIONAL-LANGUAGES
,Key = "Nielson"
,Author = "Hanne R. Nielson and Flemming Nielson"
,Title = "Semantics Directed Compiling for Functional Languages"
,Pages = "249-257"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(CONNECTION-GRAPHS
,Key = "Bawden"
,Author = "Alan Bawden"
,Title = "Connection Graphs"
,Pages = "258-265"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(IMPLEMENTING-FUNCTIONAL-LANGUAGES-IN-THE-CATEGORICAL-ABSTRACT-MACHINE
,Key = "Mauny"
,Author = "Michel Mauny and Asc\'ander Su\'arez"
,Title = "Implementing Functional Languages in the Categorical Abstract Machine"
,Pages = "266-278"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(CONNECTION-MACHINE-LISP
,Key = "Steele"
,Author = "Steele, Guy L., Jr. and W. Daniel Hillis"
,Title = "Connection Machine LISP: Fine-Grained Parallel Symbolic Processing"
,Pages = "279-297"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(MYSTERY-OF-THE-TOWER-REVEALED
,Key = "Wand"
,Author = "Mitchell Wand and Daniel P. Friedman"
,Title = "The Mystery of the Tower Revealed: A Non-Reflective Description of the Reflective Tower"
,Pages = "298-307"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(TYPE-INFERENCE-APPROACH-TO-POLYMORPHIC-EXPRESSIONS
,Key = "Mitchell"
,Author = "John C. Mitchell"
,Title = "A Type-Inference Approach to Reduction Properties and Semantics of Polymorphic Expressions (summary)"
,Pages = "308-319"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(EQUATIONS-SETS-AND-REDUCTION-SEMANTICS
,Key = "Jayaraman"
,Author = "Bharat Jayaraman and Frank S. K. Silbermann"
,Title = "Equations, Sets, and Reduction Semantics for Functional and Logic Programming"
,Pages = "320-331"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(SEMANTIC-THEORY-FOR-EQUATIONAL-PROGRAMMING-LANGUAGES
,Key = "Thatte"
,Author = "Satish R. Thatte"
,Title = "Towards a Semantic Theory for Equational Programming Languages"
,Pages = "332-342"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(PROTOCOL-FOR-DISTRIBUTED-REFERENCE-COUNTING
,Key = "Lermen"
,Author = "Claus-Werner Lermen and Dieter Maurer"
,Title = "A Protocol for Distributed Reference Counting"
,Pages = "343-350"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(SEMANTIC-MODEL-OF-REFERENCE-COUNTING-AND-ITS-ABSTRACTION
,Key = "Hudak"
,Author = "Paul Hudak"
,Title = "A Semantic Model of Reference Counting and its Abstraction (detailed summary)"
,Pages = "351-363"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
@InProceedings(DISTRIBUTED-COPYING-GARBAGE-COLLECTION
,Key = "Rudalics"
,Author = "Martin Rudalics"
,Title = "Distributed Copying Garbage Collection"
,Pages = "364-372"
,Booktitle = "Proc.~1986 ACM Conference on Lisp and Functional Programming"
,Organization = "ACM SIGPLAN/SIGACT/SIGART"
,Year = "1986"
,Month = Aug
,Address = "Cambridge, Massachusetts")
----------------------------------------------------------------
\bibitem{EXPERIENCE-WITH-AN-UNCOMMON-LISP}
Alberga, Cyril N., Bosman-Clark, Chris, Mikelsons, Martin, Deusen, Mary S. Van, and Padget, Julian.
Experience with an uncommon {L}isp.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 39--53.
\bibitem{IMPLEMENTATION-OF-PC-SCHEME}
Bartley, David H., and Jensen, John C.
The implementation of {PC} {S}cheme.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 86--93.
\bibitem{CONNECTION-GRAPHS}
Bawden, Alan.
Connection graphs.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 258--265.
\bibitem{VARIATIONS-ON-STRICTNESS-ANALYSIS}
Bloss, Adrienne, and Hudak, Paul.
Variations on strictness analysis.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 132--142.
\bibitem{EXACT-REAL-ARITHMETIC}
Boehm, Hans-J., Cartwright, Robert, Riggle, Mark, and O'Donnell, Michael J.
Exact real arithmetic: a case study in higher order programming.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 162--173.
\bibitem{OPTIMIZING-DYNAMICALLY-RETARGETABLE-COMPILER-FOR-COMMON-LISP}
Brooks, Rodney A., Posner, David B., McDonald, James L., White, Jon L., Benson, Eric, and Gabriel, Richard P.
Design of an optimizing, dynamically retargetable compiler for {C}ommon {L}isp.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 67--85.
\bibitem{FOUR-STROKE-REDUCTION-ENGINE}
Clack, Chris, and Jones, Simon L. Peyton.
The four-stroke reduction engine.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 220--232.
\bibitem{MINI-ML}
Cl\'ement, Dominique, Despeyroux, {Jo\"elle}, Despeyroux, Thierry, and Kahn, Gilles.
A simple applicative language: {M}ini-{ML}.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 13--27.
\bibitem{EXPANSION-PASSING-STYLE}
Dybvig, R. Kent, Friedman, Daniel P., and Haynes, Christopher T.
Expansion-passing style: beyond conventional macros.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 143--150.
\bibitem{CODE-GENERATION-TECHNIQUES-FOR-FUNCTIONAL-LANGUAGES}
Fairbairn, Jon, and Wray, Stuart C.
Code generation techniques for functional languages.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 94--104.
\bibitem{INTEGRATING-FUNCTIONAL-AND-IMPERATIVE-PROGRAMMING}
Gifford, David K., and Lucassen, John M.
Integrating functional and imperative programming.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 28--38.
\bibitem{SEMANTIC-MODEL-OF-REFERENCE-COUNTING-AND-ITS-ABSTRACTION}
Hudak, Paul.
A semantic model of reference counting and its abstraction (detailed summary).
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 351--363.
\bibitem{EQUATIONS-SETS-AND-REDUCTION-SEMANTICS}
Jayaraman, Bharat, and Silbermann, Frank S. K.
Equations, sets, and reduction semantics for functional and logic programming.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 320--331.
\bibitem{ARCHITECTURE-FOR-MOSTLY-FUNCTIONAL-LANGUAGES}
Knight, Tom.
An architecture for mostly functional languages.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 105--112.
\bibitem{HYGIENIC-MACRO-EXPANSION}
Kohlbecker, Eugene, Friedman, Daniel P., Felleisen, Matthias, and Duba, Bruce.
Hygienic macro expansion.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 151--161.
\bibitem{USE-OF-LISP-IN-IMPLEMENTING-DENOTATIONAL-SEMANTICS}
Lee, Peter, and Pleban, Uwe.
On the use of {L}isp in implementing denotational semantics.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 233--248.
\bibitem{EFFICIENT-MULTIPROCESSOR-COMBINATOR-REDUCTION}
Lema\↑\itre, M., Castan, M., Durand, M.-H., Durrieu, G., and Lecussan, B.
Mechanisms for efficient multiprocessor combinator reduction.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 113--121.
\bibitem{PROTOCOL-FOR-DISTRIBUTED-REFERENCE-COUNTING}
Lermen, Claus-Werner, and Maurer, Dieter.
A protocol for distributed reference counting.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 343--350.
\bibitem{IMPLEMENTING-FUNCTIONAL-LANGUAGES-IN-THE-CATEGORICAL-ABSTRACT-MACHINE}
Mauny, Michel, and Su\'arez, Asc\'ander.
Implementing functional languages in the categorical abstract machine.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 266--278.
\bibitem{TYPE-INFERENCE-APPROACH-TO-POLYMORPHIC-EXPRESSIONS}
Mitchell, John C.
A type-inference approach to reduction properties and semantics of polymorphic expressions (summary).
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 308--319.
\bibitem{SEMANTICS-DIRECTED-COMPILING-FOR-FUNCTIONAL-LANGUAGES}
Nielson, Hanne R., and Nielson, Flemming.
Semantics directed compiling for functional languages.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 249--257.
\bibitem{DESIDERATA-FOR-THE-STANDARDISATION-OF-LISP}
Padget, Julian, et al.
Desiderata for the standardisation of {L}isp.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 54--66.
\bibitem{CURRY-CHIP}
Ramsdell, John D.
The {CURRY} chip.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 122--131.
\bibitem{DISTRIBUTED-COPYING-GARBAGE-COLLECTION}
Rudalics, Martin.
Distributed copying garbage collection.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 364--372.
\bibitem{PARTITIONING-PARALLEL-PROGRAMS-FOR-MACRO-DATAFLOW}
Sarkar, Vivek, and Hennessy, John.
Partitioning parallel programs for macro-dataflow.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 202--211.
\bibitem{NORMA-GRAPH-REDUCTION-PROCESSOR}
Scheevel, Mark.
{NORMA}: a graph reduction processor.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 212--219.
\bibitem{CONNECTION-MACHINE-LISP}
Steele, Jr., Guy L., and Hillis, W. Daniel.
Connection machine lisp: fine-grained parallel symbolic processing.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 279--297.
\bibitem{LISP-ON-A-REDUCED-INSTRUCTION-SET-PROCESSOR}
Steenkiste, Peter, and Hennessy, John.
{L}isp on a reduced-instruction-set-processor.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 192--201.
\bibitem{SEMANTIC-THEORY-FOR-EQUATIONAL-PROGRAMMING-LANGUAGES}
Thatte, Satish R.
Towards a semantic theory for equational programming languages.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 332--342.
\bibitem{LAWS-IN-MIRANDA}
Thompson, Simon.
Laws in {M}iranda.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 1--12.
\bibitem{MYSTERY-OF-THE-TOWER-REVEALED}
Wand, Mitchell, and Friedman, Daniel P.
The mystery of the tower revealed: a non-reflective description of the reflective tower.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 298--307.
\bibitem{RECONFIGURABLE-RETARGETABLE-BIGNUMS}
White, Jon L.
Reconfigurable, retargetable bignums: a case study in efficient, portable {L}isp system building.
In {\it Proc. 1986 ACM Conference on Lisp and Functional Programming}.
ACM SIGPLAN/SIGACT/SIGART (Cambridge, Massachusetts, August 1986), 174--191.
∂23-Aug-86 1738 @MC.LCS.MIT.EDU:GJS%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU Re: numbers
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Aug 86 17:37:49 PDT
Received: from OZ.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 23 AUG 86 20:38:18 EDT
Date: Sat 23 Aug 86 20:37:17-EDT
From: "Gerald Jay Sussman" <GJS%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU>
Subject: Re: numbers
To: willc%tekchips.tek.csnet@CSNET-RELAY.ARPA
cc: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: <8608210013.AA03947@tekchips.TEK>
Message-ID: <12233218691.23.GJS@OZ.AI.MIT.EDU>
The real numbers committee met today (all C of us, but we are not sure
if C=2↑Aleph0) in closed session!. We commend you, David Bartley and
Norm Adams for noticing our grievous errors and we thank you for the
nice suggestions. We move that suggestions 1-5 be immediately
adopted. Suggestion 6, concerning the syntax of exact/inexact
numerical constants is still not clear. What is your favorite
proposal anyway?
-------
∂25-Aug-86 2008 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@CSNET-RELAY.ARPA Another nit; my favorite numbers
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 25 Aug 86 20:03:12 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 25 Aug 86 21:26:35 EDT
Received: from tektronix by csnet-relay.csnet id ae02269; 25 Aug 86 18:44 EDT
Received: by tektronix.TEK (5.31/6.16)
id AA12524; Mon, 25 Aug 86 14:26:48 PDT
Received: by tekchips.TEK (5.31/6.16)
id AA07580; Mon, 25 Aug 86 14:29:50 PDT
Message-Id: <8608252129.AA07580@tekchips.TEK>
To: rrrs-authors@MC.LCS.MIT.EDU, jar@MC.LCS.MIT.EDU
Subject: Another nit; my favorite numbers
In-Reply-To: Your message of Sat 23 Aug 86 20:37:17-EDT.
<12233218691.23.GJS@OZ.AI.MIT.EDU>
Date: 25 Aug 86 14:29:47 PDT (Mon)
From: willc%tekchips.tek.csnet@CSNET-RELAY.ARPA
The description of map in section 6.9 says that its first argument must
be a procedure of one argument. The description should say instead
that "The {\it list}s must be lists, and {\it proc} must be a procedure
taking as many arguments as there are {\it list}s."
----------------------------------------------------------------
Gerry asked what my favorite proposal was for the implicit exactness
of numeric constants. It is:
1. Constants of the form x+yi, x-yi, and x@y are exact iff both x
and y are exact as real constants.
2. Constants of the form x/y are exact iff both x and y are exact
as integer constants and there is no explicit prefix that says
otherwise.
3. Constants that contain sharp signs to indicate imprecise digits
are inexact unless there is an explicit prefix that says
otherwise.
4. Constants that contain a nonempty exponent suffix are exact iff
they are exact after shifting the decimal point and/or adding
zeroes to eliminate the exponent. (For example, 1.1e6 would
be treated as 1100000, 40e-3 would be treated as .040, 2/3e2
would be treated as 200/3, and 2/3e-2 would be treated as 2/300.)
5. Constants that contain a decimal point but no exponent or sharp
signs indicating imprecise digits are exact iff there are no
digits to the right of the decimal point and there is no explicit
prefix that says otherwise.
6. Constants that contain no decimal point, exponent, or sharp
signs indicating imprecise digits are exact iff there is no
explicit prefix that says otherwise.
Whew! Rule 4 is probably the most controversial, followed by rule 5.
peace, Will
∂28-Aug-86 0849 @MC.LCS.MIT.EDU:JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU Minutes from lunch 5 August 1986
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 28 Aug 86 08:49:31 PDT
Received: from OZ.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 28 AUG 86 11:48:45 EDT
Date: 28 Aug 1986 11:11 EDT (Thu)
Message-ID: <JINX.12234426370.BABYL@MIT-OZ>
From: Bill Rozas <JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU>
To: willc%tekchips.tek.csnet@RELAY.CS.NET
Cc: rrrs-authors@MC.LCS.MIT.EDU
Subject: Minutes from lunch 5 August 1986
In-reply-to: Msg of 14 Aug 1986 16:00-EDT from willc%tekchips.tek.csnet at CSNET-RELAY.ARPA
Wow! we have a full schedule ahead. Given the amount of flame which
just agreeing on the language has generated, I can imagine what trying
to agree on these issues will cause. I definitely look forward to it.
Something we might also think about standarizing is graphics
primitives. I realize this is hardware/system dependent, but it is
probably no harder than agreeing on interrupts and similar things.
It would be nice if simple graphics programs were also portable.
∂28-Aug-86 0908 @MC.LCS.MIT.EDU:mhwu%hplmhw@hplabs.HP.COM Minutes/Standardize Graphics
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 28 Aug 86 09:08:20 PDT
Received: from hplabs.HP.COM by MC.LCS.MIT.EDU 28 Aug 86 12:07:54 EDT
Received: from hplmhw by hplabs.HP.COM ; Thu, 28 Aug 86 09:01:43 pdt
Received: by hplmhw ; Thu, 28 Aug 86 09:02:41 pdt
Date: Thu, 28 Aug 86 09:02:41 pdt
From: Henry M. Wu <mhwu%hplmhw@hplabs.HP.COM>
Message-Id: <8608281602.AA00425@hplmhw>
To: JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU
Cc: willc%tekchips.tek.csnet@RELAY.CS.NET, rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: Bill Rozas's message of 28 Aug 1986 11:11 EDT (Thu)
Subject: Minutes/Standardize Graphics
One comment I have heard from talking to people around here is that
they are surprised Scheme is trying put everything into the language
specs rather than define libraries (like C, I guess).
I'm not claiming this is the right thing, but it does seem like
something worth pondering.
Henry
∂28-Aug-86 2012 @MC.LCS.MIT.EDU:GJS%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU Re: Minutes from lunch 5 August 1986
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 28 Aug 86 20:12:07 PDT
Received: from OZ.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 28 AUG 86 14:23:45 EDT
Date: Thu 28 Aug 86 14:21:58-EDT
From: "Gerald Jay Sussman" <GJS%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU>
Subject: Re: Minutes from lunch 5 August 1986
To: JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU, rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: <JINX.12234426370.BABYL@MIT-OZ>
Message-ID: <12234461088.59.GJS@OZ.AI.MIT.EDU>
I disagree that it is good to mix graphics in with other things.
I think that graphics is pretty poorly understood and rather idiosyncratic --
it will just cause lots of wasted flamage to work on that.
-------
∂29-Aug-86 1503 @MC.LCS.MIT.EDU:andy@ads.ARPA graphics for Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 29 Aug 86 15:02:48 PDT
Received: from grape.ads.ARPA by MC.LCS.MIT.EDU 29 Aug 86 18:01:17 EDT
Date: Fri, 29 Aug 86 06:41:16 pdt
From: andy@ads.ARPA (Andy Cromarty)
To: rrrs-authors@mit-mc.ARPA
Subject: graphics for Scheme
A good alternative to providing graphics capability is to solve the
more general problem of designing a clean foreign function interface
standard. This would permit a variety of useful existing software
packages to be integrated into Scheme environments without requiring
that we deflect our attention from substantive language design issues
(and our plate is rather full already) to address ancillary and difficult
problems such as design of packages for graphics, window systems, etc.
This would also make Scheme much more attractive to people who actually
want to use Scheme as a programming language rather than as an object
of study.
Designing a good foreign function interface is nontrivial if we
wish to maintain a principled design approach. I suspect that
it would require us to revisit some of the thorny problems we've
brushed up against but not really solved in the past few months,
such as whether Scheme should be thought of as having a dynamic
binding environment vs. an essentially static one defined purely
by the lexical structure of our programs. In the former case,
a relatively conventional dynamic loading scheme might work best;
for the latter case, a declaration-based system might be more
appropriate. In either case, we would need a spec for translating
Scheme data structures into those of other languages. (Perhaps
the SUN xdr might be a good spec to work from for this part of
the problem.)
A foreign function interface might also make Scheme a better
base language environment for studying some difficult contemporary
programming paradigm problems, such as techniques for distributed
and parallel processing. Currently we achieve this locally at ADS by
extending our Scheme with functions written in C and linked in
statically by the linkage editor. This has the disadvantage of
requiring that the researcher know not only how to code the new
parallelism/distributed processing primitives, but also what the
internal structure of the Scheme environment is in some detail.
A foreign function interface would provide a sort of firewall that
would prevent the designer of new constructs from having to know
what the Scheme implementation's internals look like.
asc
∂02-Sep-86 1519 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU substring-vector-null-fill!, colitis, etc.
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 2 Sep 86 15:18:30 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 2 SEP 86 18:18:38 EDT
Date: Tue, 2 Sep 86 18:19:59 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: substring-vector-null-fill!, colitis, etc.
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <[AI.AI.MIT.EDU].90180.860902.JAR>
Here are changes I've made at the requests of people too numerous to
mention (I wish I could acknowledge everyone individually, but time
presses):
I've flushed SUBSTRING-FILL! and STRING-NULL?. If STRING-NULL? is
retained then VECTOR-NULL? should be added. These are both in a
somewhat different class than NULL? since NULL? is often used to
terminate recusrions but STRING- and VECTOR-NULL? aren't.
It's now clearly an error to alter an object returned as the value of a
constant expression, e.g. (string-set! "foo" 1 #\x) and (set-car! '(a b) 'c)
are errors.
The list of extended alphabetics has been moved from "other notations"
to "identifiers".
I'll try to flush the garbage about immutability from the eqv? section,
and leave the question of (eq? '(a) '(a)) unbreached.
Small organizational error fixed: the nonterminal <sequence expression>
is gone, and (begin <sequence>) is now an alternative right-hand side
for <derived expression>.
The equation defining exponentiation has been repaired.
-----
Questions:
- Advice sought on what to do about the grammar for COND and CASE. In
question is the treatment of non-final ELSE clauses. Two people have
mentioned that as it stands the grammar is too liberal. Should I change
it so that there are two rules for each, viz.
<derived expression> --> ...
| (cond <cond clause>+)
| (cond <cond clause>* (else <sequence>))
| ...
| (case <key> <case clause>+)
| (case <key> <case clause>* (else <sequence>))
| ...
? Seems to me it's not grave if it's left as is, since the text
explains that actually the else clause should come at the end.
- I can sort of see why VECTOR-FILL! exists (it has to exist internally in
any case, in order to support the optional argument), but symmetry
considerations would suggest either flushing it or adding STRING-FILL!.
Opinions? No change here so far.
- I don't think I have time to change number syntax, although I think
specifying default exactness on input is easier, since I can just copy
text from Will's messages. I have two small arguments with Will's rule
which says that 1e3 is exact. One is that this makes exactness somewhat
tricky to determine -- you have to be able to count in order to
determine whether a string represents an exact number or not. I prefer
the simpler rurule which says that the presence of an exponent marker
makes the number inexact by default. The second argument stems from CL
compatibility concerns: if Scheme's exact integers are identical to CL's
integers, and Scheme's inexact (rational) flonums are identical to CL's
flonums, then making 1e3 represent an exact number would be an
incompatibility between Scheme and CL. This correspondence seems
natural to me. I'd like to hear arguments in favor of Will's rule.
- I'm inclined to demote colon from alphabetic to unspecified (like \ and
|), although I'd like the case to be made more clearly. I would really
hate to see someone add Common-Lisp-like read-time packaging to any
Scheme, so I don't admit that as a good reason for this change, although
if foo:bar read in the same as (access bar foo) that wouldn't be so bad.
However, I'm primarily a Scheme-in-Common-Lisp user myself these days,
and the implementation and its integration into the host CL would indeed
be cleaner if colon weren't extended alphabetic, so I DO see CL
compatibility as a good reason for the change.
On the side of an alphabetic colon, I should mention that the
moderate-sized community of pro-Scheme people raised on Riesbeck,
Charniak, and/or McDermott's book(s), or otherwise immersed in Yale AI
Lisp culture, use colon pretty heavily as an alphabetic character.
Also, there are some other alternatives for CL <--> Scheme communication:
- A way to coerce packages to environments, so e.g. if you want
Lisp's ELT function you can say (access elt lisp-package). This is
what CLSCH does now.
- A procedure which makes Lisp symbols, e.g. (make-lisp-symbol 'lisp
'elt).
- A reader syntax such as #[Lisp-symbol lisp elt] or #>Lisp>elt.
None of these is quite as attractive as just saying lisp:elt.
I'll wait for more comments, then flip a coin.
- Jonathan
∂03-Sep-86 0424 @MC.LCS.MIT.EDU:ramsdell%faron@mitre-bedford.ARPA call-with-xxput-port
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 3 Sep 86 04:23:54 PDT
Received: from mitre-bedford.ARPA by MC.LCS.MIT.EDU 3 Sep 86 07:24:24 EDT
Organization: The MITRE Corp., Bedford, MA
Received: by faron.MENET (4.12/4.7)
id AA03165; Wed, 3 Sep 86 07:17:30 edt
Date: Wed, 3 Sep 86 07:17:30 edt
From: John D. Ramsdell <ramsdell%faron@mitre-bedford.ARPA>
Posted-Date: Wed, 3 Sep 86 07:17:30 edt
Message-Id: <8609031117.AA03165@faron.MENET>
To: rrrs-authors%mc.lcs.mit.edu@mitre-bedford.ARPA
Subject: call-with-xxput-port
Please do not forget the change associated with
call-with-input-port and call-with-output-port.
I suggest changing the names of no other I/O routines.
John
∂03-Sep-86 0625 @MC.LCS.MIT.EDU:JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU substring-vector-null-fill!, colitis, etc.
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 3 Sep 86 06:25:11 PDT
Received: from OZ.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 3 SEP 86 09:05:17 EDT
Date: 3 Sep 1986 09:02 EDT (Wed)
Message-ID: <JINX.12235975868.BABYL@MIT-OZ>
From: Bill Rozas <JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU>
To: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Cc: rrrs-authors@MC.LCS.MIT.EDU
Subject: substring-vector-null-fill!, colitis, etc.
In-reply-to: Msg of 2 Sep 1986 18:19-EDT from Jonathan A Rees <JAR at AI.AI.MIT.EDU>
1) I vote to change the grammar to only allow the final ELSE case.
It does not seem like a very large change.
2) VECTOR-FILL! and STRING-FILL! are completely symmetric. They both
must exist internally for the MAKE-STRING and MAKE-VECTOR procedures.
FLush both or keep both, but I vote to flush both since they can be
written using VECTOR-SET! and STRING-SET!
3) I think that except in a few cases, it is not necessary to agree on
default exactness in the number syntax. Anybody who is going to use
advantage of it (whenever somebody implements it), will certainly want
to force the exactness/inexactness of his/her explicit numerals by
using prefixes, and nobody else will care, probably.
The only case that must be decided, in my opinion, is making things
like 3, 123, -456 ("obvious" integers) exact, so they can be used as
indeces to VECTOR-MUMBLE and STRING-MUMBLE.
Thus some implementations could agree to be compatible with CL, and
some to take a completely different approach, but the most common case
(and needed by non-numeric code) would be compatible.
4) I like alphabetic colon, and dislike the CL package system too, but
giving up colon seems like a very minor issue. There are too many
people trying to make a dual CL/Scheme environment, and we should not
make this job harder than it has to be. Thus I vote moving colon to
unspecified.
∂04-Sep-86 0858 @MC.LCS.MIT.EDU:F95THOMP%CARLETON.BITNET@WISCVM.WISC.EDU Scheme Books?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 4 Sep 86 08:58:39 PDT
Received: from WISCVM.WISC.EDU by MC.LCS.MIT.EDU 4 Sep 86 11:54:48 EDT
Received: from (F95THOMP)CARLETON.BITNET by WISCVM.WISC.EDU on 09/04/86
at 10:52:41 CDT
Received: from F95THOMP by CARLETON.BITNET on 03 Sep 86 17:37:10 EDT
Date: 03 Sep 86 17:11:00 EDT
From: DAVE THOMAS <F95THOMP%CARLETON.BITNET@WISCVM.WISC.EDU>
To: <scheme@MC.LCS.MIT.EDU>
Subject: Scheme Books?
What books are available for Scheme(other than S&ICP)?
Are there solution manuals available for any of these?
Thanks
∂04-Sep-86 1828 @MC.LCS.MIT.EDU:wecker%cookie.DEC@decwrl.DEC.COM Please delete me from this distribution list, thanks - dave
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 4 Sep 86 18:28:05 PDT
Received: from decwrl.dec.com by MC.LCS.MIT.EDU 4 Sep 86 20:41:23 EDT
Received: by decwrl.dec.com (5.54.2/4.7.34)
id AA00703; Thu, 4 Sep 86 17:39:12 PDT
Message-Id: <8609050039.AA00703@decwrl.dec.com>
Date: 04-Sep-1986 1022
From: wecker%cookie.DEC@decwrl.DEC.COM (DAVE TANSTAAFL WECKER)
To: scheme@MC.LCS.MIT.EDU
Subject: Please delete me from this distribution list, thanks - dave
∂05-Sep-86 1947 @MC.LCS.MIT.EDU:mh@BU-CS.BU.EDU list
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 5 Sep 86 19:46:59 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 5 Sep 86 22:44:06 EDT
Received: from bu-cs.bu.edu by CSNET-RELAY.ARPA id aa00483; 5 Sep 86 16:15 EDT
Return-Path: <mh>
Received: by bu-cs.bu.edu (5.31/4.7)
id AA04666; Fri, 5 Sep 86 11:11:29 EDT
Date: Fri, 5 Sep 86 11:11:29 EDT
From: Marek Holynski <mh@BU-CS.BU.EDU>
Message-Id: <8609051511.AA04666@bu-cs.bu.edu>
To: scheme@MC.LCS.MIT.EDU
Subject: list
Could you please delete me from the distribution list. Thank you.
∂08-Sep-86 0330 @MC.LCS.MIT.EDU:shneider%cui.unige.chunet%ubc.csnet@CSNET-RELAY.ARPA Beginners question: Advising methods in TI scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Sep 86 03:30:35 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 8 Sep 86 06:27:39 EDT
Received: from ubc by csnet-relay.csnet id aa08170; 8 Sep 86 6:19 EDT
Date: Mon, 8 Sep 86 02:28:14 pdt
Received: by ubc.csnet id AA11319; Mon, 8 Sep 86 02:28:14 pdt
From: "Daniel K. Schneider" <shneider%cui.unige.chunet%ubc.csnet@CSNET-RELAY.ARPA>
To: scheme@MC.LCS.MIT.EDU
MMDF-Warning: Parse error in original version of preceding line at CSNET-RELAY.ARPA
Message-Id: <121:shneider@cui.unige.chunet>
Subject: Beginners question: Advising methods in TI scheme
1) I started writing a program with lots of methods. Now it start loosing
"track".
-> How can I trace methods in Ti scheme?
i.e. is there an elegant way of doing it ?
2) Is there any person to whom I should send this kind of request ?
Thanks for any help
(and reply by e-mail)
-------------------------------------------------------------------------------
Daniel K.Schneider
Departement de science politique, Universite de Geneve
1211 GENEVE 4 (Switzerland), Tel. (..41) 22 20 93 33 ext. 2357
to VMS/BITNET: to UNIX/EAN (preferable):
BITNET: SCHNEIDER@CGEUGE51 shneider%cui.unige.chunet@CERNVAX
ARPA: SCHNEIDER%CGEUGE51.BITNET@WISCVM shneider%cui.unige.chunet@ubc.csnet
uucp: mcvax!cernvax!cui!shneider
X.400/ean: shneider@cui.unige.chunet
∂08-Sep-86 0826 @MC.LCS.MIT.EDU:philbin-jim@YALE.ARPA Re: [THOMAS: Scheme Books?]
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Sep 86 08:25:59 PDT
Received: from yale-bulldog by MC.LCS.MIT.EDU 8 Sep 86 11:21:04 EDT
Received: by Yale-Bulldog.YALE.ARPA; 8 Sep 86 11:01:05 EDT (Mon)
Date: 8 Sep 86 11:01:05 EDT (Mon)
From: James F Philbin <philbin-jim@YALE.ARPA>
Message-Id: <8609081501.AA17146@Yale-Bulldog.YALE.ARPA>
Subject: Re: [THOMAS: Scheme Books?]
To: <Scheme@MC.LCS.MIT.EDU>
What books are available for Scheme ? Are there solution manuals
available for any of these?
Steven Slade had written and introductory programming book which
might be of interest. Contact SLADE@YALE for details.
- Jim
The T Programming Language: A Dialect of LISP
Stephen Slade
Prentice-Hall, Englewood Cliffs, N.J.
To appear: November, 1986
∂08-Sep-86 0848 @MC.LCS.MIT.EDU:carr%utah-orion@utah-cs.arpa scoops
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Sep 86 08:48:32 PDT
Received: from utah-cs.ARPA by MC.LCS.MIT.EDU 8 Sep 86 11:34:07 EDT
Received: by utah-cs.ARPA (5.31/4.40.2)
id AA22771; Mon, 8 Sep 86 09:32:07 MDT
Received: by utah-orion.ARPA (5.31/4.40.2)
id AA03156; Mon, 8 Sep 86 09:32:04 MDT
Date: Mon, 8 Sep 86 09:32:04 MDT
From: carr%utah-orion@utah-cs.arpa (Harold Carr)
Message-Id: <8609081532.AA03156@utah-orion.ARPA>
To: scheme@mc.lcs.mit.edu
Subject: scoops
Could someone tell me how to obtain SCOOPS?
Thanks, Harold
∂08-Sep-86 1334 @MC.LCS.MIT.EDU:shneider%cui.unige.chunet%ubc.csnet@CSNET-RELAY.ARPA Beginners question: Advising methods in TI scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Sep 86 13:33:32 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 8 Sep 86 16:25:41 EDT
Received: from ubc by csnet-relay.csnet id aa00411; 8 Sep 86 15:19 EDT
Date: Mon, 8 Sep 86 11:24:54 pdt
Received: by ubc.csnet id AA13463; Mon, 8 Sep 86 11:24:54 pdt
From: "Daniel K. Schneider" <shneider%cui.unige.chunet%ubc.csnet@CSNET-RELAY.ARPA>
Sender: "Daniel K. Schneider" <shneider%cui.unige.chunet%ubc.csnet@CSNET-RELAY.ARPA>
To: scheme@MC.LCS.MIT.EDU
MMDF-Warning: Parse error in original version of preceding line at CSNET-RELAY.ARPA
Message-Id: <122:shneider@cui.unige.chunet>
Subject: Beginners question: Advising methods in TI scheme
1) I started writing a program with lots of methods. Now it start loosing
"track".
-> How can I trace methods in Ti scheme?
i.e. is there an elegant way of doing it ?
2) Is there any person to whom I should send this kind of request ?
Thanks for any help
(and reply by e-mail)
-------------------------------------------------------------------------------
Daniel K.Schneider
Departement de science politique, Universite de Geneve
1211 GENEVE 4 (Switzerland), Tel. (..41) 22 20 93 33 ext. 2357
to VMS/BITNET: to UNIX/EAN (preferable):
BITNET: SCHNEIDER@CGEUGE51 shneider%cui.unige.chunet@CERNVAX
ARPA: SCHNEIDER%CGEUGE51.BITNET@WISCVM shneider%cui.unige.chunet@ubc.csnet
uucp: mcvax!cernvax!cui!shneider
X.400/ean: shneider@cui.unige.chunet
∂08-Sep-86 1509 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Good & bad news
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Sep 86 15:09:43 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 8 SEP 86 18:10:23 EDT
Date: Mon, 8 Sep 86 18:11:24 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Good & bad news
To: rrrs-authors@MC.LCS.MIT.EDU
cc: slade@YALE.ARPA, meehan@YALE.ARPA
Message-ID: <[AI.AI.MIT.EDU].92170.860908.JAR>
The good news is that the scheme report is in the mail, and the editor
of SIGPLAN Notices will have it within a couple of days.
The bad news is that the November issue of SIGPLAN, like the October
issue, is devoted to conference proceedings for some conference or
other. So there is no room for the Scheme report.
Barring other unforeseen catastrophes, it will be in the December issue.
A few people have asked me whether page numbers are known, and I expect
they won't be until known until mid-December. I suggest calling Dick
Wexelblat on the phone around that time if you really want to know.
We plan to print this version as an MIT AI memo. I'll make the LaTeX
sources available on MIT-PREP sometime this week.
I'll also US mail hardcopy to the authors. If the Indiana CS department
is interested in issuing it as a new tech report, I'd be happy to mail a
magnetic tape with the sources & DVI file.
Jonathan
∂08-Sep-86 1614 @MC.LCS.MIT.EDU:wagle%iuvax.indiana.edu@CSNET-RELAY.ARPA substring-vector-null-fill!, coliti
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Sep 86 16:14:21 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 8 Sep 86 19:14:47 EDT
Received: from indiana by csnet-relay.csnet id ak01084; 8 Sep 86 16:19 EDT
Date: Mon, 8 Sep 86 13:10:49 est
From: Perry Wagle <wagle%iuvax.indiana.edu@CSNET-RELAY.ARPA>
To: rrrs-authors%mit-mc.CSNET@CSNET-RELAY.ARPA
Subject: substring-vector-null-fill!, coliti
If |(set-car! '(a b) 'c)| is an error, how about |(set-car! '(d e) 'f)|?
That is, when do backquoted expressions denote constants? (I vote never).
[A related question is whether |`(d e)| returns the same list each time it
is executed. I suspect you may want to table the above paragraph.]
Vectors have constant length. Strings have variable length. With this
view it would make sense to "fill" a vector, but not a string.
Perry Wagle, Indiana University, Bloomington Indiana.
...!ihnp4!inuxc!iuvax!wagle (USENET)
wagle@indiana (CSNET)
wagle%indiana@csnet-relay (ARPA)
∂08-Sep-86 2212 @MC.LCS.MIT.EDU:asrivast%tilde%ti-csl.csnet@CSNET-RELAY.ARPA Advising methods in TI Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Sep 86 22:12:23 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 8 Sep 86 23:03:17 EDT
Received: from ti-csl by csnet-relay.csnet id aa02126; 8 Sep 86 18:03 EDT
Received: by tilde id AA26422; Mon, 8 Sep 86 15:25:20 cdt
Date: Mon, 8 Sep 86 15:25:20 cdt
From: Amitabh Srivastava <asrivast%tilde%ti-csl.csnet@CSNET-RELAY.ARPA>
To: schneider%cui.unige.chunet%ubc@CSNET-RELAY.ARPA
Subject: Advising methods in TI Scheme
Cc: scheme%mc.lcs.mit.edu@CSNET-RELAY.ARPA
>> 1) I started writing a program with lots of methods. Now it start loosing
>> "track".
>> -> How can I trace methods in Ti scheme?
>> i.e. is there an elegant way of doing it ?
The procedure %sc-method-env returns the environment containing
the methods of a class. By using this and advise-entry and advise-exit
different tracing macros can be written.
For example, we can write a special form trace-method-entry to trace
the entry of method m1 of class class1.
(trace-method-entry m1 class1)
=>
(macro trace-method-entry
(lambda (e)
(let ((method (cadr e))
(class (caddr e)))
`(ADVISE-ENTRY
(ACCESS ,method (%sc-method-env ,class))
(lambda (p a e)
(writeln " The method " ',method " of class " ',class
" is called with " a))))))
Similarly one can write a macro to trace exits.
- amitabh
∂09-Sep-86 0429 @MC.LCS.MIT.EDU:ramsdell%faron@mitre-bedford.ARPA Slade's book in bib?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Sep 86 04:29:08 PDT
Received: from mitre-bedford.ARPA by MC.LCS.MIT.EDU 9 Sep 86 07:28:53 EDT
Organization: The MITRE Corp., Bedford, MA
Received: by faron.MENET (4.12/4.7)
id AA17988; Tue, 9 Sep 86 07:21:18 edt
Date: Tue, 9 Sep 86 07:21:18 edt
From: John D. Ramsdell <ramsdell%faron@mitre-bedford.ARPA>
Posted-Date: Tue, 9 Sep 86 07:21:18 edt
Message-Id: <8609091121.AA17988@faron.MENET>
To: rrrs-authors%mc.lcs.mit.edu@mitre-bedford.ARPA
Subject: Slade's book in bib?
Maybe Stephen Slade's book on T should be added to
the r↑3rs bibliography. Would some one with access
to it, make a recommendation?
John
∂13-Sep-86 2054 @MC.LCS.MIT.EDU:fowler@rochester.arpa Re: Prolog in Scheme?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 13 Sep 86 20:53:51 PDT
Received: from ur-cayuga.arpa by MC.LCS.MIT.EDU 13 Sep 86 23:35:30 EDT
Received: from ur-seneca.arpa (ur-seneca) by ur-cayuga.arpa id AA08101 (4.12x); Sat, 13 Sep 86 23:09:58 edt
Received: by ur-seneca.arpa id AA05145 (4.12x); Sat, 13 Sep 86 23:11:43 edt
Message-Id: <8609140311.5145@ur-seneca.arpa>
Date: Sat, 13 Sep 86 23:11:43 edt
From: Rob Fowler <fowler@rochester.arpa>
To: scheme@MC.LCS.MIT.EDU, MWILSON%CARLETON.BITNET@WISCVM.WISC.EDU
Cc: Rob Fowler <fowler@rochester.arpa>
Subject: Re: Prolog in Scheme?
If you get any responses I'd appreciate it if you could pass them along to
me. I'm currently teaching an "AI Programming" course entirely in Scheme
using MacScheme and I'd really like to get hld of a Prolog or even a subset
that I could turn the students loose on for a couple of weeks.
-- Rob Fowler (fowler@rochester.edu)
∂14-Sep-86 0204 @MC.LCS.MIT.EDU:MWILSON%CARLETON.BITNET@WISCVM.WISC.EDU Prolog in Scheme?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 14 Sep 86 02:04:32 PDT
Received: from WISCVM.WISC.EDU by MC.LCS.MIT.EDU 13 Sep 86 22:41:47 EDT
Received: from (MWILSON)CARLETON.BITNET by WISCVM.WISC.EDU on 09/11/86
at 09:16:21 CDT
Received: from MWILSON by CARLETON.BITNET on 09 Sep 86 16:08:31 EDT
Date: 08 Sep 86 15:49:00 EDT
From: Mike Wilson <MWILSON%CARLETON.BITNET@WISCVM.WISC.EDU>
To: <scheme@MC.LCS.MIT.EDU>
Subject: Prolog in Scheme?
Hello,
Are there any implementations of Prolog written in Scheme? I'm
interested in any and all versions from minimal to full-featured.
.Mike
∂15-Sep-86 0450 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Prolog in Scheme?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 15 Sep 86 04:50:44 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 15 SEP 86 07:37:08 EDT
Date: Sun, 14 Sep 86 12:34:06 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Prolog in Scheme?
To: fowler@ROCHESTER.ARPA
cc: MWILSON%CARLETON.BITNET@WISCVM.WISC.EDU, scheme@MC.LCS.MIT.EDU
In-reply-to: Msg of Sat 13 Sep 86 23:11:43 edt from Rob Fowler <fowler at rochester.arpa>
Message-ID: <[AI.AI.MIT.EDU].93903.860914.JAR>
Date: Sat, 13 Sep 86 23:11:43 edt
From: Rob Fowler <fowler at rochester.arpa>
If you get any responses I'd appreciate it if you could pass them along to
me. I'm currently teaching an "AI Programming" course entirely in Scheme
using MacScheme and I'd really like to get hld of a Prolog or even a subset
that I could turn the students loose on for a couple of weeks.
Why not just use the query system in Structure & Interpretation?
- Jonathan
∂15-Sep-86 1223 @MC.LCS.MIT.EDU:ramsdell%faron@mitre-bedford.ARPA Begin in the Formal Semantics
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 15 Sep 86 12:23:38 PDT
Received: from mitre-bedford.ARPA by MC.LCS.MIT.EDU 15 Sep 86 15:22:59 EDT
Organization: The MITRE Corp., Bedford, MA
Received: by faron.MENET (4.12/4.7)
id AA16806; Mon, 15 Sep 86 15:15:40 edt
Date: Mon, 15 Sep 86 15:15:40 edt
From: John D. Ramsdell <ramsdell%faron@mitre-bedford.ARPA>
Posted-Date: Mon, 15 Sep 86 15:15:40 edt
Message-Id: <8609151915.AA16806@faron.MENET>
To: rrrs-authors%mc.lcs.mit.edu@mitre-bedford.ARPA
Subject: Begin in the Formal Semantics
Begin is described in the abstract syntax, but there is
no semantic function for it. Later, on page 35, the
semantics of begin is given under the derived expression
types heading. Should begin be described in the abstract
syntax section?
John
∂15-Sep-86 1237 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Begin in the Formal Semantics
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 15 Sep 86 12:36:19 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 15 SEP 86 15:35:43 EDT
Date: Mon, 15 Sep 86 15:38:17 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Begin in the Formal Semantics
To: ramsdell%faron@MITRE-BEDFORD.ARPA
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Mon 15 Sep 86 15:15:40 edt from John D. Ramsdell <ramsdell%faron at mitre-bedford.ARPA>
Message-ID: <[AI.AI.MIT.EDU].94273.860915.JAR>
Date: Mon, 15 Sep 86 15:15:40 edt
From: John D. Ramsdell <ramsdell%faron at mitre-bedford.ARPA>
To: rrrs-authors%mc.lcs.mit.edu at mitre-bedford.ARPA
Re: Begin in the Formal Semantics
Organization: The MITRE Corp., Bedford, MA
Posted-Date: Mon, 15 Sep 86 15:15:40 edt
Message-Id: <8609151915.AA16806@faron.MENET>
Begin is described in the abstract syntax, but there is
no semantic function for it. Later, on page 35, the
semantics of begin is given under the derived expression
types heading. Should begin be described in the abstract
syntax section?
It should be flushed from the abstract syntax. I intended to do this
but only partially succeeded.
Jonathan
∂15-Sep-86 1243 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Begin in the Formal Semantics
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 15 Sep 86 12:42:52 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 15 SEP 86 15:36:31 EDT
Date: Mon, 15 Sep 86 15:39:29 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Begin in the Formal Semantics
To: ramsdell%faron@MITRE-BEDFORD.ARPA
cc: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <[AI.AI.MIT.EDU].94274.860915.JAR>
Date: Mon, 15 Sep 86 15:15:40 edt
From: John D. Ramsdell <ramsdell%faron at mitre-bedford.ARPA>
To: rrrs-authors%mc.lcs.mit.edu at mitre-bedford.ARPA
Re: Begin in the Formal Semantics
Organization: The MITRE Corp., Bedford, MA
Posted-Date: Mon, 15 Sep 86 15:15:40 edt
Message-Id: <8609151915.AA16806@faron.MENET>
Begin is described in the abstract syntax, but there is
no semantic function for it. Later, on page 35, the
semantics of begin is given under the derived expression
types heading. Should begin be described in the abstract
syntax section?
It should be flushed from the abstract syntax. I intended to do this
but only partially succeeded.
Jonathan
∂15-Sep-86 1910 @MC.LCS.MIT.EDU:asrivast%tilde%ti-csl.csnet@CSNET-RELAY.ARPA Advising methods in TI Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 15 Sep 86 19:10:25 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 15 Sep 86 22:06:12 EDT
Received: from ti-csl by csnet-relay.csnet id ag02059; 15 Sep 86 13:20 EDT
Received: by tilde id AA13084; Mon, 15 Sep 86 10:11:25 cdt
Date: Mon, 15 Sep 86 10:11:25 cdt
From: Amitabh Srivastava <asrivast%tilde%ti-csl.csnet@CSNET-RELAY.ARPA>
To: scheme%mc.lcs.mit.edu@CSNET-RELAY.ARPA
Subject: Advising methods in TI Scheme
Cc: shneider%cui.unige.chunet%ubc.csnet@CSNET-RELAY.ARPA
>> 1) I started writing a program with lots of methods. Now it start loosing
>> "track".
>> -> How can I trace methods in Ti scheme?
>> i.e. is there an elegant way of doing it ?
The procedure %sc-method-env returns the environment containing
the methods of a class. By using this and advise-entry and advise-exit
different tracing macros can be written.
For example, we can write a special form trace-method-entry to trace
the entry of method m1 of class class1.
(trace-method-entry m1 class1)
=>
(macro trace-method-entry
(lambda (e)
(let ((method (cadr e))
(class (caddr e)))
`(ADVISE-ENTRY
(ACCESS ,method (%sc-method-env ,class))
(lambda (p a e)
(writeln " The method " ',method " of class " ',class
" is called with " a))))))
Similarly one can write a macro to trace exits.
- amitabh
∂17-Sep-86 1224 @MC.LCS.MIT.EDU:prlb2!vauclair@seismo.CSS.GOV Request for information on new releases.
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 17 Sep 86 12:19:53 PDT
Received: from seismo.CSS.GOV by MC.LCS.MIT.EDU 17 Sep 86 15:15:29 EDT
Return-Path: <prlb2!vauclair>
Received: from prlb2.UUCP by seismo.CSS.GOV with UUCP; Wed, 17 Sep 86 11:27:06 EDT
Received: by prlb2.UUCP (4.12/4.7)
id AA04826; Wed, 17 Sep 86 17:24:59 -0100
Received: by prlb2.UUCP (4.12/4.7)
id AA04820; Wed, 17 Sep 86 17:24:41 -0100
Message-Id: <8609171624.AA04820@prlb2.UUCP>
To: scheme@mc.lcs.mit.edu
Cc: prlb2!louis@seismo.CSS.GOV
Subject: Request for information on new releases.
Organisation: Philips Research Laboratory Brussels, Belgium
Uucp-From: mvauclair@prlb2.UUCP
Date: 17 Sep 86 17:24:35 N (Wed)
From: Marc Vauclair <prlb2!vauclair@seismo.CSS.GOV>
First, sorry for sending this request to scheme@mit-mc instead of
scheme-team@mit-mc but when trying the last address I got the message
reproduced at the end of this one.
For more than a year by now, we are using the MIT Scheme implementation
(Microcode version 6.1, Runtime version 11.2) on our Vax with Unix 4.2. In few
words, we greatly appreciate both the language and its implementation. There
are only two dark spots :
- the lack of documentation of the implementation (the only
documentation I have at my disposition are the "Structure and
Interpretation..." book and the revised revised report
- the slowness of the terminal i/o and in some circumstances of the
interpreter itself.
Is a newer version for VAX Unix available ? Does it include a compiler ? Is a
version for SUN 3 available ? How can we get these new versions ? Is it
possible to get some documentation on the implementation ?
Regards,
Marc.
[*][*][*][*][*][*][*][*][*][*][*][*][*][*][*][*][*][*][*][*][*][*][*][*][*]
From: Communications Satellite <seismo!MC.LCS.MIT.EDU!COMSAT>
Subject: Msg of Wednesday, 17 September 1986 06:35-EDT
To: "prlb2!vauclair@seismo.CSS.GOV"
Message-Id: <[MC.LCS.MIT.EDU].88830.860917>
============ A copy of your message is being returned, because: ============
"SCHEME-TEAM" at MC.LCS.MIT.EDU is an unknown recipient.
============ Failed message follows: ============
Received: from seismo.CSS.GOV by MC.LCS.MIT.EDU 17 Sep 86 06:35:14 EDT
Return-Path: <prlb2!vauclair>
Received: from prlb2.UUCP by seismo.CSS.GOV with UUCP; Wed, 17 Sep 86 06:15:00 EDT
Received: by prlb2.UUCP (4.12/4.7)
id AA26873; Wed, 17 Sep 86 11:28:57 -0100
Received: by prlb2.UUCP (4.12/4.7)
id AA26863; Wed, 17 Sep 86 11:28:23 -0100
Message-Id: <8609171028.AA26863@prlb2.UUCP>
To: scheme-team@mit-mc.arpa
Cc: prlb2!louis@seismo.CSS.GOV
Subject: Request for information on new releases.
Organisation: Philips Research Laboratory Brussels, Belgium
Uucp-From: mvauclair@prlb2.UUCP
Date: 17 Sep 86 11:27:54 N (Wed)
From: Marc Vauclair <prlb2!vauclair@seismo.CSS.GOV>
∂22-Sep-86 1441 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Revised↑3 Report on Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 22 Sep 86 14:41:18 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 22 SEP 86 17:37:29 EDT
Date: Mon, 22 Sep 86 17:39:42 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Revised↑3 Report on Scheme
To: scheme@MC.LCS.MIT.EDU
Message-ID: <[AI.AI.MIT.EDU].97185.860922.JAR>
Announcement:
The "Revised↑3 Report on the Algorithmic Language Scheme" has been
completed. It is an updated version of the "Revised Revised Report on
Scheme" which appeared in summer 1985. A draft of this report was
circulated at the Lisp and Functional Programming Conference last month;
the final version is practically the same as that draft.
The "Revised↑3 Report" will appear in SIGPLAN notices in December of
this year. It will also be printed as MIT AI Memo 848a and as an
Indiana University CSD technical report. I'll send a separate message
as soon as I receive ordering information from MIT's publications
office, so everyone who wants one can get one.
- Jonathan Rees
∂24-Sep-86 0739 @MC.LCS.MIT.EDU:DLW@ALDERAAN.SCRC.Symbolics.COM [MWILSON%CARLETON.BITNET@WISCVM.WISC.EDU: Prolog in Scheme?]
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 24 Sep 86 07:39:12 PDT
Received: from ALDERAAN.SCRC.Symbolics.COM by MC.LCS.MIT.EDU 24 Sep 86 10:34:13 EDT
Received: from CHICOPEE.SCRC.Symbolics.COM by ALDERAAN.SCRC.Symbolics.COM via CHAOS with CHAOS-MAIL id 6731; Wed 24-Sep-86 10:32:24 EDT
Date: Wed, 24 Sep 86 10:36 EDT
From: Daniel L. Weinreb <DLW@ALDERAAN.SCRC.Symbolics.COM>
Subject: [MWILSON%CARLETON.BITNET@WISCVM.WISC.EDU: Prolog in Scheme?]
To: Scheme@MIT-MC.ARPA
In-Reply-To: <860915140445.8.SGR@GROUSE.SCRC.Symbolics.COM>
Message-ID: <860924103627.1.DLW@CHICOPEE.SCRC.Symbolics.COM>
Date: Mon, 15 Sep 86 14:04 EDT
From: Stephen G. Rowley <SGR@STONY-BROOK.SCRC.Symbolics.COM>
Answers, if any, to the Scheme mailing list at MIT:
Date: 08 Sep 86 15:49:00 EDT
From: Mike Wilson <MWILSON%CARLETON.BITNET@WISCVM.WISC.EDU>
To: <scheme@MC.LCS.MIT.EDU>
Subject: Prolog in Scheme?
Hello,
Are there any implementations of Prolog written in Scheme? I'm
interested in any and all versions from minimal to full-featured.
.Mike
It would likewise be interesting to know if there are any versions of
Scheme written in Prolog.
∂24-Sep-86 0936 @MC.LCS.MIT.EDU:searfus@lll-icdc.arpa please add me ...
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 24 Sep 86 09:36:12 PDT
Received: from lll-icdc.arpa by MC.LCS.MIT.EDU 24 Sep 86 12:31:11 EDT
Date: 24 Sep 86 07:50:00 PDT
From: "Searfus, Robert" <searfus@lll-icdc.arpa>
Subject: please add me ...
To: "scheme" <scheme@mc.lcs.mit.edu>
Reply-To: "Searfus, Robert" <searfus@lll-icdc.arpa>
to the scheme mailing list.
<bob> searfus@lll-icdc.arpa
------
∂25-Sep-86 0750 @MC.LCS.MIT.EDU:TIM@cis.upenn.edu prolog in scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 25 Sep 86 07:50:23 PDT
Received: from linc.cis.upenn.edu by MC.LCS.MIT.EDU 25 Sep 86 09:53:06 EDT
Posted-Date: Thu, 25 Sep 86 09:42 EDT
Message-Id: <8609251352.AA02609@linc.cis.upenn.edu>
From: Tim Finin <Tim@cis.upenn.edu>
Subject: prolog in scheme
To: scheme@mc.lcs.mit.edu
Date: Thu, 25 Sep 86 09:42 EDT
We tried using the query system in "Structure & Interpretation" in our
freshman class last year and found it wanting in some respects. (1) It
doesn't handle disjunctions unless the disjuncts contain the same variables.
(2) It is extremely slow. We were using it in TI's PC Scheme on AT's. We
gave some very simple logic programming problems (e.g. the standard kinship
relations) and found that the students we spending 10 or 15 minutes waiting
for the query system to finish! They found this very frustrating.
I'd think I would like to cover the query system from S&I in class because
it's clear and simple and have the students use a more suped-up version that
is reasonably efficient. In addition, facilities like "retract",
"reconsult", etc. would easy it's use in homeworks.
I'd also like to consider using a system which uses a prolog-like
depth-first backtracking search.
Tim
∂25-Sep-86 1309 @MC.LCS.MIT.EDU:JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU prolog in scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 25 Sep 86 13:08:50 PDT
Received: from OZ.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 25 SEP 86 14:48:06 EDT
Date: 25 Sep 1986 13:27 EDT (Thu)
Message-ID: <JINX.12241791234.BABYL@MIT-OZ>
From: Bill Rozas <JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU>
To: Tim Finin <Tim@CIS.UPENN.EDU>
Cc: scheme@MC.LCS.MIT.EDU
Subject: prolog in scheme
In-reply-to: Msg of 25 Sep 1986 09:42-EDT from Tim Finin <Tim at cis.upenn.edu>
We tried using the query system in "Structure & Interpretation" in our
freshman class last year and found it wanting in some respects. (1) It
doesn't handle disjunctions unless the disjuncts contain the same variables.
(2) It is extremely slow. We were using it in TI's PC Scheme on AT's. We
gave some very simple logic programming problems (e.g. the standard kinship
relations) and found that the students we spending 10 or 15 minutes waiting
for the query system to finish! They found this very frustrating.
(1) GJS consistently updates the query language and fixes versions as bugs
appear. You should get in touch with him, the bug may have been
fixed.
(2) I have observed this also on MacScheme. I don't know about PC
Scheme, but in the case of MacScheme the reason is probably that
streams have no interpreter support, they are written in scheme. This
is unlike MIT Scheme, for which the code was originally written. PC
Scheme may have the same problem. While it is not blindingly fast on
our machines at MIT, it only becomes slow with relatively complicated
programs, and is adequately fast for the class. 10 or 15 mins. is way
longer than I've ever seen it take while solving the S&ICP problems.
∂28-Sep-86 0818 @MC.LCS.MIT.EDU:jeff%aiva.edinburgh.ac.uk@Cs.Ucl.AC.UK Prolog in Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 28 Sep 86 08:18:29 PDT
Received: from Cs.Ucl.AC.UK by MC.LCS.MIT.EDU 28 Sep 86 11:14:15 EDT
Received: from vax1.cs.ucl.ac.uk by mv1.Cs.Ucl.AC.UK via Ethernet with SMTP
id ab02098; 28 Sep 86 16:06 WET
Received: from 44d.cs.ucl.ac.uk by vax1.Cs.Ucl.AC.UK with SMTP id a001696;
28 Sep 86 16:12 BST
Received: from aiva.edinburgh.ac.uk by 44d.Cs.Ucl.AC.UK via Janet with NIFTP
id a009979; 28 Sep 86 16:07 BST
From: Jeff Dalton <jeff%aiva.edinburgh.ac.uk@Cs.Ucl.AC.UK>
Date: Sun, 28 Sep 86 16:04:02 -0100
Message-Id: <28548.8609281504@aiva.ed.ac.uk>
To: scheme@mc.lcs.mit.edu
Subject: Prolog in Scheme
Unfortunately, the query system in Structure and Interpretation is
not Prolog. In particular, it doesn't handle cut. While this
may not metter much to some (especially those who think cut should
be fluched anyway), it does make the system considerably
less interesting as an implementation of Prolog.
∂30-Sep-86 0507 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA Refering to the Revised↑3 Report on Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 30 Sep 86 05:07:06 PDT
Received: from mitre-bedford.ARPA by MC.LCS.MIT.EDU 30 Sep 86 08:03:09 EDT
Organization: The MITRE Corp., Bedford, MA
Received: by linus.MENET (1.1/4.7)
id AA02723; Tue, 30 Sep 86 08:04:40 EDT
Date: Tue, 30 Sep 86 08:04:40 EDT
From: John D. Ramsdell <ramsdell%linus@mitre-bedford.ARPA>
Posted-Date: Tue, 30 Sep 86 08:04:40 EDT
Message-Id: <8609301204.AA02723@linus.MENET>
To: scheme%mc.lcs.mit.edu@mitre-bedford.ARPA
Subject: Refering to the Revised↑3 Report on Scheme
I've seen "The Revised Revised Report on Scheme or
An UnCommon Lisp" referenced as "R3S". I would like
to discourage this and suggest using "RRRS" or "R2RS".
The "Revised↑3 Report on the Algorithmic Language Scheme"
will be in December SIGPLAN. The obvious reference is
"R3RS" which is why I would like to discourge the use
of "R3S" for the UnCommon Lisp report.
John
∂01-Oct-86 1416 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU R↑3RS sources
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 1 Oct 86 14:16:32 PDT
Received: from LIVE-OAK.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 1 OCT 86 15:44:25 EDT
Received: from ROCKY-GRAZIANO.LCS.MIT.EDU by MIT-LIVE-OAK.ARPA via CHAOS with CHAOS-MAIL id 11868; Wed 1-Oct-86 15:44:55-EDT
Date: Wed, 1 Oct 86 15:44 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: R↑3RS sources
To: rrrs-authors@MC.LCS.MIT.EDU
cc: carr@UTAH-ORION.ARPA
Message-ID: <"861001154411.1.jar@AI"@ROCKY-GRAZIANO.LCS.MIT.EDU>
Those of you with Internet FTP capabilities should now be able to get
the report sources from MIT-PREP. Login as user scheme password scheme,
and get the file
/scheme/r3rs.tar
if you can use a unix tar file, otherwise get all the files in the
directory "/scheme/documentation/r3rs".
∂02-Oct-86 0803 @MC.LCS.MIT.EDU:GOERZ@SUMEX-AIM.ARPA Lost mail
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 2 Oct 86 08:03:29 PDT
Received: from SUMEX-AIM.ARPA by MC.LCS.MIT.EDU 2 Oct 86 10:58:19 EDT
Date: Thu 2 Oct 86 07:56:36-PDT
From: Gunther Goerz <GOERZ@SUMEX-AIM.ARPA>
Subject: Lost mail
To: scheme@MC.LCS.MIT.EDU
cc: Goerz@SUMEX-AIM.ARPA
Message-ID: <12243598741.13.GOERZ@SUMEX-AIM.ARPA>
Unformtunately I made the big mistake to erase the SCHEME mail between
Aug. 4 and Sep. 30 before having read it. As completely.
As there were some very interesting items on the list, let me please
ask you whether there is a simple way to remail the stuff to me.
Sorry for the inconvenience, it was just my fault!
---Guenther
-------
∂02-Oct-86 1013 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Lost mail
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 2 Oct 86 10:13:06 PDT
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 2 OCT 86 11:35:37 EDT
Date: Thu, 2 Oct 86 11:36:35 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Lost mail
To: GOERZ@SUMEX-AIM.ARPA
cc: scheme@MC.LCS.MIT.EDU
In-reply-to: Msg of Thu 2 Oct 86 07:56:36-PDT from Gunther Goerz <GOERZ at SUMEX-AIM.ARPA>
Message-ID: <[AI.AI.MIT.EDU].101186.861002.JAR>
Use FTP. Connect to MIT-MC, use an arbitrary user name and password,
and get the file LSPMAI; SCHEME MAIL. (Note that the file name has
spaces in it.)
You can send questions like this to Scheme-Request@MC.
Jonathan
∂02-Oct-86 1114 @MC.LCS.MIT.EDU:mohammad%utah-orion@utah-cs.arpa Can anyone hear me?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 2 Oct 86 11:14:44 PDT
Received: from utah-cs.ARPA by MC.LCS.MIT.EDU 2 Oct 86 11:42:10 EDT
Received: by utah-cs.ARPA (5.31/4.40.2)
id AA24166; Thu, 2 Oct 86 09:41:35 MDT
Received: by utah-orion.ARPA (5.31/4.40.2)
id AA24813; Thu, 2 Oct 86 09:41:32 MDT
Date: Thu, 2 Oct 86 09:41:32 MDT
From: mohammad%utah-orion@utah-cs.arpa (Mohammad Pourheidari)
Message-Id: <8610021541.AA24813@utah-orion.ARPA>
To: scheme@mc.lcs.mit.edu
Subject: Can anyone hear me?
Hello, My name is Mohammad Pourheidari. I am a member of PASS group down
at the University of Utah. I have made a couple of attempts to get a hold of
Dr. Henry Lieberman; unfortunately both times unsuccessful. The net address
I have been using is : henry@mit-mc. Can anyone tell me whether this is the
best place to send him mail, or even better can anyone tell me what is the
best way to get a hold of him.
Thank you,
Mohammad
∂02-Oct-86 1714 @MC.LCS.MIT.EDU:zorn@kim.Berkeley.EDU I am interested in gathering `significant' Scheme programs...
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 2 Oct 86 17:14:00 PDT
Received: from kim.Berkeley.EDU by MC.LCS.MIT.EDU 2 Oct 86 20:08:30 EDT
Received: by kim.Berkeley.EDU (5.53/1.17)
id AA01376; Thu, 2 Oct 86 17:08:00 PDT
Message-Id: <8610030008.AA01376@kim.Berkeley.EDU>
To: scheme@mc.lcs.mit.edu
Subject: I am interested in gathering `significant' Scheme programs...
Date: Thu, 02 Oct 86 17:07:57 PDT
From: Benjamin Zorn <zorn@kim.Berkeley.EDU>
My name is Ben Zorn, and I'm working on the SPUR Multiprocessor Lisp
system at UC Berkeley. My particular interest is multiprocessor
garbage collection. My current plans include taking `significant'
Scheme programs and studying the object manipulation behavior that
they have. By significant, I mean programs that are large enough to
generate reasonable amounts of garbage, and are also considered to be
important programs that are frequently used. Multiprocessor programs
would be of even more interest to me. If you have publically
available programs that would be of interest to me, I would greatly
appreciate hearing from you. I will make a list of the replies
available to this mailing list in a few weeks.
-Ben Zorn (zorn@kim.berkeley.edu)
∂06-Oct-86 2336 @MC.LCS.MIT.EDU:dan%umass-boston.csnet@CSNET-RELAY.ARPA SCHEME implementations
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 6 Oct 86 23:36:36 PDT
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 7 Oct 86 02:25:36 EDT
Received: from umass-boston by csnet-relay.csnet id ab00520; 6 Oct 86 17:08 EDT
Received: by umb.csnet (4.12/4.7)
id AA11551; Mon, 6 Oct 86 17:01:38 edt
Date: Mon, 6 Oct 86 17:01:38 edt
From: Dan Stefanescu <dan%umass-boston.csnet@CSNET-RELAY.ARPA>
To: scheme%MC.LCS.MIT.EDU@RELAY.CS.NET
Subject: SCHEME implementations
Cc: dan@UMASS-BOSTON.CSNET
Are there any for AT&T hardware, in particular for UNIX PC's and
AT&T 3B2-400 machines ? Any pointers will be greatly appreciated.
Dan
∂15-Oct-86 0606 @MC.LCS.MIT.EDU:ramsdell%faron@mitre-bedford.ARPA Object-Oriented Schemes
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 15 Oct 86 06:06:22 PDT
Received: from mitre-bedford.ARPA by MC.LCS.MIT.EDU 15 Oct 86 08:57:28 EDT
Organization: The MITRE Corp., Bedford, MA
Received: by faron.MENET (4.12/4.7)
id AA01933; Wed, 15 Oct 86 08:51:14 edt
Date: Wed, 15 Oct 86 08:51:14 edt
From: John D. Ramsdell <ramsdell%faron@mitre-bedford.ARPA>
Posted-Date: Wed, 15 Oct 86 08:51:14 edt
Message-Id: <8610151251.AA01933@faron.MENET>
To: scheme%mc.lcs.mit.edu@mitre-bedford.ARPA
Subject: Object-Oriented Schemes
Cc: ramsdell@mitre-bedford.ARPA
I am wondering if people on this list would
like to discuss Object-Oriented Schemes.
Three implementations come to mind at this time.
The oldest I know about is T[1]. TI has put its
Object-Oriented system called SCOOPS in the public
domain, as is T. I have had no experience with
SCOOPS. Oaklisp[2] adds to the T idea of first
class objects and operations, the idea of first
class types. I'm not sure what this contributes.
Are there any other implementations you would
like to discuss?
John
[1] Rees, J. & N. Adams IV, "T: a dialect of Lisp or,
Lambda: the ultimate software tool", 1982 Lisp and
Functional Programming, August 1982.
[2] Lang, K. & B. Pearlmutter, "Oaklisp: an
Object-Oriented Scheme with First Class Types",
OOPSLA '86, Sep-Oct 1986.
∂16-Oct-86 1410 @MC.LCS.MIT.EDU:jeff%aiva.edinburgh.ac.uk@Cs.Ucl.AC.UK Public Domain
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 16 Oct 86 14:10:04 PDT
Received: from Cs.Ucl.AC.UK by MC.LCS.MIT.EDU 16 Oct 86 16:05:42 EDT
Received: from vax1.cs.ucl.ac.uk by mv1.Cs.Ucl.AC.UK via Ethernet with SMTP
id aa03935; 16 Oct 86 19:28 WET
Received: from 44d.cs.ucl.ac.uk by vax1.Cs.Ucl.AC.UK with SMTP id a006787;
16 Oct 86 19:43 BST
Received: from aiva.edinburgh.ac.uk by 44d.Cs.Ucl.AC.UK via Janet with NIFTP
id a006756; 16 Oct 86 19:43 BST
From: Jeff Dalton <jeff%aiva.edinburgh.ac.uk@Cs.Ucl.AC.UK>
Date: Thu, 16 Oct 86 19:43:23 -0100
Message-Id: <5570.8610161843@aiva.ed.ac.uk>
To: scheme@mc.lcs.mit.edu
Subject: Public Domain
Date: Wed, 15 Oct 86 08:51:14 edt
From: "John D. Ramsdell" <ramsdell%faron@arpa.mitre-bedford>
To: scheme <scheme%edu.mit.lcs.mc@arpa.mitre-bedford>
Subject: Object-Oriented Schemes
I am wondering if people on this list would
like to discuss Object-Oriented Schemes.
Three implementations come to mind at this time.
The oldest I know about is T[1]. TI has put its
Object-Oriented system called SCOOPS in the public
domain, as is T.
Well, I would like to discuss such things, but what I'd like to know
at the moment is this: is T now in the public domain? How might I
obtain a copy of it or of SCOOPS.
I'm sorry if this isn't the proper forum for such questions, but
my options seem somewhat limited from here.
-- Jeff
P.S. I do have a t2.8, with licence. Am I now free to copy it
to other machines?
∂20-Oct-86 0417 @MC.LCS.MIT.EDU:ramsdell%faron@mitre-bedford.ARPA Re: Public Domain
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 20 Oct 86 04:17:37 PDT
Received: from mitre-bedford.ARPA by MC.LCS.MIT.EDU 20 Oct 86 07:12:26 EDT
Organization: The MITRE Corp., Bedford, MA
Received: from faron.MENET by linus.MENET (1.1/4.7)
id AA26459; Mon, 20 Oct 86 07:14:57 EDT
Received: by faron.MENET (4.12/4.7)
id AA07286; Mon, 20 Oct 86 07:06:48 edt
Date: Mon, 20 Oct 86 07:06:48 edt
From: John D. Ramsdell <ramsdell%faron@mitre-bedford.ARPA>
Posted-Date: Mon, 20 Oct 86 07:06:48 edt
Message-Id: <8610201106.AA07286@faron.MENET>
To: jeff%aiva.edinburgh.ac.uk@Cs.Ucl.AC.UK, scheme@mc.lcs.mit.edu
Subject: Re: Public Domain
The best way to find out the status of the
T project is to write to one of the following address:
t-project@yale.ARPA
decvax!yale!t-poject.UUCP
tproj@YALECS.BITNET
John
∂20-Oct-86 1205 @MC.LCS.MIT.EDU:mhwu%hplmhw@hplabs.HP.COM [harris@hplwhh: Re: [ramsdell%faron@mitre-bedford.ARPA: Object-Oriented Schemes]]
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 20 Oct 86 12:05:45 PDT
Received: from hplabs.HP.COM by MC.LCS.MIT.EDU 20 Oct 86 14:18:03 EDT
Received: from hplmhw by hplabs.HP.COM ; Mon, 20 Oct 86 11:16:01 pdt
Received: by hplmhw ; Mon, 20 Oct 86 10:55:43 pdt
Date: Mon, 20 Oct 86 10:55:43 pdt
From: Henry M. Wu <mhwu%hplmhw@hplabs.HP.COM>
Message-Id: <8610201755.AA00122@hplmhw>
To: scheme@mit-mc
Subject: [harris@hplwhh: Re: [ramsdell%faron@mitre-bedford.ARPA: Object-Oriented Schemes]]
From: Warren Harris <harris@hplabs>
Date: Wed, 15 Oct 86 16:56:50 PDT
Subject: Re: [ramsdell%faron@mitre-bedford.ARPA: Object-Oriented Schemes]
To: mhwu@hplabs
In-Reply-To: Your message of 15-Oct-86 13:34:39
X-Mailer: NMail [$Revision: 2.6 $]
Henry:
Please forward my interest in object-oriented extensions to scheme.
I am familiar with scoops and have a paper describing the system's many
shortcommings.
Warren Harris
-------
∂27-Oct-86 1824 @MC.LCS.MIT.EDU:brooks%home%ti-csl.csnet@CSNET-RELAY.ARPA Multiple Values: A Survey
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 27 Oct 86 18:24:23 PST
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 27 Oct 86 21:21:24 EST
Received: from ti-csl by csnet-relay.csnet id ag12153; 27 Oct 86 18:08 EST
Received: from (home.ARPA) by tilde id AA25293; Mon, 27 Oct 86 16:12:30 cst
Received: by id AA29154; Mon, 27 Oct 86 16:08:57 cst
Date: Mon, 27 Oct 86 16:08:57 cst
From: Gary Brooks <brooks%home%ti-csl.csnet@CSNET-RELAY.ARPA>
Message-Id: <8610272208.AA29154@>
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: Multiple Values: A Survey
Multiple Values: A Survey
--------------------------
The current proposal (from Will's lunch minutes) for multiple return
values consists of the two functions:
(receive-values <fcn> <mv-thunk>)
which applies <fcn> to the multiple values returned by <mv-thunk>. And:
(return <v1> ... <vN>) or
(values <v1> ... <vN>)
which returns the values <v1> ... <vN>.
Also, in the semantics there is an auxiliary function single, which
currently raises an error if multiple values are returned. Question (3)
deals with issue of making the auxiliary function available in the
language and questions (7) and (10) indirectly deal with the semantics
for single.
1) Syntactic questions:
1a) What argument order do we want for receive-values?
1b) Do we want to use a different name for receive-values? Eg.
Multiple-value-call, multiple-value-apply, or something else?
1c) What name do we want for the multiple value return construct?
Return, values, something else?
2) Do we want receive-values and return to be essential or
non-essential?
3) Do we want to incorporate the auxiliary semantic function single
into the language (see also (6b)) as:
(single <mv-thunk>)
such that
(single (lambda () (return <v1> ... <vN>))) => <v1>.
Should it be essential or non-essential?
4) Should receive-values allow multiple multiple-value-thunks in a manner
similar to Common Lisp's multiple-value-call? That is all the values
from the various multiple-value-thunks would be "concatenated" before
being passed to the function.
5) Interaction with call-with-current-continuation. How are multiple
values returned from a continuation? Presumably,
(call/cc
(lambda (cont)
...
(cont (return <v1> ... <vN>))))
does not work since the (return <v1> ... <vn>) is in argument position.
Furthermore, I presume that
(call/cc
(lambda (k)
(receive-values
k
(lambda () (return <v1> ... <vN>)))))
won't work, since the escape procedure generated by call/cc is a
"function" of one argument, which would make the above application of
receive-values analogous to:
(receive-values (lambda (x) ...)
(lambda () (return <v1> ... <vN>)))
which (presumably) is an error.
5a) Modify continuations to take a variable number of arguments that
are returned as the multiple values of the continuation. Eg.
(k <v1> ... <vN>)
5b) Add a new procedure called
call-with-multiple-values-current-continuation (or call/mv/cc for short)
that takes a function of one argument, a multiple value escape
procedure. The escape procedure takes a thunk as an argument and
transmits the values returned by the thunk. Eg.
(call/mv/cc
(lambda (k)
(k (lambda () (return <v1> ... <vN>)))))
5c) Somehow modify the existing version of call/cc so that when the
escape procedure k is invoked, (k v) returns v and
(receive-values k (lambda () (return <v1> .. <vN>)
returns <v1> ... <vn>.
5d) Somehow modify multiple values so that they can be cohesively
returned in argument position. I.e. so (cont (return <v1> ... <vN>)
would work. (See Opinion message.)
5e) Something else?
6) What forms pass multiple values through?
More likely than not the following (relatively) tail recursive forms
pass back multiple values.
6a) Do LAMBDA, LET and LETREC pass back multiple values from their
bodies?
6b) Do IF, COND and CASE pass back multiple values from the arms of
the conditional?
6c) Does explicit and implicit BEGIN blocks pass back multiple values
from the last form in the block?
But what about other forms?
6d) Does DO pass back multiple values from the last form in the exit
clauses?
6e) Do AND and OR pass back multiple values from the last form? Or
in OR's case from any form?
6f) Can FORCE return multiple values? (If so how is DELAY
implemented (i.e. how is make-promise written))
6g) What other forms pass back multiple values?
6h) Are there any forms that never pass back multiple values?
7) What happens when multiple values are returned to a context which
doesn't expect them as in predicate position within a conditional or
argument position within an application. For example:
(if (return v1 ... VN)
<then>
<else>)
or
(f (return v1 ... VN) ...)
7a) Coerce the multiple values to a single value as in Common Lisp.
7b) Instantiate a (first class) multiple values object (see Opinion
message)
7c) It would be an error.
7d) An error would be signaled.
7e) Other?
8) Do we want to augment existing binding forms (let, let* letrec) to
destructure multiple values or introduce a multiple value version for
each binding form, or not include such a capability? In each of the
following examples, b1 would be bound to <v1> ... and bN to VN. Which
is preferred?
8a) (let (((b1 ... bN) ;; i.e. ((ids*) <exp>)
(return <v1> ... <vN>))
<other-bindings>)
<body>)
or (perhaps)
8b) (multiple-value-let or (8c) (multiple-value-let
(b1 ... bN) (((b1 ... bN)
(return <v1> ... <vN>) (return <v1> ... <vN>))
<body>) <other-bindings>)
<body>)
or
8d) other
Should (a)-(d) (if any) be essential or non-essential?
9) Similarly, do we want to augment set! and define to accept multiple
values, define new versions of these constructs or not include these
constructs? (In the case of define, augmentation would be incompatible
with the non essential forms of define.) Do we want to make this
essential or non-essential syntax? In the case of set!, which of the
following is preferred?
9a) (set! (id1 ... idN) (return <v1> ... <vN>))
And (b) or (c) for define.
or
9b) (multiple-value-set! (id1 ... idN) (return <v1> ... <vN>))
(multiple-value-define (id1 ... idN) (return <v1> ... <vN>))
or
9c) (multiple-value-set! id1 ... idN (return <v1> ... <vN>))
(multiple-value-define id1 ... idN (return <v1> ... <vN>))
or
9d) other
10) For those constructs that expect multiple values (presumably,
receive-values, multiple-value-let, multiple-value-let*,
multiple-value-letrec, and multiple-value-set!) what happens when too
few or too many values are returned. For example in:
(multiple-value-let
(((Id1 ... IdM) (return <v1> ... <vN>)))
<body>)
M arguments are expected and N arguments are returned.
10a) N > M More values returned than expected.
1) Ignore extra values.
2) It is an error.
3) An error is signaled.
4) other.
10b) M > N More values expected than returned.
1) Return as many as needed additional default values.
2) It is an error.
3) An error is signaled.
4) other.
11) What (if any) other constructs do we want for returning multiple
values? What should their names be? Do we want a thunk or an
expression for the multiple values form (see (6c)). Should these
constructs be essential or non-essential?
11a) the equivalent of (receive-values (lambda x x) <mv-form>)
1) (multiple-value-list <mv-thunk>) or
2) (values->list <mv-thunk>) or
3) none
4) other
11b) The equivalent of (apply values <list>)
1) (values-list <list>)
2) (list->values <list>)
3) none
4) other
11c) The equivalent of
(receive-values (lambda x (list->vector x)) <mv-form>)
1) (multiple-value-vector <mv-thunk>) or
2) (values->vector <mv-thunk>) or
3) none
4) other
11d) The equivalent of (apply values (vector->list <vector>))
1) (values-vector <vector>)
2) (vector->values <vector>)
3) none
4) other
11e) Any others?
∂27-Oct-86 1859 @MC.LCS.MIT.EDU:brooks%home%ti-csl.csnet@CSNET-RELAY.ARPA Multiple Values
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 27 Oct 86 18:58:50 PST
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 27 Oct 86 21:15:18 EST
Received: from ti-csl by csnet-relay.csnet id af12153; 27 Oct 86 18:08 EST
Received: from (home.ARPA) by tilde id AA25245; Mon, 27 Oct 86 16:11:46 cst
Received: by id AA29149; Mon, 27 Oct 86 16:08:22 cst
Date: Mon, 27 Oct 86 16:08:22 cst
From: Gary Brooks <brooks%home%ti-csl.csnet@CSNET-RELAY.ARPA>
Message-Id: <8610272208.AA29149@>
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: Multiple Values
I'd like to see a consensus emerge on multiple values. To that end I
have summarized the existing proposal and questions from Will's lunch
minutes and added a number of other questions and issues. As the text
of these questions and issues is somewhat long (280 lines) I have
submitted it in a separate message entitled "Multiple Values: A Survey".
Also, since my own responses to the survey depend on a particular view
of multiple values, I have submitted yet another message explaining my
views on these issues and my response to the survey. The latter message
is entitled "Multiple values: An Opinion". Enjoy!
-- brooks
∂27-Oct-86 2205 @MC.LCS.MIT.EDU:brooks%home%ti-csl.csnet@CSNET-RELAY.ARPA Multiple Values: An Opinion
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 27 Oct 86 22:04:37 PST
Received: from CSNET-RELAY.ARPA by MC.LCS.MIT.EDU 28 Oct 86 01:03:52 EST
Received: from ti-csl by csnet-relay.csnet id ah12153; 27 Oct 86 18:09 EST
Received: from (home.ARPA) by tilde id AA25301; Mon, 27 Oct 86 16:13:04 cst
Received: by id AA29167; Mon, 27 Oct 86 16:09:35 cst
Date: Mon, 27 Oct 86 16:09:35 cst
From: Gary Brooks <brooks%home%ti-csl.csnet@CSNET-RELAY.ARPA>
Message-Id: <8610272209.AA29167@>
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: Multiple Values: An Opinion
Multiple Values: An Opinion
----------------------------
Values Objects
--------------
My view on multiple values is based on the principle that everything in
the language should be first class. For multiple values I postulate an
*IMMUTABLE* values object type. Values objects are created by the
values function. So,
(values <v0> ... <vN>)
creates a values object with values <v0> ... <vN>. Since values
objects are first class objects it would makes sense to bind a values
object to a (single) variable or cons up multiple value objects in a
list.
Components of a values object can be explicitly extracted with the
values-ref function. Like vectors, values object indexing is 0-based:
So,
(values-ref (values <v0> ... <vI> ... <vN>) I) ==> <vI>
Note that the function single can be simply defined as:
(lambda (vals) (values-ref vals 0))
The number of values in a values object can be computed with the
function values-length. Eg.
(values-length (values <v0> ... <vN>)) ==> N+1
Lastly, values objects can be identified by the predicate values?.
Values Objects and Identity
---------------------------
Since values objects are immutable they are intentionally
(operationally) identical (eqv?) if they have the same number of values
and if all the values are intentionally identical. Thus,
(eqv? (values <x1> <x2>) (values <y1> <y2>)) ==> #T
iff (eqv? <x1> <y1>) ==> #T and
(eqv? <x2> <y2>) ==> #T
Because of their immutability, The extensional identity (eq?-ness) of
multiple values is left unspecified. The contention here is that asking
the eq?-ness of values objects is uninteresting (maybe even
meaningless). It would be analogous to asking whether two bignums are
eq?.
Returning Values Objects
------------------------
A Values object is returned (directly or indirectly through a
continuation) just like any other type of object is returned.
Applying Functions to Values Objects
------------------------------------
Multiple-value-call takes a function and an expression which evaluates
to a values object and applies the function to the values in the values
object.
(multiple-value-call (lambda (x y) (+ x y)) (values 1 2)) => 3
Also, LAMBDA is augmented so that a lambda expression with a single
(unparenthesized) formal parameter (eg. (lambda x x)) is applied via
multiple-value-call, the formal parameter is bound to a values object of
all the actual parameters (Note BVL). Thus,
(multiple-value-call (lambda x x) (values 1 2)) <=> (values 1 2)
(Note: In (apply (lambda x x) ...), x would get bound to a list,
while in (multiple-value-call (lambda x x) ...), x would get bound to a
values object. I'm not enthused about the overloading of the single
unparenthesized bvl variable, but could not think of better syntax.)
Summary
-------
First class multiple values, values objects, are desirable for several
reasons:
1) It simplifies specifying which forms pass multiple values
through. Simply put, multiple values are passed through any form just
like any other values.
2) It simplifies from where multiple values can be returned. They can
be returned from anywhere. In contrast, in Common Lisp multiple values
can only be returned from the last form in an OR expression. In this
scheme multiple values can be returned from any form in an OR
expression.
3) In contrast to the original, thunkified proposal, the forms that
expect multiple values (multiple-value-call, single, etc.) could be
redefined such that the cumbersome multiple value thunks are replaced
with a simpler multiple value expression.
Eg. (single (lambda () (mvs ...))) => (single (mvs ...))
4) It simplifies the interaction with call/cc. To return multiple
values from a continuation just incant (cont (values <v0> ... <vN>)).
5) It allows programmers to manipulate multiple values without having
to inefficiently and unaesthetically coerce them to and from list structures.
Consider:
Expression oriented as opposed to thunk oriented.
(set! l (set! l
(cons (mvs ...) ...)) (cons
(multiple-value-call
list
(lambda () (mvs ...))
...)))
(multiple-value-call f (car l)) (apply f (car l))
Efficiency considerations
-------------------------
The immutability of values objects allows the compiler in cohoots with
the runtime system much latitude in representing multiple values. A
compiler/runtime strategy could be to return multiple values spread out
on the stack or in registers. When multiple values are returned to a
context which expects them the corresponding values object would never
have to be reified. For example, in
(define mvs (lambda (a b c) (values a b c)))
(multiple-value-let
(((x y z) (mvs 1 2 3)))
...)
a values object would not be allocated. Value objects would only have
to be allocated in the heap when multiple values are returned to a
context which is not expecting multiple values. For example,
(cons (values <v0> ... <vN> ) ...)
would require a values object to be allocated. However, a smart
compiler could avoid allocating a values object in many situations where
multiple values are indirectly expected. For instance, if the
equivalent of Common Lisp's (multiple-value-prog1 <exp1>... <expN>) was
implemented as:
(let ((x <exp1>))
<exp2>
...
<expN>
(multiple-value-call values x))
a smart compiler could avoid the allocation of the multiple values bound
to x by:
1) Leaving the multiple values returned by <exp1> spread out on the
stack.
2) Evaluating <exp2> through <expN>.
3) returning the spread out values of <exp1>.
Similar optimizations could be applied to multiple values returned by
know continuations, like cont, in:
(call/cc
(lambda (cont)
...
(cont (values <v0> ... <vN>))
...))
where the presence of the return in argument position would normally
require a values object to be allocated.
In even more esoteric situations, the compiler could represent (a
single group of) multiple values in a values object as well as spread out
on the stack. For example, in
(let [[[x (mvs ...)]]]
; spread x out on the stack for
; fast access
(multiple-value-call frob x) ; use the spread out values
(foo x) ; use the values object bound to x
(multiple-value-call frob x) ; use the spread out values, since
; we don't have to worry about
; foo side-effecting the values
; in x.
...)
My Answers to the Survey
------------------------
1) (a & b) (multiple-value-call <f> <mv-expression>)
(c) (values <v0> ... <vN)
2) Make multiple-value-call and values essential.
3) Include single as (single <mv-expression>) and make it non-essential.
4) Don't allow multiple multiple-value expressions in
multiple-value-call.
5) call/cc is not a problem with first class values objects.
6) Multiple values (i.e. values objects) are passed through forms just
like any other value is.
7) Just return a (first class) values object.
8, 9 & 10) Include:
(multiple-value-let (((ids*) form)*) <body>),
(multiple-value-let* (((ids*) form)*) <body>),
(multiple-value-letrec (((ids*) form)*) <body>) (maybe),
(multiple-value-set! (ids*) <form>), and
(multiple-value-define (ids*) <form>)
(maybe with mv-* nicknames) as non-essential. In any of the constructs
signal an error if too many or too few values are returned.
11) a) Include (values->list <mv-expression>) as non-essential.
b) Include (list->values <list>) as non-essential.
c) Include (values->vector <mv-expression>) as non-essential.
d) Include (vector->values <vector>) as non-essential.
e) other
include (values-ref <values-object> <index>) as essential
(values? <object>) as essential
∂28-Oct-86 0556 @MC.LCS.MIT.EDU:ramsdell%faron@mitre-bedford.ARPA Multiple values
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 28 Oct 86 05:56:14 PST
Received: from mitre-bedford.ARPA by MC.LCS.MIT.EDU 28 Oct 86 08:55:41 EST
Organization: The MITRE Corp., Bedford, MA
Received: by faron.MENET (4.12/4.7)
id AA21551; Tue, 28 Oct 86 08:49:57 est
Date: Tue, 28 Oct 86 08:49:57 est
From: John D. Ramsdell <ramsdell%faron@mitre-bedford.ARPA>
Posted-Date: Tue, 28 Oct 86 08:49:57 est
Message-Id: <8610281349.AA21551@faron.MENET>
To: rrrs-authors%mc.lcs.mit.edu@mitre-bedford.ARPA
Subject: Multiple values
Cc: ramsdell@mitre-bedford.ARPA
I do not see any need for anything other than
some thing like the T version of multiple values.
That is RECEIVE-VALUES, RETURN (possibly called
VALUES), and the macro RECEIVE.
It would be nice if escape procedures can be applied
to a variable number of arguments, so that the following
would work:
(receive-values
(lambda (x y) (list x y))
(call-with-current-continuation
(lambda (k) (k 1 2)))) => (1 2).
but given how often call-with-current-continuation is
used, I think we should be content to pass back list
structure in those rare cases.
I strongly object to Gary Brook's proposal for multiple
values. The idea of adding a new data structure
smacks of a case of reading the semantic specification
of Scheme too literally. Using sequences as arguments
to expression continuations is a trick to get around
the fact that functions only take one argument in the
lambda calculus. The T experience shows that trick
is not needed in real implementations.
The most serious objection I have to Gary Brook's
proposal was the design philosophy that is implicit
in the proposal. There seemed to be no attempt to
explain why his proposal had any merit over the much
simpler version as proposed by Will Clinger. Any proposal
to solve one single language problem with a large addition of
functions and macros must be accompanied by an explanation.
While such proposals may be the norm in the Common Lisp
community, we must all remember that the Scheme report
starts its introduction with the words "Programming languages
should be designed not by piling feature on top of feature,
but by removing the weaknesses and restrictions that make
additional features appear necessary."
John
∂28-Oct-86 0615 @MC.LCS.MIT.EDU:jinx@GENEVA.AI.MIT.EDU Multiple values
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 28 Oct 86 06:15:42 PST
Received: from geneva by MC.LCS.MIT.EDU 28 Oct 86 09:14:34 EST
Received: by GENEVA.AI.MIT.EDU; Tue, 28 Oct 86 09:13:52 est
Date: Tue, 28 Oct 86 09:13:52 est
From: jinx@GENEVA.AI.MIT.EDU (Guillermo J. Rozas)
Message-Id: <8610281413.AA14222@geneva>
To: ramsdell%faron%mitre-bedford.ARPA@mc
Cc: rrrs-authors@mc.lcs.mit.edu
In-Reply-To: John D. Ramsdell's message of Tue, 28 Oct 86 08:49:57 est
Subject: Multiple values
I agree completely! All the extra mechanism proposed seems
unnecessary.
A single comments though,
What is the problem with having continuations expect multiple
arguments when they in fact are capable of returning them?
It seems to me that, it is not only the case that it would be nice if
(receive-values
(lambda (x y) (list x y))
(call-with-current-continuation
(lambda (k) (k 1 2)))) => (1 2).
worked, but instead it SHOULD work. Certainly the simplest
implementation of the whole mechanism that I can think of would take
care of this.
∂28-Oct-86 1358 @MC.LCS.MIT.EDU:andy@hobbes.ARPA Re: Multiple values
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 28 Oct 86 13:58:20 PST
Received: from grape.ads.ARPA by MC.LCS.MIT.EDU 28 Oct 86 16:46:55 EST
Date: Tue, 28 Oct 86 13:48:40 PST
From: andy@hobbes.ARPA (Andy Cromarty)
To: rrrs-authors@mc.lcs.mit.edu
Subject: Re: Multiple values
If multiple values are to be defined for Scheme, I personally
would prefer that
(a) They be assigned inessential status, and
(b) Some comment be made in the R?RS admonishing implementors to
attempt to make lists be of roughly equivalent efficiency, or
suggesting some stylistic conventions for MV use.
The latter suggestion is motivated by frequent observation of
what seem to me to be excessive or abusive instances of MV use in
practical code written in other LISPs.
Returning both the number-theoretic quotient and the remainder
from a division routine seems like a use of MV's about which
few people would complain; but using MV's instead of creating
and passing composite data structures for related values that are
meant to be treated as an abstract object seems an unnecessary and
obfuscatory use of MV's. Often it seems people use MV's in such
cases either out of lack of aesthetic sense or because consing up
a data structure is too costly. An admonition to programmers could
address the former problem; and admonition to implementors, the latter.
asc
∂30-Oct-86 0139 @MC.LCS.MIT.EDU:harris%hplwhh@HPLABS.HP.COM Re: Multiple Values: An Opinion
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 30 Oct 86 01:37:19 PST
Received: from CSNET-RELAY.ARPA (TCP 1201000005) by MC.LCS.MIT.EDU 29 Oct 86 05:34:37 EST
Received: from hplabs.hp.com by CSNET-RELAY.ARPA id aa01350; 28 Oct 86 14:42 EST
Received: from hplms1. by hplabs.HP.COM ; Tue, 28 Oct 86 11:34:15 pst
Received: from hplwhh (hplwhh) by hplms1; Tue, 28 Oct 86 11:33:33 pst
Return-Path: <harris@hplwhh>
Received: by hplwhh ; Tue, 28 Oct 86 11:33:38 pst
From: Warren Harris <harris%hplwhh@HPLABS.HP.COM>
Message-Id: <8610281933.AA05914@hplwhh>
Date: Tue, 28 Oct 86 11:33:30 PDT
Subject: Re: Multiple Values: An Opinion
To: brooks%home%ti-csl.csnet%csnet-relay.arpa@CSNET-RELAY.ARPA,
rrrs-authors%MC.LCS.MIT.EDU%csnet-relay.arpa@CSNET-RELAY.ARPA
In-Reply-To: Your message of 27-Oct-86 16:09:35
X-Mailer: NMail [$Revision: 2.6 $]
I'm sorry, I know I'm not supposed to be on this line, but I just had
to state my opinion of multiple values. I think this is one (!) of the
most poorly thought out (and most haphazardly integrated) concepts in
common lisp. I'd hate to see scheme suffer from the same disease.
First of all, I see no need for the construct whatsoever. Each of
the functions to deal with multiple values can be replaced by existing
scheme functions:
(values <v1> ... <vn>) => (list <v1> ... <vn>)
(receive-values <fn> <mv-thunk-or-1st-class-mv-obj>) => (apply <fn> <list>)
(single <mv-thunk-or-1st-class-mv-obj>) => (car <list>)
(multiple-value-set! (<id1> ... <idn>) <mvs>) =>
(map set! '(<id1> ... <idn>) <list>)
Therefore, the multiple value constructs add no new functionality to the
language (shame). They are simply included to increase lisp's efficiency
(a job which is best left up to the compiler). In light of todays cdr-coded
lists I would think consing can be accomplished as efficiently as vector
allocation for multiple-value objects. I would assume the same tricks could
be employed for register or stack allocation of some lists, as they are
returned to functions which immediately destructure them.
All of your efficiency considerations still hold:
Efficiency considerations
-------------------------
A compiler/runtime strategy could be to return lists spread out on the
stack or in registers. When lists are returned to a context which
expects them the corresponding list object would never have to be
reified. For example, in
(define mvs (lambda (a b c) (list a b c)))
(let* ((m (mvs 1 2 3))
(x (first m))
(y (second m))
(z (third m)))
...)
a list object would not be allocated. List objects would only
have to be allocated in the heap when lists are returned to a context
which is not expecting a list. For example,
(cons (list <v0> ... <vN> ) ...)
would require a list object to be allocated. However, a smart
compiler could avoid allocating a list object in many situations where
lists are indirectly expected. For instance, if the equivalent of
Common Lisp's (multiple-value-prog1 <exp1>... <expN>) was implemented
as:
(let ((x <exp1>))
<exp2>
...
<expN>
x)
a smart compiler could avoid the allocation of the list bound
to x by:
1) Leaving the list returned by <exp1> spread out on the
stack.
2) Evaluating <exp2> through <expN>.
3) returning the spread out list of <exp1>.
Similar optimizations could be applied to lists returned by
know continuations, like cont, in:
(call/cc
(lambda (cont)
...
(cont (list <v0> ... <vN>))
...))
where the presence of the list in argument position would normally
require a list object to be allocated.
-----
Lets work at optimizing the compiler, not giving the programmer
his own hooks to optimize. I think most people avoid multiple values
anyway.
Warren Harris
HP Labs, bld 3U
1501 Page Mill Rd.
Palo Alto, CA 94040
harris%hplwhh@hplabs.HP.COM
P.S. How about a nice destructuring facility similar to multiple-value-bind
except for lists (like zetalisp's destructuring-bind). For example, what
could be implemented with multiple values as:
(defun foo (x y z) (values x y z))
(multiple-value-bind (x y z) (foo 1 2 3))
or regular lists as:
(defun foo (x y z) (list x y z))
(let* ((all (foo 1 2 3))
(x (first all))
(y (second all))
(z (third all)))
...)
could be more concisely stated as:
(destructure (x y z) (foo 1 2 3)
...)
Also, arbitrary trees could be destructured:
(destructure ((x . y) z) '((a b c d) e)
(print y))
=> (b c d)
This would help the compiler in its optimization, as well as give the
programmer a succinct syntax for a routine procedure.
-------
∂30-Oct-86 1228 @MC.LCS.MIT.EDU:adams%tekchips.tek.csnet@CSNET-RELAY.ARPA multiple values
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 30 Oct 86 12:28:10 PST
Received: from CSNET-RELAY.ARPA (TCP 1201000005) by MC.LCS.MIT.EDU 30 Oct 86 11:32:29 EST
Received: from tektronix by csnet-relay.csnet id ab14659; 29 Oct 86 15:49 EST
Received: by tektronix.TEK (5.31/6.16)
id AA02978; Wed, 29 Oct 86 12:26:44 PST
Received: by tekchips.TEK (5.31/6.16)
id AA08573; Wed, 29 Oct 86 12:28:59 PST
Date: Wed, 29 Oct 86 12:28:59 PST
From: Norman Adams <adams%tekchips.tek.csnet@CSNET-RELAY.ARPA>
Message-Id: <8610292028.AA08573@tekchips.TEK>
Subject: multiple values
To: rrrs-authors@MC.LCS.MIT.EDU
The language syntax and procedure library both favor calling with multiple
arguments over returning multiple values (no surprise considering that we
haven't have multiple return values in the language).
I seems to me easier to fix the procedure library than the syntax.
(Anyone want to adopt the "{...}n" notation that Steele mentions
in "The Ultimate Declarative"?)
Gary's survey identifies some rough edges that adding multiple values
causes. I favor:
a) changing call-with-current-continuation as described in 5a
(call/cc creates n-ary procedures that invoke the continuation with as
many arguments)
b) using RECEIVE (or the equivalent), instead of the alternatives of
either hacking up all the binding forms, or adding a bunch of
new binding forms.
c) living with it until we have more experience.
I'm for no coersions, no multiple-value-call.
-Norman
-------
∂30-Oct-86 1339 @MC.LCS.MIT.EDU:jinx%geneva.ai.mit.edu@CSNET-RELAY.ARPA Multiple Values: An Opinion
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 30 Oct 86 13:39:33 PST
Received: from CSNET-RELAY.ARPA (TCP 1201000005) by MC.LCS.MIT.EDU 30 Oct 86 16:38:01 EST
Received: from geneva.ai.mit.edu by CSNET-RELAY.ARPA id aa01525;
30 Oct 86 10:51 EST
Received: by GENEVA.AI.MIT.EDU; Thu, 30 Oct 86 10:42:41 est
Date: Thu, 30 Oct 86 10:42:41 est
From: "Guillermo J. Rozas" <jinx%geneva.ai.mit.edu@CSNET-RELAY.ARPA>
Message-Id: <8610301542.AA17018@geneva>
To: harris%hplwhh@HPLABS.HP.COM
Cc: brooks%home%ti-csl.csnet%csnet-relay.arpa%csnet-relay.arpa@CSNET-RELAY.ARPA,
rrrs-authors%MC.LCS.MIT.EDU%csnet-relay.arpa%csnet-relay.arpa@CSNET-RELAY.ARPA
In-Reply-To: Warren Harris's message of Tue, 28 Oct 86 11:33:30 PDT
Subject: Multiple Values: An Opinion
I'm sorry, I know I'm not supposed to be on this line, but I just had
to state my opinion of multiple values. I think this is one (!) of the
most poorly thought out (and most haphazardly integrated) concepts in
common lisp. I'd hate to see scheme suffer from the same disease.
I can understand your objections when you look at the CL book and
examine the rules for when multiple values are passed back and not.
On closer inspection, however, you will notice that the rule is
uniform (although specified in utmost detail): When dealing with a
compound expression, multiple values are passed back from the
subexpression into which the evaluation of the compound expression
reduces. In other words, tail-recursion is what determines when
multiple values are passed back. Unfortunately CL does not require
its implementations to be properly tail-recursive, so they could not
explain the semantics of multiple values in terms of tail-recursion.
We don't have this problem, so the behaviour can be described simply,
and the huge case list can be added as examples, not as the definition
of the bahaviour.
Agreed that there is no semantic need for multiple values, and that
the main consideration is efficiency, but there is no reason not to
add them to the language with inessential status, as long as we also
specify that implementations are free to make them be the obvious
procedures which work on lists, or even the suggestion below (which I
prefer).
I don't agree with you on one count however. Most of the compiler
optimizations that I see proposed very often suffer from a few bad bugs:
- The idea is simple, so it is assumed that the implementation is also
simple. This is obviously a fallacy. I'm specially wary of
optimizations that require a great deal of analysis. I'm not saying
it cannot be done, just that it is often the case that it takes a
great deal more work than anticipated.
- The optimizations break down across module boundaries. The main
problem with static analysis is that it needs a closed world model.
This is often hard to provide, and even inappropriate in an
interactive development environment.
- Static optimizations to improve performance badly hurt interpreters.
I know the MIT crowd is in the minority here, but we believe in
interpreters as our main development tool. Although we also want high
performance compilers, we don't want to sacrifice any performance in
the interpreter.
Consider the following proposal instead, which does not require much
(if any) compiler overhead:
(define (receive-values fn th)
((th) fn))
(define (values . all)
(lambda (receiver)
(apply receiver all)))
Note that a compiler which understands a little about tail arguments
can optimize the above relatively easily, given that the construction
and destructuring of the list is purely local and contained inside
VALUES. Even further, since the whole mechanism is contained in 2
procedures, they can easily be implemented as primitives, with
whatever efficiency is desired. Static compiler analysis to reduce
consing can still be used, but this time it is closure analysis of the
sort many Scheme compilers already do.
Note that the above proposal implies that intermediate forms in AND,
OR, and possibly other special forms would have to be treated
specially, since there is a difference between returning a "normal"
value, and explicitely returning 1 value.
PS: There are two other objections to your message, both minor:
- SET! is a the keyword of a special form, thus it cannot be mapped.
- I (and a fair amount of other people) do not believe in cdr-coding.
It is clearly expensive on stock hardware, and it is not clear to me
that it is not expensive on special purpose hardware, besides adding
unnecessary hair to the complete system and in particular the garbage
collector, and we all know where this leads.
∂30-Oct-86 1520 @MC.LCS.MIT.EDU:ANDY@Sushi.Stanford.EDU Re: multiple values
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 30 Oct 86 15:20:03 PST
Received: from Sushi.Stanford.EDU (TCP 4402000065) by MC.LCS.MIT.EDU 30 Oct 86 15:27:28 EST
Date: Thu 30 Oct 86 12:25:22-PST
From: Andy Freeman <ANDY@Sushi.Stanford.EDU>
Subject: Re: multiple values
To: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: <8610292028.AA08573@tekchips.TEK>
Message-ID: <12250998624.20.ANDY@Sushi.Stanford.EDU>
I'd like to bring up another multiple-value proposal but first I
have a question. Why is the scheme community attempting to
standardize this now? Is it really that well understood?
This proposal is a variant on the technique Carolyn Talcott used
in her thesis; Richard Weyrauch was also involved in that work.
Their idea requires one procedure; I'll call it values. Procedure
invocation spreads multiple values; (cons (values 1 2)) is completely
equivalent to (cons 1 2) and (list (values) 4 (values 1 2) 3) is
equivalent to (list 4 1 2 3). (It should be obvious that (values 1)
is completely equivalent to (values (values 1)).) In Talcott's
system, the last variable in a lambda expression's formal argument
list is preceded by an implicit period; I feel that the optional
explicit period of r↑3rs' syntax is superior.
Call/cc is generalized appropriately as well. If I understand
receive-values correctly, it is the same as apply.
Most of the other proposals strike me an attempt to add yet another
aggregate data type (in addition to lists and vectors) that predefined
procedures will use to return a number of values. This is not a bad
idea, different implementations can use different representations, yet
the coercion rules and additional procedures (if a form returns
multiple values, all but the first are discarded unless the programmer
has mastered subtle rules involving tokens not unlike funcall and #')
bother me.
Talcott's scheme is succinct and builds on the rest of the language.
(Look how much of this message was used to explain the idea.) Its
only disadvantage is that you can't tell how many arguments are being
passed by counting s-expressions.
-andy
-------
∂30-Oct-86 2204 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU multiple values
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 30 Oct 86 22:03:57 PST
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 30 OCT 86 22:06:22 EST
Date: Thu, 30 Oct 86 22:08:03 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: multiple values
To: rrrs-authors@MC.LCS.MIT.EDU, klotz@OZ.AI.MIT.EDU
In-reply-to: Msg of Mon 27 Oct 86 16:08:57 cst from Gary Brooks <brooks%home%ti-csl.csnet at CSNET-RELAY.ARPA>
Message-ID: <[AI.AI.MIT.EDU].112644.861030.JAR>
Since I'm the one who added the procedures VALUES (a.k.a. RETURN) and
RECEIVE to T, it seems appropriate that I should say a word or two about
what the heck I had in mind when I did so.
In the T implementation, the low-level protocols for call to unknown
procedure and return to unknown continuation are almost identical. The
compiler does CPS conversion and doesn't see the difference much, and
the data representation for implicit continuations is the same as that
for procedures.
The implementation symmetry suggested that maybe some surface-language
symmetry was worth experimenting with. This was corroborated by the
frequent need for some way to return more than one result value to the
caller. I had been doing the latter with
(foo arg1 arg2 ... argn (lambda (val1 val2 ... valm) body)),
and this syntax seemed pretty unweildy (it doesn't indent nicely, for
example); using lists and destructuring wasn't much better. So in T2,
anticipating future compiler support in T3, a procedure VALUES was
defined to be more or less the same as LIST (actually closer to VECTOR
-- the details are irrelevant), and a macro RECEIVE was invented to get
result values:
(receive (val1 val2 ... valm)
(foo arg1 arg2 ... argn)
body)
== (apply (lambda (val1 val2 ... valn) body)
(foo arg1 arg2 ... argn))
The beauty of VALUES and RECEIVE is that they're totally noncommittal
about implementation. The above is a correct implementation of the
abstraction, but so is the T3 implementation, where
(define (values . vals)
(c-w-c-c (lambda (k) (apply k vals))))
and
(receive (val1 val2 ... valm)
(foo arg1 arg2 ... argn)
body)
== (receive-values (lambda () (foo arg1 arg2 ... argn))
(lambda (val1 val2 ... valm) body))
[maybe I have the argument order reversed, I alwasy forget]
and RECEIVE-VALUES is a new primitive procedure. (We'd never expect a
user to invoke RECEIVE-VALUES explicitly, but it has to exist so that
RECEIVE can be a macro rather than a special form. It would be
necessary in Scheme to exactly the same extent that MAKE-DELAY is
necessary, which is somewhat.)
Thus if T programs have to ported to some other Scheme dialect, or if T
decides at some future point that multiple-value-returns are a horrible
idea and should be retracted, all our code will still work because the
abstraction is noncommittal. The nice thing is simply the notation, not
the implementation. The fact that T3 implements it well encourages its
use (and makes GC's less frequent, which, unfortunately, is a concern),
but is incidental.
A small benefit of having this facility be primitive is that you have an
opportunity for some error checking not previously available, namely you
can get wrong-number-of-return-value errors. This is good for the same
reason that wrong-number-of-argument errors are good. But note that it
is a necessary condition in order for the facility to permit varying
implementations.
(I don't see strong reasons for adding destructuring to LET or for any
other linguistic support for the multiple return values besides VALUES
and RECEIVE.)
I'm still not sure how I feel about the feature. Certainly the
abstraction is a good idea. As for the semantical foundations, I feel
pretty strongly that call and return should be symmetrical. If you can
have many arguments, you should be able to return many values. But note
that (P -> Q) does not necessarily imply Q, it might imply not P. My
opinion now is that it's probably better to achieve symmetry by flushing
multiple-argument procedures rather than by introducing multiple-value
returns, but this is incompatible with the present shape of Scheme, so I
won't recommend it for this audience.
Gary gives good reasons for introducing immutable data structures.
Algol 68 and ML have the right idea; Lisp and Scheme got it wrong. It
would certainly be worthwhile to experiment with immutable pairs,
strings, and vectors. Adding immutable objects onto Scheme (especially
one type without the others) might be a mistake, and it could be the
case that adding immutable objects as an afterthought like this,
coexisting with mutable objects, would result in a very inelegant
language. (Maybe it could result in a very elegant language... anyone
for ((immutably cons) x y)? I don't know.) But I think this is a
question independent of the multiple-value question, and Gary's proposal
is both more complicated and has more far-reaching consequences than
RECEIVE and VALUES, which are trivial.
I like the idea of adding RECEIVE and VALUES to Scheme *without
specifying what happens when some VALUES go somewhere other than to a
RECEIVE*. The mechanism can be added trivially to any Scheme, and those
that want to optimize it (or which already do) may feel free.
Minimalists can implement the mechanism with lists or closures, Gary can
implement it with immutable vectors, Schemes which are embedded in
Common Lisp or cohabit with it may use CL's multiple values, and T can
do what it does. It is minimal and noncommittal, it's a pleasant
notation, it captures a common pattern of usage, so why not.
- Jonathan
∂31-Oct-86 1840 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU multiple values
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 31 Oct 86 18:40:33 PST
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 31 OCT 86 21:39:55 EST
Date: Fri, 31 Oct 86 21:41:46 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: multiple values
To: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Fri 31 Oct 86 03:23:10 EST from Alan Bawden <ALAN at AI.AI.MIT.EDU>
Message-ID: <[AI.AI.MIT.EDU].113058.861031.JAR>
Date: Fri, 31 Oct 86 03:23:10 EST
From: Alan Bawden <ALAN at AI.AI.MIT.EDU>
I don't use CL multiple values in any situation where LIST will
suffice. I use it just in case I want some "by-products" to be
transparently discarded by all but a few callers. This is why
multiple values were added to the Lisp Machine in the first place,
and its still the only reason I see to use it.
...
As Alan has tactfully pointed out to me, none of the multiple-value
features that Gary Brooks and Andy Freeman and I and others have been
talking about bear much resemblance to CL multiple values, and they are
really intended to solve a different problem. The terminology is a
problem here; we really shouldn't be saying that these constructs do
"multiple value returns" because Lisp Machine Lisp and its derivatives
(CL) have been using that term for quite a while to mean something quite
different. (I might have called the LM feature "extra value returns"...)
We should no more think that we're "cleaning up something CL
did wrong" than we should think that omitting optional or keyword arguments,
or macros or packages, solves the problems that those features
were introduced to address.
I agree that the RECEIVE/VALUEs feature is of marginal usefulness. I
don't think this is the most important outstanding issue we have to talk
about; macros, modules, opaque types, tables, and even bitwise logical
operators all loom larger. Of course, the more agreement we can get on
any feature at all, the better.
A suggestion on how to proceed: we needn't think of every discussion as
aiming towards something to be included in R↑4RS. If just 2
implementations agree on a way to do something, we have still gained
something. We should consider creating an auxiliary document, much more
informal and open-ended than a R↑nRS, describing possibilities for
standard libraries and utilities, possibly with multiple different ways
to do things if no agreement can be reached. Unanimity may be too
stringent a requirement if this group is to make much progress....
Jonathan
∂31-Oct-86 1916 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Journal of Lisp and Symbolic Computation -- call for papers
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 31 Oct 86 19:15:57 PST
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 31 OCT 86 22:09:15 EST
Date: Fri, 31 Oct 86 22:11:09 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Journal of Lisp and Symbolic Computation -- call for papers
To: scheme@MC.LCS.MIT.EDU
Message-ID: <[AI.AI.MIT.EDU].113067.861031.JAR>
Date: Fri, 31 Oct 86 12:34:05 PST
From: edsel!sunvalleymall!jlz at navajo.stanford.edu (Jan Zubkoff)
To: navajo!Common-lisp%sail at navajo.stanford.edu
cc: sunvalleymall!jlz at navajo.stanford.edu
Re: Call for Papers
Message-Id: <8610312034.AA09846@sunvalleymall.edsel.uucp>
LISP AND SYMBOLIC COMPUTATION:
An International Journal
10/27/86
CALL FOR PAPERS
LISP AND SYMBOLIC COMPUTATION: An International Journal (LASC) is
a new journal published by Kluwer Academic Publishers. Richard
P. Gabriel, Lucid, Inc. and Guy L. Steele Jr., Thinking Machines,
Inc. are Editors-in-Chief.
The aim of this new journal is to present a forum for current and
evolving symbolic computing, focusing on LISP and
object-oriented programming. The scope includes:
* Programming language notations for symbolic computing
(e.g., data abstraction, parallelism, lazy evaluation,
infinite data objects, self-reference, message-passing,
generic functions, inheritance, encapsulation,
protection, metaobjects).
* Implementations and techniques (e.g., specialized
architectures, compiler design, combinatory models,
garbage collection, storage management, performance
analysis, smalltalks, flavors, common loops, etc.).
* Programming logics (e.g., semantics and reasoning about
programs, types and type inference).
* Programming environments and tools (e.g.,
Knowledge-based programming tools, program
transformations, specifications, debugging tools).
* Applications and experience with symbolic computing
(e.g., real-time programming, artificial intelligence
tools, experience with LISP, object-oriented
programming, window systems, user interfaces, operating
systems, parallel/distributed computing.
!
REQUIREMENTS FOR SUBMISSION
Timetable. Authors must submit five (5) complete copies of their papers.
Notice of acceptance or rejection will be sent to the first author.
Appearance. Each copy of the paper should be clearly legible.
Papers should be printed on 8-1/2 by 11" paper, double spaced
with at least 1 inch margins with no smaller than 12 pt. type.
Title Page. Each copy of the paper must have a title page (separate from
the body of the paper) containing the title of the paper, the names and
addresses of all the authors. The affiliation appearing under the author's
name should be the name of the organization for which the work was carried
out. When this is no longer the author's current affiliation, the latter
is given in the address footnote on the first page. The title page must
specify one topic from the scopes listed on the reverse side of this page.
Abstract. The abstract should be 150 to 200 words and should be short and
direct. It should be informative enough to serve as a substitute for
reading the paper itself. Work planned but not done should not be
described in the abstract. Do not display formulas and do not use citation
reference numbers.
Review Criteria. Each paper will be reviewed by experts in the area
specified from the scope as the topic of the paper. Acceptance will be
based on overall merit and significance of the reported research, as well
as the quality of the presentation.
Please send papers to:
Jan Zubkoff
Associate Editor, LASC
Lucid, Inc.
707 Laurel Street
Menlo Park, CA 94025
edsel!jlz@su-navajo
(415) 329-8400
Suggestions and inquiries to:
Dick Gabriel Guy L. Steele Jr.
Editor-in-Chief Editor-in-Chief
Lucid, Inc. Thinking Machines, Inc.
707 Laurel Street 245 First Street
Menlo Park, CA 94025 Cambridge, MA 02142
rpg@sail gls@think.COM
(415) 329-8400 (617) 876-1111
∂03-Nov-86 0855 @MC.LCS.MIT.EDU:gls@Think.COM Marvel?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 3 Nov 86 08:54:35 PST
Received: from Godot.Think.COM (TCP 30001264307) by MC.LCS.MIT.EDU 3 Nov 86 11:33:56 EST
Received: from polycarp by Godot.Think.COM via CHAOS; Mon, 3 Nov 86 11:22:41 est
Date: Mon, 3 Nov 86 11:24 EST
From: Guy Steele <gls@Think.COM>
Subject: Marvel?
To: ANDY@Sushi.Stanford.EDU, gjs@MC.LCS.MIT.EDU, rrrs-authors@mc.lcs.mit.edu
Cc: rpg@SU-AI.ARPA, gls@AQUINAS
In-Reply-To: <12251488191.9.ANDY@Sushi.Stanford.EDU>
Message-Id: <861103112403.4.GLS@POLYCARP.THINK.COM>
Date: Sat 1 Nov 86 09:14:39-PST
From: Andy Freeman <ANDY@Sushi.Stanford.EDU>
Apparently you wrote a language that had a multiple values
scheme much like the one I attributed to Talcott and Weyrauch.
Can you comment on it to rrrs-authors? (T&W like it and have
stayed with it; you abandoned it. I'm sure both had their
reasons.)
Yes. For a while I worked on a dialect of Scheme called MARVEL
(Multiple-Return-Value--Expression Lisp; if you ask "where does
the `A' come from?" I say "A is for Acronym").
It did pretty much all the obvious things: every function call was
implicitly like the Common Lisp MULTIPLE-VALUE-CALL, and most
side-effecting forms such as SETQ, PRINT, and COMMENT were made to
return zero values. I believe I also arranged for variables to
be able to hold multiple values.
My experience with the language was that it was perfectly clean
and elegant, but programs that made non-trivial use of multiple
values were very hard to read, precisely because of the loss
of the one-form/one-value correspondence. Having the extra power
everywhere in the language was not worth the loss of clarity.
I therefore abandoned the experiment without writing it up.
(Maybe I should have, but there were other, more promising variations
of Scheme to explore.)
I am cc'ing this message to Dick Gabriel, who worked with Weyrauch on
the implementation of SEUS, a language with this geneal flavor. I
recall him having reported to me the same results with their language,
but he should have the chance to speak for himself.
I believe that experience with the POP languages (especially POP-2)
may be relevant to ths discussion, but I am not an expert there.
--Guy
∂03-Nov-86 1221 @MC.LCS.MIT.EDU:RPG@SAIL.STANFORD.EDU gls@AQUINAS/cc
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 3 Nov 86 12:19:28 PST
Received: from SAIL.STANFORD.EDU (TCP 1200000013) by MC.LCS.MIT.EDU 3 Nov 86 15:16:56 EST
Date: 03 Nov 86 1214 PST
From: Dick Gabriel <RPG@SAIL.STANFORD.EDU>
Subject: gls@AQUINAS/cc
To: ANDY@SUSHI.STANFORD.EDU, gjs@MC.LCS.MIT.EDU,
rrrs-authors@MC.LCS.MIT.EDU
Multiple Values
I wrote the SEUS compiler for the HP300 (?) version of SEUS. SEUS had
what-I-guess-are-now-called CARTs, which are coalescing multiple values.
Whenever 2 CARTs came near each other, they joined into one larger
one. This resulted in this code
(defun foo (x) (values x x x))
(defun bar (x)(values x x x x))
(list (foo 1)(bar 2)(foo 3))
doing this
=> (1 1 1 2 2 2 2 3 3 3)
The code, as Steele mentions, was elegant in a certain sense, but very
hard to read most of the time, because you had to take into account that
some other values than the primary value (the first one) would be passed
to some program. The places where SEUS code was easy to read were when you
were writing something that, in Common Lisp, would be
(multiple-value-call #'foo (baz)(bar))
The places where it was hard to read were when you were writing something
that, in Common Lisp, would be
(foo (baz) (bar))
That is, there was no easy way to check that the right values from the
right places got passed. I think that the latter is the more commonly
used case, so SEUS was optimized the wrong way.
It was hard to do this:
(defun foo (x)(values x (+ x 1) (+ x 2)))
(defun baz (x y) ...)
such that calling BAZ on (FOO 1) and (FOO 2) passed 1 and 2 to BAZ.
I recall that SEUS had no way to do this until I was half-way through
writing the compiler. I also recall that variables could be bound to
CARTs, somehow, as part of the solution to the problem - that is,
you could get X to be bound to the CART, [1 2 3], and Y to [2 3 4].
When the Common Lisp multiple value scheme was being devised, I thought
that we (the designers) should look at SEUS for its experience. I'm now
glad we didn't do anything more that invent MULTIPLE-VALUE-CALL as a
result of that experience.
-rpg-
∂05-Nov-86 0305 @MC.LCS.MIT.EDU:GOERZ@SUMEX-AIM.ARPA [Gunther Goerz <GOERZ@SUMEX-AIM.ARPA>: CScheme for 68K]
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 5 Nov 86 03:04:56 PST
Received: from SUMEX-AIM.ARPA (TCP 1200000070) by MC.LCS.MIT.EDU 5 Nov 86 06:00:47 EST
Date: Wed 5 Nov 86 02:48:18-PST
From: Gunther Goerz <GOERZ@SUMEX-AIM.ARPA>
Subject: [Gunther Goerz <GOERZ@SUMEX-AIM.ARPA>: CScheme for 68K]
To: JAR@AI.AI.MIT.EDU, SCHEME@MC.LCS.MIT.EDU
Message-ID: <12252466434.15.GOERZ@SUMEX-AIM.ARPA>
Mail-From: GOERZ created at 24-Oct-86 03:24:44
Date: Fri 24 Oct 86 03:24:44-PDT
From: Gunther Goerz <GOERZ@SUMEX-AIM.ARPA>
Subject: CScheme for 68K
To: scheme%mit-mc.csnet@RELAY.CS.NET
cc: Goerz@SUMEX-AIM.ARPA
Message-ID: <12249316417.13.GOERZ@SUMEX-AIM.ARPA>
Patrick Greussay of the Univ of Paris 8 and LITP has implemented (at least
one version of) SCHEME in C which is running on a variety of machines,
including 68000 systems.
--Guenther
-------
-------
∂07-Nov-86 0351 @MC.LCS.MIT.EDU:enea!tut!jh@seismo.CSS.GOV eval and orbit
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 7 Nov 86 03:51:47 PST
Received: from seismo.CSS.GOV (TCP 30003106431) by MC.LCS.MIT.EDU 7 Nov 86 06:46:47 EST
Received: from enea.UUCP by seismo.CSS.GOV (5.54/1.14) with UUCP
id AA25326; Fri, 7 Nov 86 06:45:33 EST
Received: by enea.UUCP (5.51/UUCP-Project/rel-1.0/1.8)
id AA01199; Fri, 7 Nov 86 12:26:05 +0100 (MET)
Date: Fri, 7 Nov 86 13:20:28 -0200
From: enea!tut!jh@seismo.CSS.GOV (Juha Hein{nen)
Return-Path: <jh@tut>
Message-Id: <8611071120.AA033441@tut.uucp>
To: scheme@MC.LCS.MIT.EDU
Subject: eval and orbit
I asked to be put on this list a couple of weeks ago and haven't
received any postings. Here comes mine as a test.
1. What is the rational in omitting eval from Scheme?
My program is supposed to read values of enumerated types (i.e.
symbols) and then convert the symbols to their values. In regular
Lisp I would write (eval (read)) to get the value but how am I
supposed to do that in Scheme? Use a mapping function from names to
values or is there a simpler way?
2. Where can I get the Orbit Scheme compiler for my Sun-3
workstation?
Juha Heinanen
Tampere Univ. of Technology
Finland
∂07-Nov-86 1716 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Automatic removal from list...
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 7 Nov 86 17:16:39 PST
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 7 NOV 86 20:11:13 EST
Date: Fri, 7 Nov 86 20:13:16 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Automatic removal from list...
To: scheme@MC.LCS.MIT.EDU
Message-ID: <[AI.AI.MIT.EDU].115915.861107.JAR>
Scheme@MC is a big mailing list. On average, one or two members become
unreachable each week, due to changes in routing, gateways being down,
etc. Be warned that I will ruthlessly remove from the list any
recipients to whom mail is undeliverable. If you change your address,
be sure to send a note to Scheme-Request@MC. If your machine has been
down or off the net for a while (usually the various mail systems retry
for three to seven days), and mail bounces as a result, you will likely
be removed. This is the only way I'll be able to keep things under
control and prevent people who send messages to Scheme from being
deluged with enormous quantities of bounced mail. Just send me a
message when you're back on, or if you think one of your gateways could
have been down and you haven't seen a message for a couple of weeks.
I sure hope that one of these days electronic mail will be able to reach
people as reliably as physical mail does. The current state of the art
of e-mail is quite inferior in the respect, probably at about the same
point of development that physical mail was in about the 15th century.
Jonathan
∂07-Nov-86 1817 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU MIT AIM 848a
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 7 Nov 86 18:17:33 PST
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 7 NOV 86 20:49:51 EST
Date: Fri, 7 Nov 86 20:51:52 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: MIT AIM 848a
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <[AI.AI.MIT.EDU].115926.861107.JAR>
I'll mail copies to y'all (unless I don't have your address or you tell
me not to or you already have one).
Jonathan
∂07-Nov-86 1839 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Hot off the press...
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 7 Nov 86 18:39:15 PST
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 7 NOV 86 20:46:45 EST
Date: Fri, 7 Nov 86 20:48:46 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Hot off the press...
To: scheme@MC.LCS.MIT.EDU
Message-ID: <[AI.AI.MIT.EDU].115925.861107.JAR>
The new report is ready! Get them while they last!
It's available in a handsome red binding from the MIT AI Lab
publications office; the address is:
Elizabeth Heepe
Publications, Room NE43-818
MIT Artifical Intelligence Laboratory
545 Technology Square
Cambridge MA 02139
Ask for MIT Artificial Intelligence Memo 848a, the "Revised↑3 Report on
the Algorithmic Language Scheme". Enclose a check for $6.00 per copy
(U.S. funds) payable to the MIT Artificial Intelligence Laboratory.
Prepayment is required.
This version (dated September 1986) supersedes last summer's report,
which was AI memo 848 (this one is 848a). It also supersedes (but is
very similar to) the draft which was passed out at the Lisp and FP
Conference in August.
It is identical (same original) to the version that will be printed in
SIGPLAN this December, except that in the MIT AI memo version it
additionally includes a previously unpublished article by Abelson and
Sussman entitled "Computation: An Introduction to Engineering Design".
If you want to cite it, probably better to cite the SIGPLAN version
since that will be available to a wider audience:
Jonathan Rees and William Clinger, editors.
"Revised↑3 Report on the Algorthmic Language Scheme."
SIGPLAN Notices 21(12), September 1986.
The report will also appear as an Indiana University CSD Technical
Report.
Here is a brief summary of the more important differences between the
1985 and 1986 versions of the language:
- Added: delay, force, boolean?, procedure?
- Removed: #!null, rec, named-lambda, append!, object-hash,
object-unhash, 1+, -1+, some of the string operators,
"curried define"
- Redundant names removed: sequence, =?, <?, <=?, >?, >=?
- Renamed: #!true -> #t, #!false -> #f
- Changed: (define (foo ...) ...) now means
(define foo (lambda (...) ...)), not
(define foo (named-lambda (foo ...) ...))
Other, lesser, changes are enumerated in a special section on page 36.
- Jonathan Rees
∂08-Nov-86 1121 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU multiple
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Nov 86 11:21:13 PST
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 8 NOV 86 14:21:03 EST
Date: Sat, 8 Nov 86 14:23:05 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: multiple
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <[AI.AI.MIT.EDU].116160.861108.JAR>
I didn't mean for my message to squelch debate. Surely someone
disagrees with me. Speak up.
Jonathan
∂08-Nov-86 1303 @MC.LCS.MIT.EDU,@MIT-MULTICS.ARPA:REMARCK@UCLASSCF.BITNET This account is scheduled to be deleted soon...
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Nov 86 13:03:50 PST
Received: from MIT-MULTICS.ARPA (TCP 1200000006) by MC.LCS.MIT.EDU 8 Nov 86 15:57:21 EST
Received: from UCLASSCF(MAILER) by MITVMA (Mailer X1.23) id 8286;
Sat, 08 Nov 86 15:51:19 EST
Received: by UCLASSCF (Mailer X1.23) id 3781; Sat, 08 Nov 86 12:41:14 PST
Date: Sat, 08 Nov 86 12:39:12 PST
From: REMARCK@UCLASSCF (Marc Kriguer)
To: scheme@MC.LCS.MIT.EDU
Subject: This account is scheduled to be deleted soon...
And to avoid the last-minute rush, I have to start dropping myself from
all the mailing lists I am on. Please remove my name from the
scheme mailing list.
Thank you very much!
Marc Kriguer
∂09-Nov-86 0851 @MC.LCS.MIT.EDU:JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU eval and orbit
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Nov 86 08:50:51 PST
Received: from OZ.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 9 NOV 86 11:47:16 EST
Date: 9 Nov 1986 11:45 EST (Sun)
Message-ID: <JINX.12253580092.BABYL@MIT-OZ>
From: Bill Rozas <JINX%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU>
To: enea!tut!jh@SEISMO.CSS.GOV (Juha Hein{nen)
Cc: scheme@MC.LCS.MIT.EDU
Subject: eval and orbit
In-reply-to: Msg of Fri 7 Nov 86 13:20:28 -0200 from enea!tut!jh at seismo.CSS.GOV (Juha Hein{nen)
My program is supposed to read values of enumerated types (i.e.
symbols) and then convert the symbols to their values. In regular
Lisp I would write (eval (read)) to get the value but how am I
supposed to do that in Scheme? Use a mapping function from names to
values or is there a simpler way?
Besides the fact that EVAL is not really necessary for most
programming, the problem is that we could not agree on what eval would
mean or do (we didn't try very hard because of the other reason):
Some implementations have a single global environment where
expressions could be evaluated. In these implementations (eval <x>)
would make sense.
Other implementations have multiple environments where code can be
evaluated. In these implementations (eval <x>) does not make much
sense. Eval needs to take a second argument specifying what
environment to evaluate in, and it is not clear that a reasonable
default can be provided so that 1 argument EVAL could work.
You should use a mapping function or something like it if you want
your code to be portable. Most implementations have an EVAL procedure
(with different behavior) which you can use if you don't care about
that.
∂10-Nov-86 1301 @MC.LCS.MIT.EDU:willc%tekchips.tek.csnet@RELAY.CS.NET Re: multiple values
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 10 Nov 86 13:01:44 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 10 Nov 86 16:02:09 EST
Received: from tektronix by csnet-relay.csnet id al11458; 10 Nov 86 15:24 EST
Received: by tektronix.TEK (5.31/6.16)
id AA09527; Mon, 10 Nov 86 10:53:31 PST
Received: by tekchips.TEK (5.31/6.16)
id AA04254; Mon, 10 Nov 86 10:53:46 PST
Message-Id: <8611101853.AA04254@tekchips.TEK>
To: JAR@AI.AI.MIT.EDU
Cc: rrrs-authors@MC.LCS.MIT.EDU, willc%tekchips.tek.com@RELAY.CS.NET
Subject: Re: multiple values
In-Reply-To: Your message of Fri, 31 Oct 86 21:41:46 EST.
<[AI.AI.MIT.EDU].113058.861031.JAR>
Date: 10 Nov 86 10:53:41 PST (Mon)
From: willc%tekchips.tek.csnet@RELAY.CS.NET
I didn't mean for my message to squelch debate. Surely someone
disagrees with me. Speak up.
Ok, Jonathan. I won't say much because I'm very busy right now. The
message in question:
As Alan has tactfully pointed out to me, none of the multiple-value
features that Gary Brooks and Andy Freeman and I and others have been
talking about bear much resemblance to CL multiple values, and they are
really intended to solve a different problem. The terminology is a
problem here; we really shouldn't be saying that these constructs do
"multiple value returns" because Lisp Machine Lisp and its derivatives
(CL) have been using that term for quite a while to mean something quite
different. (I might have called the LM feature "extra value returns"...)
We should no more think that we're "cleaning up something CL did wrong"
than we should think that omitting optional or keyword arguments,
or macros or packages, solves the problems that those features
were introduced to address.
I see more of a resemblance than Jonathan does. I happen to think that
CL came close to getting multiple values right, failing only in the choice
of primitives, the complexity of the specification (which, as someone has
observed, was due to the fact that CL doesn't do tail recursion right), and
in the over-reliance upon special forms (which is consistent with the rest
of CL).
The main difference between the RECEIVE/VALUES proposals I've seen and
the way CL does it is that people in the Scheme community seem to assume
that most continuations will require exactly one result, while in CL all
continuations accept any number of results (up to 20, anyway). It seems
to me, however, that if you're going to have an efficient implementation
mechanism that supports continuations that accept an arbitrary number of
results, then it shouldn't be too hard to make all continuations accept
an arbitrary number of results. Whether we do this or not should be
determined by whether we think CL got this part of it right.
I like the idea of adding RECEIVE and VALUES to Scheme *without
specifying what happens when some VALUES go somewhere other than to a
RECEIVE*.
Me too. For one thing, it makes it legal for a Scheme to implement
CL-style semantics for multiple values.
Peace, Will
∂10-Nov-86 1904 @MC.LCS.MIT.EDU:ANDY@Sushi.Stanford.EDU silly multiple values
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 10 Nov 86 19:03:46 PST
Received: from Sushi.Stanford.EDU (TCP 4402000065) by MC.LCS.MIT.EDU 10 Nov 86 22:04:23 EST
Date: Mon 10 Nov 86 19:00:15-PST
From: Andy Freeman <ANDY@Sushi.Stanford.EDU>
Subject: silly multiple values
To: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: <[AI.AI.MIT.EDU].116160.861108.JAR>
Message-ID: <12253954092.9.ANDY@Sushi.Stanford.EDU>
I once saw a proposal for passing arguments with the name used by the
callee. The idea was that the caller could pass them in any order and
the names provide some documentation. (I think this came up in a
keyword discussion on CommonLisp; KMP, do you remember more? BTW - I
don't think it is a good idea.) For example:
(cons car 'a cdr 'd) = (cons cdr 'd car 'a)
The major problem with using this idea for returning values is
figuring out the inheritance of named values. One possible definition
is the following.
The names of returned values have dynamic scope. The special form
"receive" creates a context for receiving named values. Its first
argument is a list of the names of the values to be received, its
second argument produces them, and following arguments use them.
The special form "establish" has one or more arguments. The first is
a list of name-value pairs. The name is the name of a value to
return, the value is its value. Subsequent arguments are an implicit
begin whose value is the value of the establish form. Establish
should only appear in tail-recursive positions.
Receive and establish can be implemented by the following T syntax
definitions.
(define-syntax (receive names produce . body)
`(apply (lambda , names ,@ body)
(bind , (map (lambda (name) `(, name (undefined)))
names)
, produce
(list ,@ names))))
(define-syntax (establish name-value-pairs . body)
`(begin ,@ (map (lambda (pair) `(set! ,@ pair))
name-value-pairs)
(undefined)
,@ body))
I don't think this is a good proposal but there may be a good way to
use the basic idea. It does allow forms to ignore "extra" values and
(this variation) can be implemented simply.
-andy
-------
∂11-Nov-86 0853 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Scheme errors?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 11 Nov 86 08:53:00 PST
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 11 NOV 86 11:53:08 EST
Date: Tue, 11 Nov 86 11:55:13 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Scheme errors?
To: RDZ@AI.AI.MIT.EDU
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Tue 11 Nov 86 01:22 EST from Ramin Zabih <RDZ at AI.AI.MIT.EDU>
Message-ID: <[AI.AI.MIT.EDU].117255.861111.JAR>
Date: Tue, 11 Nov 86 01:22 EST
From: Ramin Zabih <RDZ at AI.AI.MIT.EDU>
Have I missed something in my reading of the Scheme report, or is there
in fact no defined way for a program to signal an error?
You didn't miss anything. However, no such mechanism is needed, because
as long as you avoid defining the variable "error", it should simply
work to say (error ...). The effect will be a reference to an unbound
variable, and if the debugging system is halfway decent you'll be able
to see the arguments.
Seriously though, I think most implementations have an "error" procedure
(or special form) which is compatible with S&ICP (and not with CL). But
it might be nice if we in fact standardized on this. Ideally of course
it would be part of a real error (condition) system, though, and it's
possible that that would in turn depend on having fluid variables... I
wouldn't hold my breath...
Jonathan
∂13-Nov-86 0752 @MC.LCS.MIT.EDU:sieber-john@YALE.ARPA Add me to the list
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 13 Nov 86 07:52:10 PST
Received: from yale-celray.YALE.ARPA (TCP 20011000031) by MC.LCS.MIT.EDU 13 Nov 86 10:48:14 EST
Received: by yale-celray.YALE.ARPA; Thu, 13 Nov 86 10:04:58 est
Date: Thu, 13 Nov 86 10:04:58 est
From: sieber-john@YALE.ARPA
Message-Id: <8611131504.AA00353@yale-celray.YALE.ARPA>
Subject: Add me to the list
To: scheme@mc.lcs.mit.edu
Would you please add me to the Scheme discussion? I was an undergraduate
at Oberlin College where I was infected with the Scheme bug (flavored
heavily by Indiana U. and the Dan Friedman school).
Thanks,
Jack Sieber
sieber@yale.arpa
-------
-------
∂15-Nov-86 1839 @MC.LCS.MIT.EDU:reddy@a.cs.uiuc.edu make-environment
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 15 Nov 86 18:39:12 PST
Received: from a.cs.uiuc.edu (TCP 1200600045) by MC.LCS.MIT.EDU 15 Nov 86 21:33:07 EST
Received: by a.cs.uiuc.edu (UIUC-5.44/9.7),
id AA10732; Sat, 15 Nov 86 20:33:52 CST
Date: Sat, 15 Nov 86 20:33:52 CST
From: reddy@a.cs.uiuc.edu (Uday S. Reddy)
Message-Id: <8611160233.AA10732@a.cs.uiuc.edu>
To: scheme@mit-mc.arpa
Subject: make-environment
I don't know if this is the right forum to raise this issue. But, I wonder
why make-environment works the way it does. If I define
(define (complex x y)
(make-environment
(define re x)
(define im y)))
(define a (complex 1 2))
not only does a have re and im bound in it, but it also has x and y
bound in it. So,
(access x a)
yields 1. From the description of make-environment in Abelson and Sussman,
it appears that only re and im should be bound in a. Is this a bug, or a
feature, or am I missing something? If this is the way make-environment
is supposed to work, is there some other primitive that binds re and im
and forgets about x and y?
Uday Reddy
∂15-Nov-86 1913 @MC.LCS.MIT.EDU:shneider%cui.unige.chunet%ubc.csnet@RELAY.CS.NET question: S&ICP teacher's manual and query language
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 15 Nov 86 19:13:14 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 15 Nov 86 22:04:10 EST
Received: from ubc by csnet-relay.csnet id aa00818; 15 Nov 86 14:27 EST
Date: Sat, 15 Nov 86 10:36:41 pst
Received: by ubc.csnet id AA24378; Sat, 15 Nov 86 10:36:41 pst
From: "Daniel K. Schneider" <shneider%cui.unige.chunet%ubc.csnet@RELAY.CS.NET>
To: scheme@MC.LCS.MIT.EDU
MMDF-Warning: Parse error in original version of preceding line at RELAY.CS.NET
Message-Id: <153:shneider@cui.unige.chunet>
Subject: question: S&ICP teacher's manual and query language
1) We set up group here, disscussing the "structure and interpretation" book
and we'd like to use it for teaching eventually.
Where could I get the teacher's manual ?
(Sorry, if this question has been asked before already)
2) I'd also like to obtain the updated version of the query langauge.
I heard that I might get it from GJS, but I don't know his name
and net address. Anybody does ?
BIG thanks for any help !
∂15-Nov-86 1951 @MC.LCS.MIT.EDU:shneider%cui.unige.chunet%ubc.csnet@RELAY.CS.NET question: S&ICP teacher's manual and query language
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 15 Nov 86 19:45:29 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 15 Nov 86 22:04:55 EST
Received: from ubc by csnet-relay.csnet id ab00818; 15 Nov 86 14:29 EST
Date: Sat, 15 Nov 86 10:37:10 pst
Received: by ubc.csnet id AA24381; Sat, 15 Nov 86 10:37:10 pst
From: "Daniel K. Schneider" <shneider%cui.unige.chunet%ubc.csnet@RELAY.CS.NET>
To: scheme@MC.LCS.MIT.EDU
MMDF-Warning: Parse error in original version of preceding line at RELAY.CS.NET
Message-Id: <156:shneider@cui.unige.chunet>
Subject: question: S&ICP teacher's manual and query language
1) We set up group here, disscussing the "structure and interpretation" book
and we'd like to use it for teaching eventually.
Where could I get the teacher's manual ?
(Sorry, if this question has been asked before already)
2) I'd also like to obtain the updated version of the query langauge.
I heard that I might get it from GJS, but I don't know his name
and net address. Anybody does ?
BIG thanks for any help !
-------------------------------------------------------------------------------
Daniel K.Schneider
Departement de science politique, Universite de Geneve
1211 GENEVE 4 (Switzerland), Tel. (..41) (22) 20 93 33 ext. 2357
to VMS/BITNET: to UNIX/EAN (preferable):
BITNET: SCHNEIDER@CGEUGE51 shneider%cui.unige.chunet@CERNVAX
ARPA: SCHNEIDER%CGEUGE51.BITNET@WISCVM shneider%cui.unige.chunet@ubc.CSNET
uucp: mcvax!cernvax!cui!shneider
X.400/ean: shneider@cui.unige.chunet
∂16-Nov-86 1021 @MC.LCS.MIT.EDU:jinx@GENEVA.AI.MIT.EDU make-environment (long)
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 16 Nov 86 10:21:21 PST
Received: from geneva (TCP 2206400372) by MC.LCS.MIT.EDU 16 Nov 86 13:16:43 EST
Received: by GENEVA.AI.MIT.EDU; Sun, 16 Nov 86 13:13:36 est
Date: Sun, 16 Nov 86 13:13:36 est
From: jinx@GENEVA.AI.MIT.EDU (Guillermo J. Rozas)
Message-Id: <8611161813.AA03965@geneva>
To: reddy@a.cs.uiuc.edu
Cc: scheme@mit-mc.arpa
In-Reply-To: Uday S. Reddy's message of Sat, 15 Nov 86 20:33:52 CST
Subject: make-environment (long)
I don't know if this is the right forum to raise this issue. But, I wonder
why make-environment works the way it does. If I define
(define (complex x y)
(make-environment
(define re x)
(define im y)))
(define a (complex 1 2))
not only does a have re and im bound in it, but it also has x and y
bound in it. So,
(access x a)
yields 1. From the description of make-environment in Abelson and Sussman,
it appears that only re and im should be bound in a. Is this a bug, or a
feature, or am I missing something? If this is the way make-environment
is supposed to work, is there some other primitive that binds re and im
and forgets about x and y?
You have misunderstood section 4.3.1 of S&ICP. If you read it
carefully, you will notice
"For use in conjunction with EVAL, Scheme provides an operation called
MAKE-ENVIRONMENT that constructs an environment, evaluates a
designated sequence of expressions within this environment, and
returns the environment as the value of the MAKE-ENVIRONMENT
expression. The enclosing environment of the new environment is the
environment in which the MAKE-ENVIRONMENT expression was evaluated."
The last sentence in the above quote makes it quite clear that this
environment is built on top of the one in which the MAKE-ENVIRONMENT
expression was evaluated, and therefore all these names are visible to
EVAL.
You ask about ACCESS, which is not in S&ICP, so I assume you are
talking about MIT Scheme instead of the restricted subset used in
S&ICP.
There are two possibilities for ACCESS:
Make it compatible with EVAL, and therefore make all the names (like X
and Y in your example) visible. This is the current implementation.
Make ACCESS look only at the "topmost" frame of the environment. This
means that all the names that can be exported from a package must be
defined in that package itself, and there is no "export" inheritance
between packages built on top of packages.
We tried the latter approach for a while and it was a total mess. We
quickly changed it to its alternative.
∂18-Nov-86 0915 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Scheme reports information request
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 18 Nov 86 09:15:37 PST
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 18 NOV 86 12:12:03 EST
Date: Tue, 18 Nov 86 12:14:33 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Scheme reports information request
To: prlb2!vauclair@SEISMO.CSS.GOV
cc: scheme@MC.LCS.MIT.EDU
In-reply-to: Msg of 18 Nov 86 10:50:34 N (Tue) from Marc Vauclair <prlb2!vauclair at seismo.CSS.GOV>
Message-ID: <[AI.AI.MIT.EDU].119770.861118.JAR>
Date: 18 Nov 86 10:50:34 N (Tue)
From: Marc Vauclair <prlb2!vauclair at seismo.CSS.GOV>
In the "Revised Revised Report on Scheme", I found the following
two little sentences:
on page 5:
"Formal definitions of the lexical and context-free syntaxes of Scheme
will be included in a separate report."
on page 7:
"A formal definition of the semantics of Scheme will be included in a
separate report."
Does those reports exist? Maybe using the same procedure as for the
Revised↑3 Report ?
The "separate report" alluded to actually IS section 7 of the Revised↑3
Report. So the answers are yes and yes, identically.
Jonathan
∂22-Nov-86 1845 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU truncate
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 22 Nov 86 18:45:14 PST
Received: from AI.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 22 NOV 86 21:43:38 EST
Date: Sat, 22 Nov 86 21:43:12 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: truncate
To: philbin-jim@YALE.ARPA
cc: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <122229.861122.JAR@AI.AI.MIT.EDU>
Date: 22 Nov 86 11:23:34 EST (Sat)
From: James F Philbin <philbin-jim at YALE.ARPA>
To: Rees at YALE.ARPA
Re: truncate
The definition of TRUNCATE in R3RS, p 20., seems ambiguous.
TRUNCATE returns the integer of maximal absolute
value not larger than the absolute value of x.
In the case of -1.1, for example, both 1 and -1 are of maximal
absolute value not larger than the absolute value of -1.1.
I suggest adding the phrase,
... with the same sign as x.
Right.
∂25-Nov-86 1315 @MC.LCS.MIT.EDU:camp%home%ti-csl.csnet@RELAY.CS.NET PC Scheme Utilities
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 25 Nov 86 13:12:00 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 25 Nov 86 16:04:51 EST
Received: from ti-csl by csnet-relay.csnet id ae04601; 25 Nov 86 15:43 EST
Received: from (home.ARPA) by tilde id AA24272; Tue, 25 Nov 86 14:05:13 cst
Received: by id AA13329; Tue, 25 Nov 86 14:04:35 cst
Date: Tue, 25 Nov 86 14:04:35 cst
From: Clyde Camp <camp%home%ti-csl.csnet@RELAY.CS.NET>
Message-Id: <8611252004.AA13329@>
To: SCHEME@MC.LCS.MIT.EDU
Subject: PC Scheme Utilities
For those of you interested in PCS, a set of free utilities with
documentation is available from:
Clyde R. Camp
Texas Instruments, Inc.
P.O.Box 226015, MS 238
Dallas, TX 75266
Send two blank, FORMATTED disks and a self-addressed, stamped envelope.
Although written primarily for the TIPC, everything except the
graphics should work on and of the IBM clones. The directories are:
UTILITY - Various text windowing, file printing and keyboard handlers
which simplify writing application programs (includes a file
pretty-printer and a new top-level read-eval-print loop which uses an
emacs-like line-editor with the capability to scroll back through
previous entries)
SWI - A convenient mechanism for invoking 8086 ASSY routines via the
rather undocumented SWI-INT.
HELP - A user-extendable on-line help facility which includes all of
the PCS functions and syntax as well as other info
GRAF - A object-style graphics package
PLOT - A general prupose function plotter
GAME1 - Self explanatory - non-graphics
GAME2 - for TIPC graphics
ERR←STAT - more utilities for messing with the status window
MENUSHEL - two menu driven command shells
This should also be available in ARC'd format on COMPUSERVE in the
near future.
- Clyde
∂03-Dec-86 1055 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Scheme redistribution for BITNET
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 3 Dec 86 10:55:01 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 3 Dec 86 13:12:32 EST
Date: Wed, 3 Dec 86 13:12:30 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Scheme redistribution for BITNET
To: scheme@MC.LCS.MIT.EDU
Message-ID: <125886.861203.JAR@AI.AI.MIT.EDU>
I'm looking for someone on BITNET to volunteer to maintain a BITNET
redistribution list for the Scheme@MC mailing list. This is necessary
because the machine that's acting as the Internet/BITNET gateway,
WISCVM.WISC.EDU, is swamped with mailing list mail. List administrators
(like me) are being asked to set up redistribution lists to help lighten
the load. If we can set one up for Scheme then WISCVM will only have to
relay each message to one host instead of the current 11 or 12 (more in
future).
If you're willing and able to take this on, please let me know.
Thanks...
- Jonathan
∂08-Dec-86 0049 @MC.LCS.MIT.EDU:CPH@AI.AI.MIT.EDU Ambiguity in number syntax
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Dec 86 00:49:07 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 8 Dec 86 03:49:17 EST
Date: Mon, 8 Dec 86 03:47:50 EST
From: Chris Hanson <CPH@AI.AI.MIT.EDU>
Subject: Ambiguity in number syntax
To: GJS@AI.AI.MIT.EDU, JAR@AI.AI.MIT.EDU
cc: RRRS-AUTHORS@MC.LCS.MIT.EDU
Message-ID: <127818.861208.CPH@AI.AI.MIT.EDU>
I was trying to implement a parser for the full number syntax in R3RS
and noticed that
#x1234e57
is ambiguous. Does it mean
(* #x1234 (expt 10 57))
or
19091031
Some solutions:
1. Flush scientific notation for hexadecimal numbers. Does anybody
really want to write real numbers (as opposed to integers or
rationals) in hexadecimal?
2. Require an explicit sign character in the exponent for such
numbers. Thus we would say
#x1234e+57
which is unambiguous.
I favor solution (2) since it leaves the syntax as general as
possible.
∂08-Dec-86 0835 @MC.LCS.MIT.EDU:muller@BU-CS.BU.EDU IBM PC Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Dec 86 08:35:11 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 8 Dec 86 11:30:53 EST
Received: from bu-cs.bu.edu by RELAY.CS.NET id aa00472; 8 Dec 86 11:03 EST
Return-Path: <muller>
Received: by bu-cs.bu.edu (5.31/4.7)
id AA14034; Sun, 7 Dec 86 08:41:05 EST
Date: Sun, 7 Dec 86 08:41:05 EST
From: Robert Muller <muller@BU-CS.BU.EDU>
Message-Id: <8612071341.AA14034@bu-cs.bu.edu>
To: scheme@MC.LCS.MIT.EDU
Subject: IBM PC Scheme
Does anyone know where I can pickup a version of Scheme that runs
on the IBM PC (XT w only 256k)?
thanks,
- Bob Muller
∂08-Dec-86 0934 @MC.LCS.MIT.EDU:HAL%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU IBM PC Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Dec 86 09:34:10 PST
Received: from OZ.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 8 DEC 86 12:06:32 EST
Date: Mon, 8 Dec 1986 12:06 EST
Message-ID: <HAL.12261186063.BABYL@MIT-OZ>
From: HAL%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU
To: Robert Muller <muller@BU-CS.BU.EDU>
Cc: scheme@MC.LCS.MIT.EDU
Subject: IBM PC Scheme
In-reply-to: Msg of 7 Dec 1986 08:41-EST from Robert Muller <muller at BU-CS.BU.EDU>
Texas instrument's PC scheme runs (barely) in 256K, but you can't
use the editor.
∂08-Dec-86 1016 @MC.LCS.MIT.EDU:jinx@GENEVA.AI.MIT.EDU Ambiguity in number syntax
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Dec 86 10:16:39 PST
Received: from geneva (TCP 2206400372) by MC.LCS.MIT.EDU 8 Dec 86 13:03:21 EST
Received: by GENEVA.AI.MIT.EDU; Mon, 8 Dec 86 12:51:20 est
Date: Mon, 8 Dec 86 12:51:20 est
From: jinx@GENEVA.AI.MIT.EDU (Guillermo J. Rozas)
Message-Id: <8612081751.AA02460@geneva>
To: CPH@AI.AI.MIT.EDU
Cc: GJS@AI.AI.MIT.EDU, JAR@AI.AI.MIT.EDU, RRRS-AUTHORS@MC.LCS.MIT.EDU
In-Reply-To: Chris Hanson's message of Mon, 8 Dec 86 03:47:50 EST
Subject: Ambiguity in number syntax
There is yet another possibility, which is the one I like best:
#x1234e57
means
(* #x1234 (expt #x10 #x57))
∂09-Dec-86 0812 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU (define foo)
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Dec 86 08:12:11 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 9 Dec 86 11:11:32 EST
Date: Tue, 9 Dec 86 11:10:05 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: (define foo)
To: andy@ADS.ARPA
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Sun 7 Dec 86 22:56:01 PST from andy at hobbes.ads.ARPA (Andy Cromarty)
Message-ID: <128392.861209.JAR@AI.AI.MIT.EDU>
Date: Sun, 7 Dec 86 22:56:01 PST
From: andy at hobbes.ads.ARPA (Andy Cromarty)
A lot of MIT code (among other software) seems to contain the cliche'
(define foo) ; Create an unbound instance of FOO
(let ((some-lexical-var 'x)) ; Create a closure....
(set! foo (lambda () ; Define outer FOO to reference
: ; vars visible only in this lexenv.
:
)))
This does not seem to be permitted, even optionally, by the existing R3RS,
as far as I've noticed. Did I miss something, or is it intentional that
(DEFINE FOO) is not permitted, or was it an oversight? I don't recall
having seen discussion of this topic.
If you missed something then I did too. I have no recollection of this
being discussed.
In trying to write portable Scheme code (it's difficult) I find myself
saying things like (define foo 'undefined) pretty often. I don't find
this to be a major inconvenience, but it is an inconvenience. I don't
see any serious problem with the (define foo) construct. It would
presumably mean the same thing as (define foo <undefined>) where
<undefined> is that mysterious expression described in the discussion of
LETREC in section 7.3. A correct immplementation of <undefined> would
of course be 'undefined (or just about anything else), the only
disadvantage of which is that it allow certain error situations to go
undetected.
For symmetry you'd want the syntax to be allowed for both internal
define's and top-level define's. For this to work you'd have to apply the
(define foo) => (define foo <undefined>) rewrite before applying the
define => letrec rewrite.
This feature is implicitly permitted "optionally", because it is a
compatible extension.
Jonathan
∂17-Dec-86 0712 @MC.LCS.MIT.EDU:bartley%home%ti-csl.csnet@RELAY.CS.NET What is comma-dot?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 17 Dec 86 07:12:43 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 17 Dec 86 10:11:42 EST
Received: from ti-csl by csnet-relay.csnet id ah05539; 17 Dec 86 9:36 EST
Received: from (home.ARPA) by tilde id AA06413; Tue, 16 Dec 86 13:40:14 cst
Received: by id AA01741; Tue, 16 Dec 86 13:39:29 cst
Date: Tue, 16 Dec 86 13:39:29 cst
From: David Bartley <bartley%home%ti-csl.csnet@RELAY.CS.NET>
Message-Id: <8612161939.AA01741@>
To: RRRS-Authors@MC.LCS.MIT.EDU
Cc: Bartley%home%ti-csl.csnet@RELAY.CS.NET
Subject: What is comma-dot?
Can those of us that permit the destructive splicing operation `,.'
inside quasiquote agree on the symbol it corresponds to? That is, if
,@X is equivalent to (unquote-splicing X), what is ,.X equivalent to?
Perhaps a future R↑nRS should mention this as an extension.
∂31-Dec-86 1100 @MC.LCS.MIT.EDU:NETWORK%FRSAC11.BITNET@WISCVM.WISC.EDU SCOOPS
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 31 Dec 86 11:00:00 PST
Received: from WISCVM.WISC.EDU (TCP 20032201015) by MC.LCS.MIT.EDU 31 Dec 86 13:37:15 EST
Received: from (NETWORK)FRSAC11.BITNET by WISCVM.WISC.EDU on 12/30/86
at 14:48:44 CST
Date: Tue, 30 Dec 86 19:30:47 ZONE
To: SCHEME@MC.LCS.MIT.EDU
From: NETWORK%FRSAC11.BITNET@WISCVM.WISC.EDU
Subject: SCOOPS
NETWORK at FRSAC11
To: SCHEME at MC.LCS.M
I just got PC-SCOOPS, (by FTP, courtesy of TI), but I do not run PC-Scheme
but CScheme.... Anybody can help ? (In CScheme there is the rrrs compatibility
package... never tried it, but should be good.)
Sincerly,
+--------------------------------------------------+
| Jean-Pierre H. Dumas |
| Cisi-Telematique |
| CEN Saclay, BP 24 |
| 91190 Gif sur Yvette |
| France |
| |
| Phone: +33 (1) 69 08 46 87 |
| |
| network@frsac11 (bitnet) |
| network%frsac11.bitnet@wiscvm.wisc.edu (arpanet) |
| ..!ihnp4!frsac11.bitnet!network (usenet ?) |
| dumas@sumex-aim.stanford.edu (arpanet) |
+--------------------------------------------------+
∂31-Dec-86 1319 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU What is comma-dot?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 31 Dec 86 13:19:46 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 31 Dec 86 15:59:23 EST
Date: Wed, 31 Dec 86 16:01:03 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: What is comma-dot?
To: bartley%home%ti-csl.csnet@RELAY.CS.NET
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Tue 16 Dec 86 13:39:29 cst from David Bartley <bartley%home%ti-csl.csnet at RELAY.CS.NET>
Message-ID: <135327.861231.JAR@AI.AI.MIT.EDU>
Date: Tue, 16 Dec 86 13:39:29 cst
From: David Bartley <bartley%home%ti-csl.csnet at RELAY.CS.NET>
To: RRRS-Authors at MC.LCS.MIT.EDU
cc: Bartley%home%ti-csl.csnet at RELAY.CS.NET
Re: What is comma-dot?
Message-Id: <8612161939.AA01741@>
Can those of us that permit the destructive splicing operation `,.'
inside quasiquote agree on the symbol it corresponds to? That is, if
,@X is equivalent to (unquote-splicing X), what is ,.X equivalent to?
Perhaps a future R↑nRS should mention this as an extension.
I think this feature is a kludge; I presume you have Common Lisp in
mind. How about "UNQUOTE-SPLICING!" ?
Jonathan
∂31-Dec-86 1333 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU [COMSAT: Msg of Monday, 22 December 1986 16:31-EST]
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 31 Dec 86 13:33:28 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 31 Dec 86 15:59:42 EST
Date: Wed, 31 Dec 86 16:01:47 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: [COMSAT: Msg of Monday, 22 December 1986 16:31-EST]
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <135329.861231.JAR@AI.AI.MIT.EDU>
Date: Thu, 25 Dec 86 21:08:55 EST
From: Communications Satellite <COMSAT at AI.AI.MIT.EDU>
To: JAR at AI.AI.MIT.EDU
Re: Msg of Monday, 22 December 1986 16:31-EST
Message-ID: <134306.861225@AI.AI.MIT.EDU>
FAILED: rrrs-authors at MC.LCS.MIT.EDU; Host appears to be permanently down or not accepting mail.
Failed message follows:
-------
Date: Mon, 22 Dec 86 16:31:02 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: New, improved quasiquote
To: bartley%home%ti-csl.csnet@RELAY.CS.NET
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Wed 17 Dec 86 16:40:28 cst from David Bartley <bartley%home%ti-csl.csnet at RELAY.CS.NET>
Message-ID: <133673.861222.JAR@AI.AI.MIT.EDU>
Date: Wed, 17 Dec 86 16:40:28 cst
From: David Bartley <bartley%home%ti-csl.csnet at RELAY.CS.NET>
You mailed out a copy of your expand-quasiquote procedure at my
request 13 months ago. Do you have an updated version you could be
persuaded to make public? We never switched over to your algorithm,
but the recent changes to the specification mean we have to rewrite
our quasiquote handler anyway, so it would be nice to continue our
grand tradition of "borrowing" from university sources!
I have several versions. Here is one from which I have removed several
different optimizations. I did this in an attempt to make the code as
simple as possible, without sacrificing too much efficiency. Simpler
versions are possible, as are more optimal ones. E.g. this one won't
generate (vector ...) or (list ...), but it does do maximal sharing of
constant substructure.
You can do (define (system x) x) to get this to work, although in the
Scheme implementation from which this was taken I actually make this
return a funny expression which is an absolute reference to x, so that
things like (let ((cons +)) `(,a b)) works.
- Jonathan
;;; Quasiquote
(define-rewriter 'quasiquote
(lambda (x)
(expand-quasiquote x 0)))
(define (expand-quasiquote x level)
(descend-quasiquote x level finalize-quasiquote))
(define (finalize-quasiquote mode arg)
(cond ((eq? mode 'quote) `',arg)
((eq? mode 'unquote) arg)
((eq? mode 'unquote-splicing)
(error ",@ in illegal context" arg))
(else `(,mode ,@arg))))
(define (descend-quasiquote x level return)
(cond ((vector? x)
(descend-quasiquote-vector x level return))
((not (pair? x))
(return 'quote x))
((interesting-to-quasiquote? x 'quasiquote)
(descend-quasiquote-pair x (1+ level) return))
((interesting-to-quasiquote? x 'unquote)
(cond ((= level 0)
(return 'unquote (cadr x)))
(else
(descend-quasiquote-pair x (- level 1) return))))
((interesting-to-quasiquote? x 'unquote-splicing)
(cond ((= level 0)
(return 'unquote-splicing (cadr x)))
(else
(descend-quasiquote-pair x (- level 1) return))))
(else
(descend-quasiquote-pair x level return))))
(define (descend-quasiquote-pair x level return)
(descend-quasiquote (car x) level
(lambda (car-mode car-arg)
(descend-quasiquote (cdr x) level
(lambda (cdr-mode cdr-arg)
(cond ((and (eq? car-mode 'quote) (eq? cdr-mode 'quote))
(return 'quote x))
((eq? car-mode 'unquote-splicing)
;; (,@mumble ...)
(cond ((and (eq? cdr-mode 'quote) (null? cdr-arg))
(return 'unquote
car-arg))
(else
(return (system 'append)
(list car-arg (finalize-quasiquote cdr-mode cdr-arg))))))
(else
(return (system 'cons)
(list (finalize-quasiquote car-mode car-arg)
(finalize-quasiquote cdr-mode cdr-arg))))))))))
(define (descend-quasiquote-vector x level return)
(descend-quasiquote (vector->list x) level
(lambda (mode arg)
(case mode
((quote) (return 'quote x))
(else (return (system 'list->vector)
(list (finalize-quasiquote mode arg))))))))
(define (interesting-to-quasiquote? x marker)
(and (pair? x) (eq? (car x) marker)))
∂05-Jan-87 0803 @MC.LCS.MIT.EDU:NETWORK%FRSAC11.BITNET@WISCVM.WISC.EDU SYMBOLIC COMPUTATION.
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 5 Jan 87 08:03:49 PST
Received: from WISCVM.WISC.EDU (TCP 20032201015) by MC.LCS.MIT.EDU 5 Jan 87 10:57:12 EST
Received: from (NETWORK)FRSAC11.BITNET by WISCVM.WISC.EDU on 01/05/87
at 09:57:19 CST
Date: Wed, 31 Dec 86 16:27:48 ZONE
To: SCHEME@MC.LCS.MIT.EDU
From: NETWORK%FRSAC11.BITNET@WISCVM.WISC.EDU
Subject: SYMBOLIC COMPUTATION.
NETWORK at FRSAC11
To: SCHEME at MC.LCS.M
Does anybody know about a Scheme package to do symbolic computation ??
(a la Reduce, Macsyma...)
P.S. I run CScheme on UTS/V.
Happy new year.
+--------------------------------------------------+
| Jean-Pierre H. Dumas |
| Cisi-Telematique |
| CEN Saclay, BP 24 |
| 91190 Gif sur Yvette |
| France |
| |
| Phone: +33 (1) 69 08 46 87 |
| |
| network@frsac11 (bitnet) |
| network%frsac11.bitnet@wiscvm.wisc.edu (arpanet) |
| ..!ihnp4!frsac11.bitnet!network (usenet ?) ∀
| dumas@sumex-aim.stanford.edu (arpanet) |
+--------------------------------------------------+
∂05-Jan-87 2047 @MC.LCS.MIT.EDU:willc%tekchips.tek.com@RELAY.CS.NET Re: What is comma-dot?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 5 Jan 87 20:46:48 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 5 Jan 87 23:44:13 EST
Received: from tektronix.tek.com by csnet-relay.csnet id aa06713;
5 Jan 87 18:44 EST
Received: by tektronix.TEK.COM (5.31/6.18)
id AA10436; Mon, 5 Jan 87 12:57:18 PST
Received: by tekchips.TEK (5.31/6.16)
id AA06076; Mon, 5 Jan 87 12:58:16 PST
Message-Id: <8701052058.AA06076@tekchips.TEK>
To: JAR@AI.AI.MIT.EDU, bartley%home%ti-csl.csnet@RELAY.CS.NET
Cc: adams%tekchips.tek.com@RELAY.CS.NET, rrrs-authors@MC.LCS.MIT.EDU
Subject: Re: What is comma-dot?
In-Reply-To: Your message of Wed, 31 Dec 86 16:01:03 EST.
<135327.861231.JAR@AI.AI.MIT.EDU>
Date: 05 Jan 87 12:58:13 PST (Mon)
From: willc%tekchips.tek.com@RELAY.CS.NET
Just as standardization can be a destructive force, by encouraging the use
of standardized but doubtful features, so can lack of standardization be a
creative force, by discouraging use of non-standardized doubtful features.
I consider comma-dot an excellent candidate for non-standardization.
Will
∂06-Jan-87 0824 @MC.LCS.MIT.EDU:bartley%home%ti-csl.csnet@RELAY.CS.NET What is comma-dot?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 6 Jan 87 08:24:41 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 6 Jan 87 11:21:14 EST
Received: from ti-csl by csnet-relay.csnet id ab01368; 6 Jan 87 10:22 EST
Received: from (home.ARPA) by tilde id AA09833; Tue, 6 Jan 87 08:46:02 cst
Received: by id AA20269; Tue, 6 Jan 87 08:46:09 cst
Date: Tue, 6 Jan 87 08:46:09 cst
From: David Bartley <bartley%home%ti-csl.csnet@RELAY.CS.NET>
Message-Id: <8701061446.AA20269@>
To: RRRS-Authors@MC.LCS.MIT.EDU
Subject: What is comma-dot?
> From: David Bartley <bartley@home>
>
> Can those of us that permit the destructive splicing operation `,.'
> inside quasiquote agree on the symbol it corresponds to? That is, if
> ,@X is equivalent to (unquote-splicing X), what is ,.X equivalent to?
> Perhaps a future R↑nRS should mention this as an extension.
> From: willc@tekchips.tek.com
>
>Just as standardization can be a destructive force, by encouraging the use
>of standardized but doubtful features, so can lack of standardization be a
>creative force, by discouraging use of non-standardized doubtful features.
>I consider comma-dot an excellent candidate for non-standardization.
Will seems to have stated the consensus, if the other replies to my
original message are representative. I will adopt JAR's suggested
name, UNQUOTE-SPLICING!, but agree that this is a "doubtful" feature
and that standardization isn't called for.
∂10-Jan-87 1130 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU 2nd test
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 10 Jan 87 11:30:03 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 10 Jan 87 14:12:22 EST
Date: Sat, 10 Jan 87 14:15:10 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: 2nd test
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <138728.870110.JAR@AI.AI.MIT.EDU>
This is a second test message for today, which everyone should feel at
liberty to ignore.
∂16-Jan-87 0850 @MC.LCS.MIT.EDU:dfried%iuvax.cs.indiana.edu@RELAY.CS.NET multiple values and T
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 16 Jan 87 08:50:06 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 16 Jan 87 11:45:30 EST
Received: from indiana by csnet-relay.csnet id ac26709; 16 Jan 87 11:32 EST
Date: Fri, 16 Jan 87 09:56:21 est
From: Dan Friedman <dfried%iuvax.cs.indiana.edu@RELAY.CS.NET>
To: rrrs-authors%mit-mc.CSNET@RELAY.CS.NET
Subject: multiple values and T
Here is the material taken from "T Version 3.0 Release Notes" concerning
multiple return values. Following this material will be a short example
which demonstrates how this could be made more general.
Version 3.0 of T supports multiple return values. This makes procedure
call and return uniform, in te sense that a procedure can be invoked with
zero or more values and can return zero or more values.
(return {value}*) ==> {value}* procedure
return returns its arguments as the values(s) of the current expression.
In order to access the value(s) of a return expression the value(s) must be
bound to identifiers using either receive or receive-values.
For example,
((lambda () (return 1 2 3))) ==> 1 2 3
where "==> 1 2 3" denotes evaluates to the three values 1, 2, and 3.
return when invoked with no arguments returns to the calling procedure with
no value. Thus (return) will return to its caller with no value. It is an
error to return no value to a value requiring poisition. For example,
(list 'a (return)) ==> error
The idiom (return) is useful for procedures that return an undefined value and
many of the system procedures whose value(s) is(are) undefined now return no
value. However, the procedure undefined-value may provide a more informative
error message.
(receive-values receiver sender) procedure
==> value(s) of receiver
receive-values returns the value of applying receiver, a procedure of n
arguments, to the values returned by sender. sender is a thunk, a procedure
of no arguments, which returns n values.
For example,
(receive-values (lambda (x y) (list x y))
(lambda () (return 1 2))) ==> (1 2)
(receive ({ident}*) expression {body}*) syntax
==> value of body
In a receive form the expression is evaluated in the current environment
and the values returned by the expression are bound to the corresponding
identifiers. body, which should be a lambda body, i.e. a sequence of one
or more expressions, is evaluated in the extended environment and the
value(s) of the last expression in body is returned.
The expression
(receive (a b c) (return 1 2 3)
(list a b c))
==> (1 2 3)
is equivalent to
(receive-values (lambda (a b c) (list a b c))
(lambda () (return 1 2 3)))
==> (1 2 3)
Other froms have been extended in T3.0 to allow multiple return values.
(catch identifier {body}*) ==> value of body syntax
The identifier is bound to the continuation of the catch form, which is now
an n-ary procedure. This means that catch forms can return multiple values.
The continuation can be invoked only during the dynamic extent of the catch
form. In T2 the continuation was a procedure of one argument. For example,
(catch x (list 1 (x 2 3) 4)) ==> 2 3
(ret {value}*) ==> {value}* procedure
returns zero or more values as the value of the current read-eval-print loop.
Note: Multiple values are implemented efficiently. It may be more efficient
to use multiple values than to pass continuations.
End of disccusion from the Relases Notes.
What disturbs me is the way that it does not seem to be as general as it
could be. What I would like to propose is the ability to splice in return
values. Here is an example:
((lambda (a b c q x y) ...)
(return 1 2 3) 4 (return 5 6)).
It is possible that this capability is exactly what T Version 3.0 does.
However, there were no examples of this type so I believe this has been
overlooked.
I know that when we met in Cambridge Jonathan offered to work on multiple
values. This is something for all of us to consider.
Dan
∂16-Jan-87 1400 @MC.LCS.MIT.EDU:hudak-paul@YALE.ARPA Re: multiple values and T
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 16 Jan 87 13:59:53 PST
Received: from yale-eli.YALE.ARPA (TCP 20011000001) by MC.LCS.MIT.EDU 16 Jan 87 16:59:39 EST
Received: by yale-eli.YALE.ARPA; Fri, 16 Jan 87 16:22:37 est
Date: Fri, 16 Jan 87 16:22:37 est
From: Paul Hudak <hudak-paul@YALE.ARPA>
Message-Id: <8701162122.AA06172@yale-eli.YALE.ARPA>
Received: by yale-ring (node-add2.ring.cs.yale.edu/ADD2)
via WIMP-MAIL (Version 1.2/1.4) ; Fri Jan 16 16:19:37
Subject: Re: multiple values and T
To: Dan Friedman <dfried%iuvax.cs.indiana.edu@RELAY.CS.NET>
Cc: rrrs-authors@mc.lcs.mit.edu
In-Reply-To: Dan Friedman <dfried%iuvax.cs.indiana.edu@RELAY.CS.NET>, Fri, 16 Jan 87 09:56:21 est
...
End of disccusion from the Relases Notes.
What disturbs me is the way that it does not seem to be as general as it
could be. What I would like to propose is the ability to splice in return
values. Here is an example:
((lambda (a b c q x y) ...)
(return 1 2 3) 4 (return 5 6)).
It is possible that this capability is exactly what T Version 3.0 does.
However, there were no examples of this type so I believe this has been
overlooked.
No, T does not do this (by design). The problem is that it's not always
obvious what the bindings are. For example, replace the above two
occurrences of RETURN with calls to unknown procedures:
((lambda (a b c q x y) ...)
(f) 4 (g))
The problem with this is that one cannot tell, looking at this code alone,
which bound variable 4 is bound to. Indeed, different invocations of this
may induce different bindings, depending on the bindings of f and g! This
seems to us to violate one's notion of referential transparency.
Paul Hudak
David Kranz
Richard Kelsey
-------
∂16-Jan-87 1645 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU multiple values
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 16 Jan 87 16:45:24 PST
Received: from ZERMATT.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 16 JAN 87 19:45:15 EST
Received: from ROCKY-GRAZIANO.LCS.MIT.EDU by ZERMATT.LCS.MIT.EDU via CHAOS with CHAOS-MAIL id 24803; Fri 16-Jan-87 19:45:02 EST
Date: Fri, 16 Jan 87 19:45 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: multiple values
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <870116194506.1.JAR@ROCKY-GRAZIANO.LCS.MIT.EDU>
Maybe some of you missed or have forgotten the relevant discussion last
October and November, so here's a digest. If you remember this stuff,
you needn't examine this message any further, and I apologize for
cluttering your mailboxes.
The mechanism in T3 is essentially the same as that presented in my
message of Thu, 30 Oct 86 22:08:03 EST. That message also includes some
motivation, which I won't repeat here, and Dan has already sent out the
technical content. The rather important detail ommitted from the T3
release notes is that it's an error whenever the number of values
expected doesn't match the number delivered, and argument and predicate
positions expect exactly one value. Thus (list (return 1 2)) is an
error in T3 and in my proposal.
The mechanism that Dan Friedman proposes was suggested on this list by
Andy Freeman:
Date: Thu 30 Oct 86 12:25:22-PST
From: Andy Freeman <ANDY@Sushi.Stanford.EDU>
This proposal is a variant on the technique Carolyn Talcott used
in her thesis; Richard Weyrauch was also involved in that work.
Their idea requires one procedure; I'll call it values. Procedure
invocation spreads multiple values; (cons (values 1 2)) is completely
equivalent to (cons 1 2) and (list (values) 4 (values 1 2) 3) is
equivalent to (list 4 1 2 3). ...
It was dismissed by the only people on the list (besides maybe Sussman)
who had actual experience using it, namely Steele and Gabriel:
Date: Mon, 3 Nov 86 11:24 EST
From: Guy Steele <gls@Think.COM>
It [MARVEL] did pretty much all the obvious things: every function
call was implicitly like the Common Lisp MULTIPLE-VALUE-CALL, and
most side-effecting forms such as SETQ, PRINT, and COMMENT were made
to return zero values. I believe I also arranged for variables to
be able to hold multiple values.
My experience with the language was that it was perfectly clean
and elegant, but programs that made non-trivial use of multiple
values were very hard to read, precisely because of the loss
of the one-form/one-value correspondence. Having the extra power
everywhere in the language was not worth the loss of clarity.
I therefore abandoned the experiment without writing it up.
(Maybe I should have, but there were other, more promising variations
of Scheme to explore.)
...
I believe that experience with the POP languages (especially POP-2)
may be relevant to this discussion, but I am not an expert there.
Date: 03 Nov 86 1214 PST
From: Dick Gabriel <RPG@SAIL.STANFORD.EDU>
...
The code, as Steele mentions, was elegant in a certain sense, but
very hard to read most of the time, because you had to take into
account that some other values than the primary value (the first
one) would be passed to some program. The places where SEUS code
was easy to read were when you were writing something that, in
Common Lisp, would be
(multiple-value-call #'foo (baz) (bar))
The places where it was hard to read were when you were writing something
that, in Common Lisp, would be
(foo (baz) (bar))
That is, there was no easy way to check that the right values from the
right places got passed. I think that the latter is the more commonly
used case, so SEUS was optimized the wrong way.
...
When the Common Lisp multiple value scheme was being devised, I thought
that we (the designers) should look at SEUS for its experience. I'm now
glad we didn't do anything more that invent MULTIPLE-VALUE-CALL as a
result of that experience.
I tend to agree that it's a bad idea, not only from the point of view of
someone using it, but also for implementation reasons: unlike the T
proposal, which is trivially implementable (VALUES = LIST) in any scheme
implementation, it's grossly incompatible with current implementations;
and it has a performance cost that you have to always pay for, even when
you're not using the feature, because all calls to unknown procedures
must be prepared to splice in an arbitrary amount of crud.
Jonathan
∂16-Jan-87 1656 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU [vanroggen%bizet.DEC: LISP POINTERS newsletter announcement]
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 16 Jan 87 16:56:12 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 16 Jan 87 19:48:29 EST
Date: Fri, 16 Jan 87 19:51:30 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: [vanroggen%bizet.DEC: LISP POINTERS newsletter announcement]
To: scheme@MC.LCS.MIT.EDU
Message-ID: <141187.870116.JAR@AI.AI.MIT.EDU>
Apologies to those of you who are on both SCHEME and COMMON-LISP.
Date: Friday, 16 Jan 1987 06:42:06-PST
From: vanroggen%bizet.DEC at decwrl.DEC.COM
To: common-lisp at sail.stanford.edu,
vanroggen%bizet.DEC at decwrl.DEC.COM
Re: LISP POINTERS newsletter announcement
Message-Id: <8701161443.AA21565@decwrl.dec.com>
*** ANNOUNCEMENT ***
LISP POINTERS
We're putting together a newsletter and we'd like you to come along.
Every other month, starting in March of 1987, Lisp Pointers will
be bringing you articles, implementation summaries, opinion columns,
and information on the lastest action on the standardization front.
And we need you -- to contribute to our departments, to read the
results of our efforts, and to suggest ways we can provide more of the
kinds of information you want to see.
Lisp Pointers is being funded by companies who care about the future
of Lisp. The editorial content of the newsletter will not be
influenced by these companies nor will the companies be responsible
for the material contained within Lisp Pointers. Until such time as
we affiliate with a more formal organization, subscriptions to Lisp
Pointers will be free. Please spread the word among your friends,
both real and electronic.
Our newsletter will be available through the mails. To join our
mailing list, send your name and address to:
Mary S. Van Deusen, Editor
IBM Research
PO Box 704
Yorktown Heights, New York 10598
914-789-7845
617-384-2526
MAIDA@IBM.COM
Contributions should be sent directly to the appropriate department:
***LETTERS TO THE EDITOR, NEWS ITEMS***
Mary S. Van Deusen (see above)
***IMPLEMENTATIONS***
Walter van Roggen
DEC
77 Reed Road
HL02-3/E9
Hudson, Massachusetts 01749
617-568-5617
VANROGGEN%BACH.DEC@DECWRL.DEC.COM
***BOOK REVIEWS, BIBLIOGRAPHIES***
Daniel Weinreb
Symbolics, Inc.
11 Cambridge Center
Cambridge, Massachusetts 02142
617-577-7500
DLW@MC.LCS.MIT.EDU
***X3J3 LISP STANDARDIZATION***
Robert F. Mathis
9712 Ceralene Drive
Fairfax, Virginia 22032
703-425-5923
mathis@b.isi.edu
***USERS***
Susan Ennis
Amoco Production Co.
PO Box 3385
Tulsa, Oklahoma 74102
918-660-3588
***TECHNICAL ARTICLES***
Jonl White
Lucid, Inc.
707 Laurel Street
Menlo Park, California 94025
415-329-8400
edsel!bhopal!jonl@navajo.stanford.edu
***ENVIRONMENTS***
John Foderaro
Franz Inc.
1141 Harbor Bay Parkway
Suite 270
Alameda, California 94501
415-769-5656
jkf%franz.uucp@berkeley.edu
***SCHEME***
Will Clinger M/S 50-662
Tektronics Inc.
PO Box 500
Beaverton, Oregon 97077
willc%tekchips@tek.csnet
503-627-4675
***LISP QUESTIONS***
Patrick Dussud
Texas Instruments
12501 Research Boulevard
MS 2201
Austin, Texas 78759
dussud%jenner%ti-csl.csnet@csnet-relay
***INTERNATIONAL ISSUES***
Christian Quiennec
LITP
4 Place Jussieu
F-75252, Paris Cedex 05
FRANCE
tel: +33 (1) 43 36 25 25 x 5251
UUCP: ..!mcvax!inria!queinnec
ARPA: mcvax!inria!queinnec@seismo.css.GOV
∂18-Jan-87 2027 @MC.LCS.MIT.EDU:ramsdell%faron@mitre-bedford.ARPA Scheme time
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 18 Jan 87 20:27:48 PST
Received: from mitre-bedford.ARPA (TCP 3200600102) by MC.LCS.MIT.EDU 18 Jan 87 23:26:54 EST
Organization: The MITRE Corp., Bedford, MA
Received: by faron.MENET (4.12/4.7)
id AA10400; Sun, 18 Jan 87 23:25:14 est
Date: Sun, 18 Jan 87 23:25:14 est
From: John D. Ramsdell <ramsdell%faron@mitre-bedford.ARPA>
Posted-Date: Sun, 18 Jan 87 23:25:14 est
Message-Id: <8701190425.AA10400@faron.MENET>
To: rrrs-authors%mc.lcs.mit.edu@mitre-bedford.ARPA
Subject: Scheme time
I noticed there is no standard time function for scheme.
Let me propose the following:
(days-after-J2000.0) => current time in units of days
as a floating point number. The time origin is noon,
January 1, 2000. This date is called J2000.0 by astronomers,
and represents a good time origin for those who are interested
in computing the position of the sun and other stars. For
example, a formula that gives the approximate location of the
sun in these units is in "The Astronomical Almanac for the Year
1984", US Naval Observatory and Royal Greenwich Observatory,
US Government Printing Office, Washington DC, 1984.
John
∂25-Jan-87 1837 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU [vanroggen%bach.DEC: Looking for Lisps...]
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 25 Jan 87 18:36:48 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 25 Jan 87 21:34:00 EST
Date: Sun, 25 Jan 87 21:32:13 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: [vanroggen%bach.DEC: Looking for Lisps...]
To: scheme@MC.LCS.MIT.EDU
Message-ID: <144637.870125.JAR@AI.AI.MIT.EDU>
Apologies to those of you who have seen this message already.
I have nothing to do with this newsletter; I'm just forwarding this
message because I thought people on the scheme list might be interested.
- Jonathan
Date: Tuesday, 20 Jan 1987 14:48:29-PST
From: vanroggen%bach.DEC at decwrl.DEC.COM
To: common-lisp at sail.stanford.edu,
vanroggen%bach.DEC at decwrl.DEC.COM
Re: Looking for Lisps...
Message-Id: <8701202249.AA09113@decwrl.dec.com>
As part of a feature of the LISP POINTERS newsletter, we'd like to collect
descriptions of all currently available Lisp implementations.
Any kind of Lisp is acceptable; it doesn't have to be Common Lisp or Scheme or
Interlisp or MacLisp. It doesn't have to be a commercially supported product
either; it can be free with no warranties whatsoever.
If you're working on an implementation, and you're willing to describe it
for everyone's benefit, send us at least the following information:
Implementation Name
Implemented to which standard (if any)
Features (if no standard; see the suggested list of issues below)
Additional Features (if implemented according to a standard)
Missing Features (if implemented according to a standard)
Current version/availability/prices
Support (if supported, by whom; sources available?)
Machine(s)
Operating System(s)
Source or Contact
Any other comments
Submitter's name, address, and net-address
Some features you might want to comment on include:
Predefined data types
Name spaces and scopes and extents
Control structures (e.g., special forms, non-local goto's, multiple
values, multiple stacks, tasking, multi-processor support)
Typing and declarations
Garbage collection
I/O functions
Compiler
Object-oriented support
Graphics and windowing support
Programming tools (e.g., graphics packages, editor interaction,
system maintenance)
Interaction with other languages
AI-oriented tools (e.g., pattern matching, rules, database support,
natural language interface)
Any other interesting features
Send this information to:
Walter van Roggen
Net address: VANROGGEN%BACH.DEC@DECWRL.DEC.COM
Mail address: HLO2-3/E9, 77 Reed Rd, Hudson MA, 01749, USA
∂02-Feb-87 1040 @MC.LCS.MIT.EDU:ramsdell%faron@mitre-bedford.ARPA Time Scales
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 2 Feb 87 10:37:56 PST
Received: from mitre-bedford.ARPA (TCP 3200600102) by MC.LCS.MIT.EDU 2 Feb 87 13:34:57 EST
Posted-From: The MITRE Corp., Bedford, MA
Received: by faron.MENET (4.12/4.7)
id AA04621; Mon, 2 Feb 87 13:30:28 est
Date: Mon, 2 Feb 87 13:30:28 est
From: John D. Ramsdell <ramsdell%faron@mitre-bedford.ARPA>
Posted-Date: Mon, 2 Feb 87 13:30:28 est
Message-Id: <8702021830.AA04621@faron.MENET>
To: rrrs-authors%mc.lcs.mit.edu@mitre-bedford.ARPA
Subject: Time Scales
Astromomers often measure time using the Julian Date and the
Modified Julian Date. The Julian date is the number of days
since the "begining of time" as estimated by some one from the
god squad of the Middle Ages. The day begins at noon GMT, and
today's date at 1PM EST is JD2446829.3. The Julian date is
useful because there is no need to worry about things like
leap years and changes in the calendar when measuring time
differences. Another useful unit of measurement is the
Modified Julian Date. It is the number of years after
0, January 1, noon GMT. The number looks like the year we
are used to. Today's date is J1987.2. Useful conversions:
J2000.0 = 2000 January 1, noon GMT = JD2451545.0.
J2000.0 is the origin of many formulas that give the position of
the sun and the moon, and these formulas often measure time in
units of days. Hence, my suggestion for (days-after-J2000.0).
John
∂03-Feb-87 0433 @MC.LCS.MIT.EDU:ramsdell%faron@mitre-bedford.ARPA X windows
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 3 Feb 87 04:32:36 PST
Received: from mitre-bedford.ARPA (TCP 3200600102) by MC.LCS.MIT.EDU 3 Feb 87 07:33:34 EST
Posted-From: The MITRE Corp., Bedford, MA
Received: by faron.MENET (4.12/4.7)
id AA10580; Tue, 3 Feb 87 07:30:51 est
Date: Tue, 3 Feb 87 07:30:51 est
From: John D. Ramsdell <ramsdell%faron@mitre-bedford.ARPA>
Posted-Date: Tue, 3 Feb 87 07:30:51 est
Message-Id: <8702031230.AA10580@faron.MENET>
To: rrrs-authors%mc.lcs.mit.edu@mitre-bedford.ARPA
Subject: X windows
I seems that many are standardizing on X windows.
Maybe we should add some X window calls as non-essential
Scheme?
John
∂04-Feb-87 0744 @MC.LCS.MIT.EDU:andy@hobbes.ads.ARPA Re: X windows
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 4 Feb 87 07:42:00 PST
Received: from grape.ads.ARPA (TCP 1200400070) by MC.LCS.MIT.EDU 4 Feb 87 10:41:35 EST
Received: by hobbes.ads.arpa (3.2/SMI-3.2)
id AA12106; Tue, 3 Feb 87 09:16:18 PST
Date: Tue, 3 Feb 87 09:16:18 PST
From: andy@hobbes.ads.ARPA (Andy Cromarty)
Message-Id: <8702031716.AA12106@hobbes.ads.arpa>
To: rrrs-authors@mc.lcs.mit.edu
Subject: Re: X windows
Cc: ramsdell%faron@mitre-bedford.ARPA
Reply-To: andy@ads.arpa
Standardization on a window system seems premature. Use of
X (or any other system) is a local phenomenon; in different locales
many competing window systems are in use. If we were to support
window system primitives, it seems to make more sense to support
a metastandard like NeWS, which will incorporate X, Postscript, possibly
Andrew, and other windowing and graphical display approaches -- although
this too seems premature at the present.
If we are going to support graphics and other "foreign" capabilities,
I believe our time would be more fruitfully spent in defining a
general mechanism for embedding foreign (non-Scheme) functions
into the Scheme environment. This is far from a cleanly solved
problem in current LISPs, and a good solution would subsume, and
hence obviate the need for, definition of a case-by-case approach
to embedding specific window, graphics, numerical, and other foreign
packages into Scheme.
asc
∂05-Feb-87 0742 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA Windows
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 5 Feb 87 07:42:37 PST
Received: from mitre-bedford.ARPA (TCP 3200600102) by MC.LCS.MIT.EDU 5 Feb 87 10:33:30 EST
Posted-From: The MITRE Corp., Bedford, MA
Received: by linus.MENET (1.1/4.7)
id AA00820; Thu, 5 Feb 87 07:51:00 EST
Date: Thu, 5 Feb 87 07:51:00 EST
From: John D. Ramsdell <ramsdell%linus@mitre-bedford.ARPA>
Posted-Date: Thu, 5 Feb 87 07:51:00 EST
Message-Id: <8702051251.AA00820@linus.MENET>
To: rrrs-authors%mc.lcs.mit.edu@mitre-bedford.ARPA
Subject: Windows
Even though I'm a Sun user, it looks to me that NeWS is
a loser, and X window will be supported by many more
venders. However, on reflection, I strongly agree we
should spend our time on other matters rather than windows.
Speaking of packages (ugh! -- too many Common Lisp connotations)
what do people think of Gelernter, Jagannathan and London's
paper "Environments as First Class Objects" in Jan 1987
ACM Symp. Princ. Prog. Lang?
John
∂20-Feb-87 0746 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU [hay%ubc.csnet: no mail]
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 20 Feb 87 07:46:24 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 20 Feb 87 10:39:48 EST
Date: Fri, 20 Feb 87 10:39:27 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: [hay%ubc.csnet: no mail]
To: scheme@MC.LCS.MIT.EDU
Message-ID: <157166.870220.JAR@AI.AI.MIT.EDU>
I don't have an answer to the following. Can anyone help? (This is a
half-facetious question. My conjecture: people who like Scheme for its
minimality like to have their mailing lists be that way too.)
-Jonathan
Date: 19 Feb 87 10:53 -0800
From: Marilyn Hay <hay%ubc.csnet at RELAY.CS.NET>
To: Scheme Co-ordinator <scheme-request at MC.LCS.MIT.EDU>
Re: no mail
I have noticed that there has not been any traffic on this list for
some time. Is there any particular reason or has there just not been
any submissions to the list? Thanks for any indication as to what has
happened. Take care,
Marilyn Hay
University of British Columbia
hay@ean.ubc.cdn
hay@ubc.csnet
hay%ubc.csnet@csnet-relay.arpa
∂24-Feb-87 0834 @MC.LCS.MIT.EDU:Larry_Brooks.EdServices@Xerox.COM help -- set command
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 24 Feb 87 08:34:04 PST
Received: from Xerox.COM (TCP 1200400040) by MC.LCS.MIT.EDU 24 Feb 87 11:31:44 EST
Received: from Riesling.ms by ArpaGateway.ms ; 24 FEB 87 08:28:57 PST
Sender: "Larry_Brooks.EdServices"@Xerox.COM
Date: 24 Feb 87 08:28:17 PST (Tuesday)
Subject: help -- set command
From: "Larry_Brooks.EdServices"@Xerox.COM
To: scheme@MC.LCS.MIT.EDU
cc: "Larry_Brooks.EdServices"@Xerox.COM
Message-ID: <870224-082857-9076@Xerox>
I recently purchased TI's PCScheme for the IBM PC. I have a question
that I hope someone out there can answer for me. I would like to use a
command that acts like "set" (i.e., evaluates both its arguments) in
Interlisp. More specifically, I would like to do the following:
(SETQ ALIST '(A B C)) {equivalent to set! or define}
(SET (CAR ALIST) 'Z) {equivalent to ????}
(EVAL (CAR ALIST)) {Should return Z}
Neither define or set! evaluate their first arguments. Does anyone know
of a function that will act like set in Interlisp or of an easy way
around this problem? (I can think of awkward ways to get around it for
specific applications, but I am looking for a nice generic fix.)
Sorry if this question seems basic to the people on this DL, but I'm a
beginner in both Lisp (a few months of experience) and Scheme (a week of
experience).
Thanks for any help,
Larry
∂26-Feb-87 0457 @MC.LCS.MIT.EDU:Larry_Brooks.EdServices@Xerox.COM Re: help -- set command
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 26 Feb 87 04:57:12 PST
Received: from Xerox.COM (TCP 1200400040) by MC.LCS.MIT.EDU 26 Feb 87 07:56:20 EST
Received: from Riesling.ms by ArpaGateway.ms ; 26 FEB 87 04:53:08 PST
Sender: "Larry_Brooks.EdServices"@Xerox.COM
Date: 26 Feb 87 04:43:20 PST (Thursday)
Subject: Re: help -- set command
From: "Larry_Brooks.EdServices"@Xerox.COM
To: willc%tekchips.tek.com@RELAY.CS.NET
cc: "Larry_Brooks.EdServices"@Xerox.COM, scheme@MC.LCS.MIT.EDU
In-Reply-to: "willc%tekchips.tek.com%RELAY.CS.NET":GV:Xerox's message of
25 Feb 87 16:26
Message-ID: <870226-045308-2404@Xerox>
Thanks for the information. It looks like going from Interlisp to
Scheme is not quite as easy as I expected. I think part of my problem
is learning to "think lexically". Your advice is much appreciated. By
the way, TI's PCScheme does support dynamic variables and there are a
couple of environment commands (I still need to learn what they do)
avaliable also.
Take care,
Larry
∂04-Mar-87 0925 @MC.LCS.MIT.EDU:bc@MEDIA-LAB.MEDIA.MIT.EDU OOPSs for Scheme, MacScheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 4 Mar 87 09:25:28 PST
Received: from MEDIA-LAB.MIT.EDU (TCP 2225200002) by MC.LCS.MIT.EDU 4 Mar 87 12:01:39 EST
Received: by MEDIA-LAB.MIT.EDU (5.54/4.8) id AA28819; Wed, 4 Mar 87 11:19:50 EST
Date: Wed, 4 Mar 87 11:19:50 EST
From: bill coderre <bc@MEDIA-LAB.MEDIA.MIT.EDU>
Message-Id: <8703041619.AA28819@MEDIA-LAB.MIT.EDU>
To: scheme@mc.lcs.mit.edu
Subject: OOPSs for Scheme, MacScheme
Two Questions.
ONE:
What are the significant differences between the Revised2 and Revised3
Reports on Scheme?
TWO:
I now have MacSheme, which looks pretty good. Recently I have been
programming in a forthcoming Common Lisp which includes Gary
Drescher's Object Lisp system.
Is there a similar system around that wouldn't be hard to port to
MacScheme? I don't think I'm a good enough hacker to implement one, or
to do a major rewrite kind of port. (I don't need multiple
inheritance, but I do need single inheritance, which isn't very
obvious to me how to do.)
Thank you for the help......................................bc
∂04-Mar-87 1200 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU r↑2 vs. r↑3
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 4 Mar 87 11:59:49 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 4 Mar 87 14:23:08 EST
Date: Wed, 4 Mar 87 14:23:07 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: r↑2 vs. r↑3
To: bc@MEDIA-LAB.MEDIA.MIT.EDU
cc: scheme@MC.LCS.MIT.EDU
In-reply-to: Msg of Wed 4 Mar 87 11:19:50 EST from bill coderre <bc at MEDIA-LAB.MEDIA.MIT.EDU>
Message-ID: <163107.870304.JAR@AI.AI.MIT.EDU>
Date: Wed, 4 Mar 87 11:19:50 EST
From: bill coderre <bc at MEDIA-LAB.MEDIA.MIT.EDU>
ONE:
What are the significant differences between the Revised2 and Revised3
Reports on Scheme?
The changes in the language are mostly trivial. I'd say the most
visible changes are (1) the boolean constants are written #T and #F
instead of #!TRUE and #!FALSE and (2) a number of peripheral and/or
redundant features have been removed or simplified.
As for the report itself, the R↑3 report has some additional
description, e.g. formal semantics & syntax, and its organization is
somewhat different in places.
For completeness, I'll list all the changes of which I'm aware, not just
the significant ones. This list appears in the "notes" section of the
r↑3 report. What constitutes a "clarification" as opposed to an
"incompatible change" is subjective; this is my own classification, not
that of the (other) authors.
New features:
- DELAY and FORCE (as in Abelson & Sussman's book)
- New predicates BOOLEAN? and PROCEDURE?
- ATAN now admits either one or two arguments.
- ↑ is now extended alphabetic.
Features removed:
- NAMED-LAMBDA and REC are both gone.
- "Curried define", e.g. (define (((f x) y z) w) ...), has been removed.
- A number of things had more than one name in the R↑2 report; now everything
has only one name. Thus SEQUENCE, <?, <=?, =?, >=?, and > are gone.
- A number of marginal procedures have been flushed, namely:
APPEND!, STRING-NULL?, SUBSTRING-FILL!, SUBSTRING-MOVE-LEFT!
SUBSTRING-MOVE-RIGHT!, OBJECT-HASH, OBJECT-UNHASH, 1+, and -1+.
- The #!NULL syntax for the empty list is gone (use () instead).
Incompatible changes:
- The boolean constants are now written #t and #f instead of #!true and
#!false.
- (define (foo ...) ...) now means (define foo (lambda (...) ...))
instead of (define foo (letrec ((foo (lambda (...) ...))) foo)).
Technical clarifications: [In many of these cases, the r↑2 report was at
variance with what the way various implementations behaved, and it seemed
better to change the report than to change the implementations.]
- The objects returned by literal expressions (e.g. '(a b)) are permitted
to be immutable.
- The list to which a rest-argument becomes bound must be newly allocated.
- DO variables are updated by rebinding rather than by assignment.
- Backquote allows vectors and nesting, and there's an official read/print
syntax for backquoted forms (so you can know what you get if you say
'`(a ,b) ).
- EQ? on equal numbers is unspecified.
- Implementations are permitted to do things like
(EQ? (LAMBDA (X) X) (LAMBDA (Y) Y)) => #T.
- EQV? distinguishes exact numbers from inexact ones, even if they
are equal according to =.
- List, string, and vector indexes must be exact integers.
Someone else will have to answer your question number two.
- Jonathan
∂04-Mar-87 1808 @MC.LCS.MIT.EDU:cpd@CS.UCLA.EDU Re: r↑2 vs. r↑3
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 4 Mar 87 18:08:06 PST
Received: from hera.CS.UCLA.EDU (TCP 20030201024) by MC.LCS.MIT.EDU 4 Mar 87 21:02:52 EST
Received: by hera.CS.UCLA.EDU (Sendmail 5.54/5.14)
id AA17690; Wed, 4 Mar 87 17:14:39 PST
Date: Wed, 4 Mar 87 17:14:39 PST
From: cpd@CS.UCLA.EDU (Charles Dolan)
Message-Id: <8703050114.AA17690@hera.CS.UCLA.EDU>
To: JAR@ai.ai.mit.edu, bc@media-lab.media.mit.edu
Subject: Re: r↑2 vs. r↑3
Cc: scheme@mc.lcs.mit.edu
Here is a small objected oriented system which I wrote one day
to see how small I could make it. It does single inheritence.
Objects and classes are procedures. New instances are
created by send a class object the message NEW. SUPER
is a smalltalk style pseudo instance which calls the method
dispatcher for the class one higher in the heirarchy. The
DEFINE-METHOD macro walks the code for the message and replaces
varaible references and sets with VECTOR-REFs and VECTOR-SET!s
for a vector of instance variables. This code was written
using a library of utility functions I use. I have attempted
to remove all those references.
Sorry for the lack of comments, this is almost a pedagogical example.
(define *metamethod-offset* 0)
(define *method-offset* 1)
(define *parent-offset* 2)
(define *ivs-offset* 3)
(macro define-class
(lambda (dummy class parent ivs cvs)
(set! ivs (combine-var-lists
(if parent (property parent 'ivs) nil) ivs))
(set! cvs (combine-var-lists
(if parent (property parent 'cvs) nil)
(append '(metamethods methods parent ivs) cvs)))
`(set! ,class
(begin
(set-property! ',class 'ivs ',ivs)
(set-property! ',class 'cvs ',cvs)
(make-class-object ,parent ',ivs ',cvs)))
(define (combine-var-lists l1 l2)
(letrec
((combine
(lambda (l1 l2)
(if (null? l2)
(reverse l1)
(if (memq (car l2) l1)
(combine l1 (cdr l2))
(combine (cons (car l2) l1) (cdr l2)))))))
(combine (reverse l1) l2)))
(macro define-metamethod
(lambd (dummy class spec . body)
(let ((message (car spec))
(arg-spec (cdr spec)))
`(add-metamethod-to-class-object ,class ',message
(lambda (self class %%method-object %%var-vector ,@arg-spec)
,@(walk-code-and-replace-variables
body (property class 'cvs))))))
(define (make-class-object parent ivs cvs)
(let ((cv-vector (make-vector (length cvs)))
(class-object nil))
(vector-set! cv-vector *metamethods-offset* (list 'metamethods))
(vector-set! cv-vector *methods-offset* (list 'methods))
(vector-set! cv-vector *parent-offset* parent)
(vector-set! cv-vector *ivs-offset* ivs)
(set! class-object
(lambda (message . args)
(cond ((eq? message 'cv-vector) cv-vector)
((eq? message 'class-object?) t)
(T (dispatch-metamethod
class-object class-object message args
cv-vector)))))))
(define (add-metamethod-to-class-object class-object message func)
(let* ((a-list (vector-ref (class-object 'cv-vector)
*metamethod-offset*))
(pair (assq message (cdr a-list))))
(if pair
(set-cdr! pair func)
(set-cdr! a-list (cons (cons message func) (cdr a-list))))))
(define (dispatch-metamethod class-object method-object message args
cv-vector)
(let* ((method-vector (if (null? method-object)
(cerror "No metamethod" message args)
(method-object 'cv-vector)))
(pair (assq message (cdr (vector-ref method-vector
*metamethod-offset*)))))
(if pair
(apply (cdr pair)
(cons class-object
(cons ()
(cons method-object
(cons cv-vector args)))))
(dispatch-metamethod class-object
(vector-ref method-vector *parent-offset*)
message args cv-vector))))
(define (walk-code-and-replace-variables expr vars)
(cond ((symbol? expr)
(if (memq expr vars)
`(vector-ref %%var-vector ,(nth-inv vars expr))
expr))
((atom? expr) expr)
((pair? expr)
(cond ((eq? (car expr) 'quote)
expr)
((eq? (car expr) 'set!)
(if (memq (cadr expr) vars)
`(vector-set! %%var-vector
,(nth-inv vars (cadr expr))
,(walk-code-and-replace-variables
(caddr expr) vars))
expr))
(T (cons
(walk-code-and-replace-variables (car expr) vars)
(walk-code-and-replace-variables (cdr expr) vars)))))))
(macro define-method
(lambda (dummy class spec . body)
(let ((message (car spec))
(arg-spec (cdr spec)))
`(add-method-to-class-object ,class ',message
(lambda (self class %%method-object %%var-vector ,@arg-spec)
,@(walk-code-and-replace-variables
body (property class 'ivs))))))
(define (add-method-to-class-object class-object message func)
(let* ((a-list (vector-ref (class-object 'cv-vector) 1))
(pair (assq message (cdr a-list))))
(if pair
(set-cdr! pair func)
(set-cdr! a-list (cons (cons message func) (cdr a-list))))))
(define (make-instance-object class-object)
(let ((iv-vector (make-vector
(length (vector-ref (class-object 'cv-vector)
*iv-offset*))))
(instance-object nil))
(set! instance-object
(lambda (message . args)
(cond ((eq? message 'iv-vector) iv-vector)
((eq? message 'class-object?) nil)
(T (dispatch-method class-object class-object
message args
instance-object iv-vector)))))
instance-object))
(define (dispatch-method class-object method-object message args
instance-object iv-vector)
(let* ((cv-vector (if (null? method-object)
(cerror "No method" message args)
(method-object 'cv-vector)))
(pair (assq message
(cdr (vector-ref cv-vector *methods-offset*)))))
(if pair
(apply (cdr pair)
(cons instance-object
(cons class-object
(cons method-object
(cons iv-vector args)))))
(dispatch-method class-object
(vector-ref cv-vector *parent-offset*)
message args
instance-object iv-vector))))
(macro super
(lambda (dummy message . args)
`(dispatch-super class %%method-object
,message (list ,@args)
self %%var-vector))
(define (dispatch-super class-object method-object message args
instance-object iv-vector)
(let ((parent (vector-ref (method-object 'cv-vector) *parent-offset*)))
(if (null? parent)
(cerror "No super-method or super-metamethod" message args)
(if (null? (instance-object 'class-object?))
(dispatch-method class-object parent message args
instance-object iv-vector)
(dispatch-metamethod instance-object parent message args
iv-vector)))))
; A little documentation
;
; (DEFINE-CLASS class-name parent instance-variables class-variables)
; (DEFINE-METHOD class-name (method-name . args) . body)
; (DEFINE-METAMETHOD class-name (method-name . args) . body)
;
; Here is a small example
;
; (DEFINE-CLASS NEW-CLASS () (NAME) (INSTANCE-COUNT))
;
; (DEFINE-METAMETHOD NEW-CLASS (NEW)
; (LET ((NEW-OBJECT (SUPER 'NEW)))
; (SET! INSTANCE-COUNT (1+ INSTANCE-COUNT))
; OBJECT))
;
; (DEFINE-METAMETHOD NEW-CLASS (GET-INSTANCE-COUNT)
; INSTANCE-COUNT)
;
; (DEFINE-METHOD NEW-CLASS (SET-NAME NEW-NAME)
; (SET! NAME NEW-NAME))
;
; (DEFINE-CLASS ANOTHER-NEW-CLASS (NEW-CLASS () ())
;
; (DEFINE-METHOD ANOTHER-NEW-CLASS (SET-NAME NEW-NAME)
; (SUPER 'SET-NAME NEW-NAME)
; (DISPLAY NEW-NAME)
; (NEWLINE))
Enjoy, comments welcome, flame to yourself.
-Charlie Dolan
∂05-Mar-87 1253 @MC.LCS.MIT.EDU:wolfgang%cantuar%math.waterloo.edu@RELAY.CS.NET Re: OOPSs for Scheme, MacScheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 5 Mar 87 12:52:54 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 5 Mar 87 15:12:38 EST
Received: from relay2.cs.net by RELAY.CS.NET id ai07823; 5 Mar 87 11:26 EST
Received: from waterloo by csnet-relay.csnet id aq01858; 5 Mar 87 11:22 EST
Received: from cantuar.uucp by watmath; Wed, 4 Mar 87 23:42:05 est
Date: Thu, 5 Mar 87 11:21:57+1200
From: "W. Kreutzer" <wolfgang%cantuar%math.waterloo.edu@RELAY.CS.NET>
To: scheme@MC.LCS.MIT.EDU, bc@MEDIA-LAB.MEDIA.MIT.EDU
Subject: Re: OOPSs for Scheme, MacScheme
If you get an answer to that question I would be interested in it. We have
a locally developed class and flavour package for ChezScheme, if that is
any help. So far I have not got around to port it to MacScheme.
--- wolfgang kreutzer, computer science, University of Canterbury,
New Zealand ---
∂05-Mar-87 1955 @MC.LCS.MIT.EDU:wand%corwin.ccs.northeastern.edu@RELAY.CS.NET Tiny Object System
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 5 Mar 87 19:55:18 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 5 Mar 87 15:22:02 EST
Received: from relay2.cs.net by RELAY.CS.NET id ae08210; 5 Mar 87 12:28 EST
Received: from northeastern.edu by RELAY.CS.NET id ah02163; 5 Mar 87 12:23 EST
Received: from corwin.ccs.northeastern.edu by
nuhub.acs.northeastern.edu; Thu, 5 Mar 87 09:51 EST
Received: by corwin.CCS.Northeastern.EDU (5.51/5.17)
id AA00230; Thu, 5 Mar 87 09:23:39 EST
Date: Thu, 5 Mar 87 09:23:39 EST
From: wand%corwin.ccs.northeastern.edu@RELAY.CS.NET
To: scheme@MC.LCS.MIT.EDU
Subject: Tiny Object System
OK, here is my entry in the "smallest pedagogical OOPS". It is not quite as
refined as I would like, but it's close. Note that flavors and operations
(methods) are first-class citizens, more or less: in particular, messages are
NOT quoted symbols.
-- Mitch Wand (wand@corwin.ccs.northeastern.edu)
;;; A Toy Flavors System in Scheme, based on Generic Functions
;;; or, Object-Oriented Programming without Objects
;;; In this version, we introduce a functional model of operations.
;;; Definitions of data structures:
;;; flavor = ([parent|nil] . instance-names)
; cons-cell is hash code for unique flavor (test equality of flavors
; with eq?)
; instance-names are all required fields, beginning with ancestors and
; concluding with local names)
;;; instance = (flavor . instance-values)
;;; method = (cell operation) ; the cell is probably superfluous.
;;; operation = instance->flavor->operation->fcn
;;; An operation takes 3 arguments: the INSTANCE, the FLAVOR of which
;;; it is supposed to be an instance, and another OPERATION (to be
;;; invoked upon inheritance), and produces a FCN to be applied to the
;;; instance.
;;; fcn = lambda (self af1 ... af_k lf_1 ... lf_n . extra-fields) .
;;; lambda (param_1 ... param_p) . M
;;; The point is that the fcn might be applied to an instance of a
;;; DESCENDENT of this flavor, so it will be a record consisting of
;;; the fields of this flavor (af_1 .. lf_n), plus some additional
;;; fields.
;;; Data Structures
(define make-cell (lambda (v) (cons v nil)))
(define deref-cell car)
(define set-cell! set-car!)
(define fl->parent cadr)
(define fl->instance-names cddr)
(define mk-fl (lambda (parent names) (cons '&flavor (cons parent names))))
(make-unprintable '&flavor '<FLAVOR>)
(define inst->flavor car)
(define inst->values cdr)
(define mk-inst cons)
;;; Functional Core
(define make-flavor
(lambda (parent new-names)
(mk-fl parent (append (fl->instance-names parent) new-names))))
;;; here is the empty method. It tries to invoke inheritance if it
;;; can. The third argument is the method to be used if inheritance
;;; is to be followed. Note the implicit Y operator in the last line.
(define empty-method
(lambda (instance flavor whole-method)
(let ((parent (fl->parent flavor)))
(if (null? parent)
(error "Couldn't apply method" whole-method instance)
(whole-method parent instance whole-method)))))
(define make-method
(lambda ()
(make-cell empty-method)))
;;; here is how we add a new "unit method" to an existing method.
;;; This is just the familiar notion of functional extension EXCEPT
;;; for the whole-method argument. This is passed along as we search
;;; for an applicable method, and is eventually used by empty-method
;;; to invoke inheritance.
(define cons-composite-method
(lambda (new-flavor new-fcn old-method)
(lambda (instance flavor whole-method)
(if (eq? flavor new-flavor)
(apply new-fcn
(cons instance (inst->values instance)))
(old-method flavor instance whole-method)))))
(define add-method!
(lambda (method flavor fcn)
(set-cell! method
(cons-composite-method flavor fcn (deref-cell method)))))
;;; Next we write some user-interfaces
; the null flavor has no parent and no fields
(define null-flavor '(nil))
; define new flavors with define-flavor
(extend-syntax (define-flavor)
[(define-flavor name parent instance-name ...)
(define name (make-flavor (if (null? parent) null-flavor parent)
'(instance-name ...)))])
; make new instances with make-instance. Put parent values first,
; then local values. This could use call-by-keyword, with a SMOP.
(extend-syntax (make-instance)
[(make-instance flavor values ...)
(list flavor values ...)])
; make new methods with define-method
(extend-syntax (define-method)
[(define-method name)
(define name (make-method))])
; add options to methods with add-method
(define expand-add-method
(lambda (exp)
(record-case exp
[add-method (method flavor params body)
(let ([bvl (cons 'self (append (fl->instance-names
(execute (compile flavor)))
'extras))])
`(begin
(add-method! ,method ,flavor
(lambda ,bvl (lambda ,params ,body)))
',method))])))
(macro add-method expand-add-method)
;;; apply-method is the user-level invocation of methods. It
;;; evaluates and dereferences its method and object arguments exactly
;;; once. Notice how real-method is passed as the third argument to
;;; itself in order to initiate the inheritance search loop.
(extend-syntax (apply-method)
[(apply-method method object arg ...)
(let ((real-method (deref-cell method))
(real-object object))
((real-method (inst->flavor real-object) real-object real-method)
arg ...))])
;;; Just for laughs, here is a general setter:
(define-method :set)
(add-method :set null-flavor (name val)
(iterate loop
([names (fl->instance-names (inst->flavor self))]
[vals (inst->values self)])
(cond
[(null? names) (error "cannot set " name)]
[(eqv? (car names) name) (set-car! vals val) val]
[else (loop (cdr names) (cdr vals))])))
(define-method :run-super)
(add-method :run-super null-flavor (method)
(let ((parent (fl->parent (inst->flavor self))))
(if (null? parent)
(error "no super")
(apply-method method (mk-inst parent (inst->values
self))))))
;;; and here is a test file:
(define-flavor terminal () val)
(define-flavor Ident terminal)
(define-flavor Number terminal)
(define-flavor Compound () Operator argument1 argument2)
(define-flavor MulSym ())
(define-flavor AddSym ())
(define-method :eval)
(add-method :eval Number () val)
(add-method :eval Compound ()
(apply-method :operator-result Operator
(apply-method :eval argument1)
(apply-method :eval argument2)))
(define-method :operator-result)
(add-method :operator-result MulSym (v1 v2) (* v1 v2))
(add-method :operator-result AddSym (v1 v2) (+ v1 v2))
(define test1
(lambda ()
(let* ([mulsym (make-instance MulSym)]
[addsym (make-instance AddSym)]
[obj1 (make-instance Compound addsym
(make-instance Number 5)
(make-instance Number 7))])
(writeln (apply-method :eval obj1) " = " 12)
(apply-method :set obj1 'Operator mulsym)
(writeln (apply-method :eval obj1) " = " 35))))
∂07-Mar-87 0351 @MC.LCS.MIT.EDU:munnari!cidam.oz!mg@seismo.CSS.GOV distribution list
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 7 Mar 87 03:51:46 PST
Received: from seismo.CSS.GOV (TCP 30003106431) by MC.LCS.MIT.EDU 6 Mar 87 09:32:00 EST
Received: from munnari.oz by seismo.CSS.GOV (5.54/1.14) with UUCP
id AA03842; Thu, 5 Mar 87 22:41:38 EST
Message-Id: <8703060341.AA03842@seismo.CSS.GOV>
Received: from cidam (via goanna) by munnari with SunIII (5.5)
id AA29000; Fri, 6 Mar 87 14:28:07 EST
Received: by cidam.rmit.oz (4.3+RMIT/4.7)
id AA18877; Fri, 6 Mar 87 10:24:09 EST
Date: Fri, 6 Mar 87 10:24:09 EST
From: munnari!cidam.rmit.oz!mg@seismo.CSS.GOV (Mike A. Gigante)
To: SCHEME@mc.lcs.mit.edu
Subject: distribution list
There is now a distribution list here in Australia. For anyone else receiving
the list direct, send your details to scheme-request@cidam.oz (Australia only)
Mike Gigante, munnari!cidam.oz!mg@seismo.css.gov
∂09-Mar-87 0055 @MC.LCS.MIT.EDU:wolfgang%cantuar%math.waterloo.edu@RELAY.CS.NET Re: distribution list
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Mar 87 00:55:03 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 9 Mar 87 03:43:54 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa08194; 9 Mar 87 3:39 EST
Received: from waterloo by csnet-relay.csnet id aa08421; 9 Mar 87 3:32 EST
Received: from cantuar.uucp by watmath; Mon, 9 Mar 87 02:27:15 est
Date: Mon, 9 Mar 87 10:25:37+1200
From: "W. Kreutzer" <wolfgang%cantuar%math.waterloo.edu@RELAY.CS.NET>
To: SCHEME@MC.LCS.MIT.EDU,
mg <@RELAY.CS.NET,@cidam.rmit.oz,@munnari.csnet:mg@SEISMO.CSS.GOV>
Subject: Re: distribution list
yes, we are on the MIT scheme news list. If there is a cheaper way to get
the stuff from you, we are interested. Thanks
--- w. kreutzer, computer science, university of canterbury
christchurch, new zealand ---
∂10-Mar-87 1930 @MC.LCS.MIT.EDU:jar@ZURICH.AI.MIT.EDU test suite candidate
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 10 Mar 87 19:30:06 PST
Received: from zurich (TCP 2206400260) by MC.LCS.MIT.EDU 10 Mar 87 22:32:51 EST
Received: by ZURICH.AI.MIT.EDU; Tue, 10 Mar 87 22:08:22 est
Date: Tue, 10 Mar 87 22:08:22 est
From: jar@ZURICH.AI.MIT.EDU (Jonathan Rees)
Message-Id: <8703110308.AA07187@zurich>
To: rrrs-authors@mc.lcs.mit.edu
Subject: test suite candidate
Reply-To: JAR@AI.AI.MIT.EDU
Has anyone worked on a test suite? Here's a suggestion for inclusion,
which, fortunately, works in the three implementation in which I tried
it. I leave the significance of this test as an exercise.
- Jonathan
(define (tst)
(define k1 #f)
(define k2 #f)
(define cwcc call-with-current-continuation)
(define step 0)
(define (detect-lossage)
(set! step (+ step 1))
(case step
((1) (cwcc (lambda (k) (set! k1 k) 'a)))
((2) (cwcc (lambda (k) (set! k2 k) 'b)))
((4) 'd)))
(let ((answer (list (detect-lossage) (detect-lossage))))
(set! step (+ step 1))
(case step
((3) (k1 'c)) ;answer = (a b) or (b a)
((5) (k2 'e)) ;answer = (c d) or (d c)
((6)
(cond ((or (equal? answer '(a e))
(equal? answer '(e a)))
'wins)
((or (equal? answer '(c e))
(equal? answer '(e c)))
'loses)
(else (list 'really-loses answer)))))))
∂10-Mar-87 2309 @MC.LCS.MIT.EDU:cth%iucs.cs.indiana.edu@RELAY.CS.NET
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 10 Mar 87 23:08:34 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 10 Mar 87 18:31:25 EST
Received: from relay2.cs.net by RELAY.CS.NET id ac24159; 10 Mar 87 17:36 EST
Received: from indiana by RELAY.CS.NET id af19280; 10 Mar 87 17:32 EST
Date: Tue, 10 Mar 87 16:01:55 est
From: Chris Haynes <cth%iucs.cs.indiana.edu@RELAY.CS.NET>
To: vanroggen%bach.dec@DECWRL.DEC.COM, scheme@MC.LCS.MIT.EDU
Scheme 84 compiles source to an intermediate s-expression code, which
is then interpreted by a Virtual Scheme Machine (VSM) written in
compiled Franz Lisp. This note outlines the relative merits of
Scheme 84.
ADVANTAGES:
-- COST: It is FREE, available via anonymous ftp on arpanet as
directory pub/scheme84 on iucs.cs.indiana.edu (since we are new
to arpanet, you may have to use 192.12.206.205), or send a tape to
Nancy Garrett
Lindley Hall
Bloomington, IN 47405.
It will be returned with Scheme 84 in Unix tar format, with an
Indiana University Computer Science Department Technical Report
that documents the language. Scheme 84 was developed under
Berkley Unix, but also runs under VMS if you have Franz Lisp.
-- PORTABILITY: It is very easy to port Scheme 84 to any machine
that runs Franz Lisp. Without much difficulty it could also be
ported to run under other Lisp systems, such as Common Lisp or
PSL. Only a small set of Lisp features are used.
-- MALEABILITY: It is easy to modify. Many interesting features can
be added to Scheme 84 with only a few hours (or even minutes) of
work. The entire Scheme 84 implementation can be digested easily
in a few days. We have found this to be of great value in our
research. For example, engines, an abstraction of timed preemption
[Haynes and Friedman 84], was first implemented in Scheme 84.
It is particularly easy to import Franz Lisp features into Scheme.
This has been used, for example, to implement a Semantic
Prototyping System [Wand 84] with hooks to Lex and Yacc.
DISADVANTAGES:
-- SPEED: It is much slower than Scheme implementations
based on native code compilation, such as Chez Scheme or T.
However, the intermediate code and VSM were carefully designed to
get the most out of the Franz compiler so that Scheme 84 is
comparable in speed to other interpreted Scheme implementations.
-- FRANZ FOIBLES: A few unfortunate features of Franz Lisp show through.
For example, some run time errors are caught by Franz, not Scheme,
and result in inappropriate error messages (though Scheme 84 always
recovers control).
-- STANDARDIZATION: Scheme 84 is fairly close to the Scheme standard
[Rees and Clinger 86], but has not been brought completely up to
date. (Any volunteers?)
[Rees and Clinger 86] Rees, J., and Clinger, W., Revised Report on
the Algorithmic Language Scheme, SIGPLAN Notices 21:12, pp. 37-79
(1986).
[Haynes and Friedman 84] Haynes, C.T., and Friedman, D.P., Engines
build process abstractions, Conf. Rec. of the 1984 ACM Symposium
on Lisp and Functional Programming, pp. 18-24.
[Wand 84] Wand, M., A semantic prototyping system, Proc. ACM SIGPLAN '84
Compiler Construction Conference, pp. 213-221.
∂11-Mar-87 2251 @MC.LCS.MIT.EDU:cth@IUCS.CS.INDIANA.EDU Scheme 84
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 11 Mar 87 22:51:07 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 11 Mar 87 13:56:25 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa02343; 11 Mar 87 13:34 EST
Received: from indiana by RELAY.CS.NET id ad25226; 11 Mar 87 13:28 EST
Date: Wed, 11 Mar 87 12:30:00 est
From: Chris Haynes <cth@IUCS.CS.INDIANA.EDU>
To: scheme@MC.LCS.MIT.EDU
Subject: Scheme 84
Scheme 84 compiles source to an intermediate s-expression code, which
is then interpreted by a Virtual Scheme Machine (VSM) written in
compiled Franz Lisp. This note outlines the relative merits of
Scheme 84.
ADVANTAGES:
-- COST: It is FREE, available via anonymous ftp on arpanet as
directory pub/scheme84 on iucs.cs.indiana.edu (since we are new
to arpanet, you may have to use 192.12.206.205), or send a tape to
Nancy Garrett
Lindley Hall
Bloomington, IN 47405.
It will be returned with Scheme 84 in Unix tar format, with an
Indiana University Computer Science Department Technical Report
that documents the language. Scheme 84 was developed under
Berkley Unix, but also runs under VMS if you have Franz Lisp.
-- PORTABILITY: It is very easy to port Scheme 84 to any machine
that runs Franz Lisp. Without much difficulty it could also be
ported to run under other Lisp systems, such as Common Lisp or
PSL. Only a small set of Lisp features are used.
-- MALEABILITY: It is easy to modify. Many interesting features can
be added to Scheme 84 with only a few hours (or even minutes) of
work. The entire Scheme 84 implementation can be digested easily
in a few days. We have found this to be of great value in our
research. For example, engines, an abstraction of timed preemption
[Haynes and Friedman 84], was first implemented in Scheme 84.
It is particularly easy to import Franz Lisp features into Scheme.
This has been used, for example, to implement a Semantic
Prototyping System [Wand 84] with hooks to Lex and Yacc.
DISADVANTAGES:
-- SPEED: It is much slower than Scheme implementations
based on native code compilation, such as Chez Scheme or T.
However, the intermediate code and VSM were carefully designed to
get the most out of the Franz compiler so that Scheme 84 is
comparable in speed to other interpreted Scheme implementations.
-- FRANZ FOIBLES: A few unfortunate features of Franz Lisp show through.
For example, some run time errors are caught by Franz, not Scheme,
and result in inappropriate error messages (though Scheme 84 always
recovers control).
-- STANDARDIZATION: Scheme 84 is fairly close to the Scheme standard
[Rees and Clinger 86], but has not been brought completely up to
date. (Any volunteers?)
[Rees and Clinger 86] Rees, J., and Clinger, W., Revised Report on
the Algorithmic Language Scheme, SIGPLAN Notices 21:12, pp. 37-79
(1986).
[Haynes and Friedman 84] Haynes, C.T., and Friedman, D.P., Engines
build process abstractions, Conf. Rec. of the 1984 ACM Symposium
on Lisp and Functional Programming, pp. 18-24.
[Wand 84] Wand, M., A semantic prototyping system, Proc. ACM SIGPLAN '84
Compiler Construction Conference, pp. 213-221.
∂12-Mar-87 0356 @MC.LCS.MIT.EDU:shneider%cui.unige.chunet@RELAY.CS.NET Question: are theres ANY VIDEO TAPES available for Scheme ?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 12 Mar 87 03:56:36 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 12 Mar 87 06:56:01 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa08863; 12 Mar 87 6:52 EST
Received: from switzerland by RELAY.CS.NET id aa00256; 12 Mar 87 6:45 EST
Received: from ean by SWITZERLAND.CSNET id a017020; 12 Mar 87 12:37 WET
From: "Daniel K. Schneider" <shneider%cui.unige.chunet@RELAY.CS.NET>
To: scheme@MC.LCS.MIT.EDU
MMDF-Warning: Parse error in original version of preceding line at SWITZERLAND.CSNET
Message-ID: <203:shneider@cui.unige.chunet>
Subject: Question: are theres ANY VIDEO TAPES available for Scheme ?
We heard that there were some video tapes around which teach programming
in Scheme (maybe some MIT "6.001" lessons).
If #T, (1) where could I get them ?
(2) for what price (incl. handling, mail to Switzerland) ?
Thanks for any help !
--
Daniel K.Schneider
ISSCO, University of Geneva, 54 route des Acacias, 1227 Carouge (Switzerland)
Tel. (..41) (22) 20 93 33 ext. 2114
to VMS/BITNET: to UNIX/EAN (preferable):
BITNET: SCHNEIDE@CGEUGE51 shneider%cui.unige.chunet@CERNVAX
ARPA: SCHNEIDE%CGEUGE51.BITNET@WISCVM shneider@cui.unige.CHUNET
or: shneider%cui.unige.chunet@ubc.csnet
uucp: mcvax!cernvax!cui!shneider
∂12-Mar-87 0608 @MC.LCS.MIT.EDU:dyb@IUVAX.CS.INDIANA.EDU Re: test suite candidate
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 12 Mar 87 06:08:27 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 12 Mar 87 09:03:01 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa09740; 12 Mar 87 8:57 EST
Received: from indiana by RELAY.CS.NET id ac00825; 12 Mar 87 8:52 EST
Date: Wed, 11 Mar 87 23:58:18 est
From: "R. Kent Dybvig" <dyb@IUVAX.CS.INDIANA.EDU>
To: JAR@MC.LCS.MIT.EDU
Subject: Re: test suite candidate
Cc: rrrs-authors@MC.LCS.MIT.EDU
I believe I was the one who volunteered to work on this at last year's
Lisp conference, and I plan to do so over the summer. I'll save your
program away (it does work in Chez Scheme, incidentally). I also
welcome any other test programs people have written or wish to write.
We have a favorite continuation example here, but it is probably more
challenging to people than to Scheme systems. It is "mondo-bizarro",
whose definition is given below. Work it out on paper before trying
it out.
(define mondo-bizarro
(lambda ()
(let ([k (call/cc (lambda (c) c))])
(write 1)
(call/cc (lambda (c) (k c)))
(write 2)
(call/cc (lambda (c) (k c)))
(write 3))))
Kent
∂16-Mar-87 1056 @MC.LCS.MIT.EDU:DAN@cis.upenn.edu Revised Revised Revised Report on Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 16 Mar 87 10:54:30 PST
Received: from linc.cis.upenn.edu (TCP 1201000140) by MC.LCS.MIT.EDU 16 Mar 87 13:49:53 EST
Received: by linc.cis.upenn.edu
id AA04208; Mon, 16 Mar 87 13:44:04 EST
Posted-Date: Mon, 16 Mar 87 13:46 EST
Message-Id: <8703161844.AA04208@linc.cis.upenn.edu>
From: Dan Zigmond <Dan@cis.upenn.edu>
Subject: Revised Revised Revised Report on Scheme
To: scheme@mc.lcs.mit.edu
Date: Mon, 16 Mar 87 13:46 EST
How does one get a copy of this new spec? Is it FTPable from somewhere?
Dan
∂16-Mar-87 1517 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Revised↑3 Report on Scheme; administrivia
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 16 Mar 87 15:17:23 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 16 Mar 87 17:51:05 EST
Date: Mon, 16 Mar 87 17:49:49 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Revised↑3 Report on Scheme; administrivia
To: Dan@CIS.UPENN.EDU, scheme@MC.LCS.MIT.EDU
In-reply-to: Msg of Mon 16 Mar 87 13:46 EST from Dan Zigmond <Dan at cis.upenn.edu>
Message-ID: <169287.870316.JAR@AI.AI.MIT.EDU>
Date: Mon, 16 Mar 87 13:46 EST
From: Dan Zigmond <Dan at cis.upenn.edu>
To: scheme at mc.lcs.mit.edu
Re: Revised Revised Revised Report on Scheme
How does one get a copy of this new spec? Is it FTPable from somewhere?
It's in ACM SIGPLAN Notices, December 1986. You can also get it from
the MIT AI Lab Publications Office, 545 Technology Square, Cambridge MA
02139, for $6.00, prepaid; ask for AI Memo 848a. If you want the
LaTeX sources, you can get them from MIT-PREP:/scheme/r3rs.tar (that's a
Unix "tar" file), but I think you're better off dealing with the
hardcopy, unless you want to modify it.
Attention new arrivals to the list: rather than bother everyone on the
list with requests like this for basic information which has a high
probability of having already been posted, please send your easy
questions to Scheme-Request@MIT-MC. In particular, I can send you a
compendium of implementation announcements, consisting of messages which
have been sent to this list. Don't get upset if a week or two goes by
without an answer from me, since I tend to deal with scheme-request
messages in batches; be patient.
Implementors & others: if you want to add or change things in this
standard information packet I send out, please let me know.
One last thing: I would like for people to get in the habit of sending
mail pertaining to the Scheme mailing list to Scheme-Request, not to me
personally. This is both to make my own record-keeping easier
(messages sent to Scheme-Request are archived) and to be prepared
in case someone else ever takes over management of the list
either temporarily or permanently.
Thanks
Jonathan
∂16-Mar-87 2003 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Request for public domain Scheme programs
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 16 Mar 87 20:03:25 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 16 Mar 87 22:59:43 EST
Date: Mon, 16 Mar 87 22:59:01 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Request for public domain Scheme programs
To: scheme@MC.LCS.MIT.EDU
Message-ID: <169444.870316.JAR@AI.AI.MIT.EDU>
Date: Mon 16 Mar 87 18:57:21-MST
From: Raul Machuca <RMACHUCA at SIMTEL20.ARPA>
To: scheme-request at MC.LCS.MIT.EDU
Are there any public domain scheme pgrams that can be ftp'd, in
particular for TI PC Scheme?
∂17-Mar-87 0847 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Revised↑3 Report on Scheme; administrivia
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 17 Mar 87 08:47:16 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 17 Mar 87 11:39:27 EST
Date: Tue, 17 Mar 87 11:38:33 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Revised↑3 Report on Scheme; administrivia
To: zs01#@ANDREW.CMU.EDU
cc: scheme@MC.LCS.MIT.EDU
In-reply-to: Msg of Mon 16 Mar 87 23:05:57 est from zs01# at andrew.cmu.edu (Zalman Stern)
Message-ID: <169681.870317.JAR@AI.AI.MIT.EDU>
Date: Mon, 16 Mar 87 23:05:57 est
From: zs01# at andrew.cmu.edu (Zalman Stern)
To: scheme-request at mit-mc
Could you please send me the "standard information packet" as advertised in
the above message.
I omitted to say that people on Internet can FTP this from host MIT-MC.
It's in file "LSPMAI; SCHEME IMPLS". Back message are in "LSPMAI;
SCHEME MAIL" on MIT-MC and even older messages are in "LSPMAI; SCHEME
MAIL1" on MIT-AI.
If you don't have FTP access to the Internet, I'm willing to send the
list of implementations. I won't mail the archives, they're too big.
∂17-Mar-87 1405 @MC.LCS.MIT.EDU:cph@KLEPH.AI.MIT.EDU eqv?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 17 Mar 87 14:05:24 PST
Received: from kleph (TCP 2206400254) by MC.LCS.MIT.EDU 17 Mar 87 16:19:07 EST
Received: by KLEPH.AI.MIT.EDU; Tue, 17 Mar 87 16:08:11 est
Date: Tue, 17 Mar 87 16:08:11 est
From: cph@KLEPH.AI.MIT.EDU (Chris Hanson)
Message-Id: <8703172108.AA02948@kleph>
To: jar@ai
Cc: rrrs-authors@mc
Subject: eqv?
I believe that the paragraph starting "There is only one empty
list..." on page 13, section 6.2 of R3RS should be modified. In MIT
Scheme, the statement that
(eqv? "" "") ==> #t
is actually false, because there is a user operation,
`set-string-length!', which distinguishes between two empty strings.
I think that the same might be true of #() in an implementation with
`vector-grow!'.
The statement should be modified to indicate that it is true given the
operations described in the report, and may not be true in a given
implementation with extended operations.
∂17-Mar-87 1526 @MC.LCS.MIT.EDU:SUSSMAN@G.BBN.COM Re: Question: are theres ANY VIDEO TAPES available for Scheme ?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 17 Mar 87 15:26:44 PST
Received: from G.BBN.COM (TCP 30000201103) by MC.LCS.MIT.EDU 17 Mar 87 17:10:12 EST
Date: 17 Mar 1987 16:40-EST
Sender: SUSSMAN@G.BBN.COM
Subject: Re: Question: are theres ANY VIDEO TAPES available for Scheme ?
From: SUSSMAN@G.BBN.COM
To: shneider%cui.unige.chunet@RELAY.CS.NET
Cc: scheme@MC.LCS.MIT.EDU
Message-ID: <[G.BBN.COM]17-Mar-87 16:40:17.SUSSMAN>
In-Reply-To: <203:shneider@cui.unige.chunet>
There is a videotaped version of 6.001. You should contact CAES
(The Center for Advanced Engineering Study) about availability and price.
There may be better prices for universities than for industry --
I don't know anything about pricing. I think that Hewlett Packard
is supplying the tapes to U.S. universities, but I don't know about
foreign universities. CAES might know more about this too.
Julie Sussman
∂22-Mar-87 1714 @MC.LCS.MIT.EDU:munnari!cidam.oz!mg@seismo.CSS.GOV dump-world problem on 4.2BSD vax (version 4 C-scheme)
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 22 Mar 87 17:14:02 PST
Received: from seismo.CSS.GOV (TCP 30003106431) by MC.LCS.MIT.EDU 22 Mar 87 20:14:02 EST
Received: from munnari.oz by seismo.CSS.GOV (5.54/1.14) with UUCP
id AA15239; Sun, 22 Mar 87 20:09:11 EST
Message-Id: <8703230109.AA15239@seismo.CSS.GOV>
Received: from cidam (via goanna) by munnari with SunIII (5.5)
id AA23604; Mon, 23 Mar 87 10:15:26 EST
Received: by cidam.rmit.oz (4.3+RMIT/4.7)
id AA24441; Sun, 22 Mar 87 14:27:04 EST
Date: Sun, 22 Mar 87 14:27:04 EST
From: munnari!cidam.rmit.oz!mg@seismo.CSS.GOV (Mike A. Gigante)
To: scheme@mc.lcs.mit.edu
Subject: dump-world problem on 4.2BSD vax (version 4 C-scheme)
I get the following error when using dump-world. (vax 750, 4.2BSD)
% scheme
Scheme Microcode Version 8.2
MIT Scheme, UNIX version
↑AH (CTRL-A, then H) shows help on interrupt keys.
FASLoading file /usr/mg/lib/scheme/scheme.bin
Scheme saved on Saturday March 21, 1987 at 9:55:37 AM
Release 4.1.1
Microcode 8.2
Runtime 11.4
Features 1.2
Cross 11.1
Unix Interface 1.2
1 ]=> (dump-world "myScheme")
Failure operating on scheme
Anomalous error -- get a wizard 23
There is no environment available;
using the current read-eval-print environment.
The error also occurs when usinmg a full pathname in place of "myScheme".
Any ideas would be appreciated.
Mike Gigante mg%cidam.oz@seismo.css.gov munnari!cidam.oz!mg@seismo.css.gov
Royal Melbourne Institute of Technology, Australia
∂23-Mar-87 0752 @MC.LCS.MIT.EDU:muller@bu-cs.bu.edu Scheme mode in GNU Emacs
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Mar 87 07:51:51 PST
Received: from bu-cs.bu.edu (TCP 30003134401) by MC.LCS.MIT.EDU 23 Mar 87 10:51:43 EST
Received: from bucse.bu.edu by bu-cs.bu.edu (3.2/4.7)
id AA20861; Mon, 23 Mar 87 10:45:26 EST
Return-Path: <muller@bu-cs.bu.edu>
Received: by bucse.bu.edu (5.31/4.7)
id AA03759; Mon, 23 Mar 87 10:47:11 EST
Date: Mon, 23 Mar 87 10:47:11 EST
From: muller@bu-cs.bu.edu
Message-Id: <8703231547.AA03759@bucse.bu.edu>
To: scheme@MC.LCS.MIT.EDU
Subject: Scheme mode in GNU Emacs
Has anyone out there taken the time to rewrite the Scheme support for
GNU Emacs so that it understands R↑3 Scheme syntax? In particular I'd like
to use the Scheme84 "[" and "]" for parentheses and have the indentation
and balancing come out right. Inferior scheme mode also seems to be
intolerant of vt200 series terminals. Has anyone repaired this?
Thanks
bob
∂23-Mar-87 0850 @MC.LCS.MIT.EDU:jinx@GENEVA.AI.MIT.EDU Scheme mode in GNU Emacs
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Mar 87 08:50:25 PST
Received: from geneva (TCP 2206400372) by MC.LCS.MIT.EDU 23 Mar 87 11:49:51 EST
Received: by GENEVA.AI.MIT.EDU; Mon, 23 Mar 87 11:46:14 est
Date: Mon, 23 Mar 87 11:46:14 est
From: jinx@GENEVA.AI.MIT.EDU (Guillermo J. Rozas)
Message-Id: <8703231646.AA09139@geneva>
To: muller@bu-cs.bu.edu
Cc: scheme@MC.LCS.MIT.EDU
In-Reply-To: muller@bu-cs.bu.edu's message of Mon, 23 Mar 87 10:47:11 EST <8703231547.AA03759@bucse.bu.edu>
Subject: Scheme mode in GNU Emacs
Has anyone out there taken the time to rewrite the Scheme support for
GNU Emacs so that it understands R↑3 Scheme syntax? In particular I'd like
to use the Scheme84 "[" and "]" for parentheses and have the indentation
and balancing come out right. Inferior scheme mode also seems to be
intolerant of vt200 series terminals. Has anyone repaired this?
R↑3RS does not define the syntax of [ and ]. That is Scheme84 and
ChezScheme specific (as far as I know). You can probably do that
by copying the syntax table entries from ( and ) to [ and ],
respectively.
The currently released version of the GNU Emacs scheme support matches
MIT CScheme release 4, which is not 100% compatible with R↑3RS. As
soon as we make our 5th release, 100% compatible with R↑3RS (in a
couple of weeks, if all goes well), a new version of the interface
will be released. It will not support [ and ], since that is not a
"feature" of MIT Scheme (some of us think it is a really bad idea).
The released version of inferior Scheme mode does nothing which is
terminal dependent, so there must be a bug in GNU Emacs which is
manifesting itself in this mode. Are you using MIT Scheme as the
inferior scheme?
∂23-Mar-87 2309 @MC.LCS.MIT.EDU:shneider%cui.unige.chunet@RELAY.CS.NET Looking for comments on an introductory article about Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Mar 87 23:08:57 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 24 Mar 87 02:09:48 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa19225; 24 Mar 87 1:56 EST
Received: from switzerland by RELAY.CS.NET id aa15408; 24 Mar 87 1:52 EST
Received: from ean by SWITZERLAND.CSNET id a013971; 24 Mar 87 7:44 WET
From: "Daniel K. Schneider" <shneider%cui.unige.chunet@RELAY.CS.NET>
To: scheme@MC.LCS.MIT.EDU
MMDF-Warning: Parse error in original version of preceding line at SWITZERLAND.CSNET
Message-ID: <211:shneider@cui.unige.chunet>
Subject: Looking for comments on an introductory article about Scheme
I just finished an introductory article about Scheme which is due by the
end of this week (sorry) and which will appear in the SGAICO/SI Newsletter.
SGAICO (Swiss Group for AI and CO) is a special interest group of SI (Swiss
ACM Chapter)
TOPIC: 1. Philosophy and History of Scheme
(lots of quotes from the R↑3 appendix and S&ICP)
2. The language
(inspired by R↑3 and the banking account of S&ICP)
3. List of implementations
4. A review of PC Scheme
I wonder, if any kind soul out there could have a look at it and make
some comments and/or corrections. The article is certainly *not* worth
looking at, but for somebody it might be important that the Swiss get the
good things right. :)
The whole thing is written by an amateur, who does not want to clutter up
this mailing list. If anybody has some spare time, please reply. I can send
you either a Scribe file or a semi-formatted thing. If REPLY does not work,
try one of the addresses below.
Thanks - Daniel
-------------------------------------------------------------------------------
Daniel K.Schneider
ISSCO, University of Geneva, 54 route des Acacias, 1227 Carouge (Switzerland)
Tel. (..41) (22) 20 93 33 ext. 2114
to VMS/BITNET: to UNIX/EAN (preferable):
BITNET: SCHNEIDER@CGEUGE51 shneider%cui.unige.chunet@CERNVAX
ARPA: SCHNEIDER%CGEUGE51.BITNET@WISCVM shneider@cui.unige.CHUNET
or: shneider%cui.unige.chunet@ubc.csnet
uucp: mcvax!cernvax!cui!shneider
∂24-Mar-87 1029 @MC.LCS.MIT.EDU:wand%corwin.ccs.northeastern.edu@RELAY.CS.NET Scheme mode in GNU Emacs
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 24 Mar 87 10:29:06 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 24 Mar 87 12:58:00 EST
Received: from relay2.cs.net by RELAY.CS.NET id af22835; 24 Mar 87 12:37 EST
Received: from northeastern.edu by RELAY.CS.NET id ak18416; 24 Mar 87 12:33 EST
Received: from corwin.ccs.northeastern.edu by
nuhub.acs.northeastern.edu; Tue, 24 Mar 87 11:06 EST
Received: by corwin.CCS.Northeastern.EDU (5.51/5.17)
id AA13177; Tue, 24 Mar 87 11:00:39 EST
Date: Tue, 24 Mar 87 11:00:39 EST
From: wand%corwin.ccs.northeastern.edu@RELAY.CS.NET
To: muller@BU-CS.BU.EDU
Cc: scheme@MC.LCS.MIT.EDU
In-Reply-To: muller@bu-cs.bu.edu's message of Mon, 23 Mar 87 10:47:11 EST
Subject: Scheme mode in GNU Emacs
Yes, I have a modified version of scheme.el (and shell.el) to do the right
thing with [] and also to run scheme as an inferior process reasonably.
I will mail it if anyone is interested.
Mitch Wand
∂25-Mar-87 0925 @MC.LCS.MIT.EDU:mcvax!crcge1!adams@seismo.CSS.GOV scheme mailing list
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 25 Mar 87 09:25:04 PST
Received: from seismo.CSS.GOV (TCP 30003106431) by MC.LCS.MIT.EDU 25 Mar 87 12:25:21 EST
Received: from mcvax.UUCP by seismo.CSS.GOV (5.54/1.14) with UUCP
id AA05803; Wed, 25 Mar 87 12:20:10 EST
Received: by mcvax.cwi.nl; Wed, 25 Mar 87 18:19:22 +0100 (MET)
Received: by inria.inria.fr; Wed, 25 Mar 87 17:42:51 +0100 (MET)
Received: by crcge1.DIN; Wed, 25 Mar 87 13:25:34 -0100
Date: Wed, 25 Mar 87 13:25:34 -0100
From: mcvax!crcge1!adams@seismo.CSS.GOV (Drew Adams)
Message-Id: <8703251225.AA16715@crcge1.DIN>
To: scheme@mc.lcs.mit.edu
Subject: scheme mailing list
Please place me on your mailing list. Thanks.
Drew ADAMS, Laboratoires de Marcoussis, Centre de Recherche de la Compagnie
Generale d'Electricite, Route de Nozay, 91460 MARCOUSSIS, FRANCE
Tel. 64.49.11.54, seismo!mcvax!inria!crcge1!adams
∂26-Mar-87 0235 @MC.LCS.MIT.EDU:shneider%cui.unige.chunet@RELAY.CS.NET Private message to Cynthia Mason. (mail problem)
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 26 Mar 87 02:34:51 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 26 Mar 87 05:35:09 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa08512; 26 Mar 87 5:30 EST
Received: from switzerland by RELAY.CS.NET id aa00706; 26 Mar 87 5:23 EST
Received: from ean by SWITZERLAND.CSNET id a020472; 26 Mar 87 11:15 WET
From: "Daniel K. Schneider" <shneider%cui.unige.chunet@RELAY.CS.NET>
Sender: "Daniel K. Schneider" <shneider%cui.unige.chunet@RELAY.CS.NET>
To: scheme@MC.LCS.MIT.EDU
MMDF-Warning: Parse error in original version of preceding line at SWITZERLAND.CSNET
Message-ID: <222:shneider@cui.unige.chunet>
Subject: Private message to Cynthia Mason. (mail problem)
Sorry, I can't get back to you, something in your adress got chewed up,
(probably by your mailer). I tried Arpa, but it did not work.
I get this: Cynthia Mason 423-9404 <clm@lll-zaphod.a>
Send me your message again with your address included *in* the message text.
preferably one of: ARPA/EDU, uucp, cs-net, BITNET
∂26-Mar-87 0356 @MC.LCS.MIT.EDU:shneider%cui.unige.chunet@RELAY.CS.NET Correction mistake: Looking for comments on an introductory article ..
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 26 Mar 87 03:55:50 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 26 Mar 87 06:43:59 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa08831; 26 Mar 87 6:37 EST
Received: from switzerland by RELAY.CS.NET id aa00959; 26 Mar 87 6:31 EST
Received: from ean by SWITZERLAND.CSNET id a020686; 26 Mar 87 12:20 WET
From: "Daniel K. Schneider" <shneider%cui.unige.chunet@RELAY.CS.NET>
To: scheme@MC.LCS.MIT.EDU
MMDF-Warning: Parse error in original version of preceding line at SWITZERLAND.CSNET
Message-ID: <223:shneider@cui.unige.chunet>
Subject: Correction mistake: Looking for comments on an introductory article ..
> I just finished an introductory article about Scheme which is due by the
>end of this week (sorry) and which will appear in the SGAICO/SI Newsletter.
SORRY, I goofed ↑↑↑ , this article (cf. my posting march 24th)
is due in three weeks only.
(for those who wanted to look at it actually, but couldn't this week !)
- d.s.
PS: I am amazed, I already got 5 replies (BIG thanks to the scheme community)
∂27-Mar-87 1850 @MC.LCS.MIT.EDU:willc%tekchips.tek.com@RELAY.CS.NET multiple return values
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 27 Mar 87 18:49:52 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 27 Mar 87 21:55:00 EST
Received: from relay2.cs.net by RELAY.CS.NET id ac29893; 27 Mar 87 21:49 EST
Received: from tektronix.tek.com by RELAY.CS.NET id ah11897; 27 Mar 87 21:42 EST
Received: by tektronix.TEK.COM (5.51/6.20)
id AA14104; Fri, 27 Mar 87 15:48:41 PST
Received: by tekchips.TEK.COM (5.31/6.19)
id AA03757; Fri, 27 Mar 87 15:47:10 PST
Message-Id: <8703272347.AA03757@tekchips.TEK.COM>
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: multiple return values
Date: 27 Mar 87 15:47:06 PST (Fri)
From: willc%tekchips.tek.com@RELAY.CS.NET
Our previous round of discussions on multiple return values reached
no consensus. I want to try again with the very simple, specific
proposal that follows. The proposal consists of additions and changes
to the formal semantics that appears in R3RS, an informal description,
and a rationale.
FORMAL SEMANTICS
[Notation: The "\" character should be read as a Greek lambda,
and the "!" character should be read as a down-arrow.]
Add a procedure RECEIVE-VALUES whose semantics is given by
receive_values: E* --> K --> C
receive_values
= twoarg (\ e1 e2 k . applicate e1 <> (\ e* . applicate e2 e* k))
Add a procedure RETURN-VALUES whose semantics is given by
return_values: E* --> K --> C
return_values = \ e* k . k e*
Either leave the equation of the auxiliary function "single" as is
(equation 1 below), or change it as indicated in equation 2 or as
indicated in equation 3.
single: (E --> C) --> K
1. single = \ f e* . # e* = 1 --> f (e* ! 1), wrong "..."
2. single = \ f e* . # e* >= 1 --> f (e* ! 1), wrong "..."
3. single = \ f e* . # e* >= 1 --> f (e* ! 1), f unspecified
INFORMAL DESCRIPTION
(RECEIVE-VALUES thunk proc) procedure
The first argument is a procedure of no arguments, the second is any
procedure. Calls the first argument, obtaining 0 or more return
values, and then calls the second argument on the value(s) returned
by the first argument. See RETURN-VALUES.
(receive-values (lambda () (return-values 3 7))
(lambda (a b) (* a b))) --> 21
(RETURN-VALUES x ...) procedure
Takes any number of arguments, and returns them as multiple return
values. [See the rationale for a discussion of how many return values
a continuation expects, and the error conditions that may result when
the expectations are not met.] See RECEIVE-VALUES.
(receive-values (lambda () (return-values 'a 'b 'c))
vector) --> #(a b c)
(letrec ((f (lambda (x) (if (zero? x) (g x) (g x))))
(g (lambda (x) (return-values x (- x))))
(h (lambda (x)
(receive-values (lambda () (f x)) list))))
(h 3))
--> (3 -3)
(letrec ((f (lambda (x) (+ (g x) 13)))
(g (lambda (x) (return-values x (- x))))
(h (lambda (x)
(receive-values (lambda () (f x)) list))))
(h 3))
--> error [equation 1]
--> (16) [equation 2 or 3]
(receive-values (lambda () (return-values)) vector) --> #()
(receive-values (lambda () (return-values 1))
(lambda (x . y) y))
--> ()
(receive-values (lambda () (return-values))
(lambda (x . y) y))
--> error
(list (return-values 'a 'b 'c 'd)) --> (a)
(car (list (return-values))) --> error [equation 1 or 2]
--> unspecified [equation 3]
RATIONALE
This proposal is along the lines of multiple return values as in
Common Lisp, but is somewhat simpler and more rational. The simplicity
of the proposal, as compared to the exposition in CLtL, is attributable
to a better choice of primitives and to Scheme's tail-recursive semantics.
RECEIVE-VALUES and RETURN-VALUES correspond to T3's RECEIVE-VALUES
and RETURN. The name "RETURN" was rejected because it would confuse
people who are accustomed to the use of RETURN in Common Lisp and
similar Lisps. Note that these are procedures, not syntax, and that
neither would be essential Scheme.
The arguments to RECEIVE-VALUES are reversed from the way they are in T3.
Feel free to argue the argument order.
Argue also about which equation we should choose for "single". It
determines what happens in the case where RETURN-VALUES returns to a
continuation that was not created by RECEIVE-VALUES. Equation 1 says
that in such a case there must be exactly one return value. Equation 2
says that in such a case there must be at least one value; the extra
values are ignored. Equation 3 allows zero return values, in which case
the value received by the continuation is unspecified. No matter which
equation is chosen, there is no difference between returning a single
value in the usual way and returning a single "multiple value" using
RETURN-VALUES.
I didn't give equations for the extreme positions. The fascist position
would say that it is always an error for RETURN-VALUES to return to a
continuation that was not created by RECEIVE-VALUES. The commonlisp
position would say that when zero values are returned to a continuation
that is expecting one value, then the symbol NIL is passed to the
continuation. If there is sufficient demand, I will post equations for
these.
If we interpret the use of "wrong" in the semantic equations to mean
"is an error" instead of "signals an error", then all of the equations
allow implementations in which Scheme multiple return values are
compatible with the semantics of Common Lisp's multiple return values.
This should make it easier to support a Scheme subset in Common Lisp or
vice versa.
I see no way to implement the proposed procedures in R3RS Scheme, but
most implementations should find it easy to add them.
William Clinger
∂27-Mar-87 1858 @MC.LCS.MIT.EDU:willc%tekchips.tek.com@RELAY.CS.NET Let's get together again
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 27 Mar 87 18:58:21 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 27 Mar 87 21:58:11 EST
Received: from relay2.cs.net by RELAY.CS.NET id ab29893; 27 Mar 87 21:49 EST
Received: from tektronix.tek.com by RELAY.CS.NET id ag11897; 27 Mar 87 21:42 EST
Received: by tektronix.TEK.COM (5.51/6.20)
id AA12620; Fri, 27 Mar 87 15:14:08 PST
Received: by tekchips.TEK.COM (5.31/6.19)
id AA03301; Fri, 27 Mar 87 15:12:35 PST
Message-Id: <8703272312.AA03301@tekchips.TEK.COM>
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: Let's get together again
Date: 27 Mar 87 15:12:31 PST (Fri)
From: willc%tekchips.tek.com@RELAY.CS.NET
It's been the better part of a year since many of us got to see each
other at the 1986 Lisp conference, and two and a half years since we
got together at Brandeis. The next X3J13 (Common Lisp) meeting will
be in Boston or Cambridge 30 June and 1 July (a Tuesday and Wednesday),
so David Bartley and I would like to suggest that we meet in Cambridge
to discuss Scheme standardization issues on Thursday, 2 July, possibly
spilling over into Friday morning, 3 July. We need volunteers to
arrange for a room, prepare an agenda, and chair the meeting.
Some issues that Bartley and I would like to see resolved are:
multiple return values
customizable reader
number syntax and exactness
macros
optional arguments
structures and opaque objects
environments
modules
These are in rough order of our priorities, where we give priority to
things that can be standardized easily as well as to things that are
important. We'll be posting some proposals to this mailing list in
hopes of generating some thought, interest, or at least discussion
before we next get together.
Another thing we should talk about is what we want to come after Scheme.
Peace,
Will Clinger
Tektronix, Inc.
∂27-Mar-87 2120 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU multiple return values
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 27 Mar 87 21:20:19 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 28 Mar 87 00:06:45 EST
Date: Sat, 28 Mar 87 00:03:12 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: multiple return values
To: willc%tekchips.tek.com@RELAY.CS.NET
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of 27 Mar 87 15:47:06 PST (Fri) from willc%tekchips.tek.com at RELAY.CS.NET
Message-ID: <174983.870328.JAR@AI.AI.MIT.EDU>
Date: 27 Mar 87 15:47:06 PST (Fri)
From: willc%tekchips.tek.com at RELAY.CS.NET
single: (E --> C) --> K
1. single = \ f e* . # e* = 1 --> f (e* ! 1), wrong "..."
2. single = \ f e* . # e* >= 1 --> f (e* ! 1), wrong "..."
3. single = \ f e* . # e* >= 1 --> f (e* ! 1), f unspecified
I have already put in my vote for 1.
I see no way to implement the proposed procedures in R3RS Scheme, but
most implementations should find it easy to add them.
If "wrong" doesn't imply "signals an error" then the following is a
correct implementation of alternative 1. This is pretty much how the
feature was implemented in T2.
(define values-marker (list 'values-marker))
(define receive-values
(lambda (thunk proc)
(let ((vals (thunk)))
(if (and (pair? vals) (eq? (car vals) values-marker))
(apply proc (cdr vals))
(proc vals)))))
(define return-values
(lambda vals
(cons values-marker vals)))
I think that the fact that this is so easy is a significant reason to
favor alternative 1.
----
I find the feature to be pretty unuseable unless there is some
syntactically sugared way to use RECEIVE-VALUES (viz. T's RECEIVE
and CL's MULTIPLE-VALUE-BIND), but maybe this issue can be argued
separately.
Jonathan
∂28-Mar-87 1146 @MC.LCS.MIT.EDU:KMP@YUKON.SCRC.Symbolics.COM Let's get together again
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 28 Mar 87 11:46:31 PST
Received: from YUKON.SCRC.Symbolics.COM (TCP 30002424403) by MC.LCS.MIT.EDU 28 Mar 87 14:51:46 EST
Received: from RIO-DE-JANEIRO.SCRC.Symbolics.COM by YUKON.SCRC.Symbolics.COM via CHAOS with CHAOS-MAIL id 185960; Sat 28-Mar-87 14:36:06 EST
Date: Sat, 28 Mar 87 14:35 EST
From: Kent M Pitman <KMP@STONY-BROOK.SCRC.Symbolics.COM>
Subject: Let's get together again
To: willc%tekchips.tek.com@csnet-relay
cc: RRRS-Authors@MC.LCS.MIT.EDU
In-Reply-To: <8703272312.AA03301@tekchips.TEK.COM>
Message-ID: <870328143552.3.KMP@RIO-DE-JANEIRO.SCRC.Symbolics.COM>
I'm all for getting together, but because my (paid) job is Lisp and not
Scheme, I'd be happier if it were over a weekend so I wouldn't have to
take time away from work. Also, many of the X3J13 participants will be
arriving for Monday subcommittee meetings and if they came Saturday,
they could get cheaper fares. Note, too, that Thursday/Friday is 4th
of July weekend and not everyone will necessarily want to spend that time
in Boston -- though certainly I plan to be there so this last point is
not a problem for me, just another possible reason why the weekend before
(27-28 June) might be better for meeting.
∂28-Mar-87 1400 @MC.LCS.MIT.EDU:jinx@GENEVA.AI.MIT.EDU Let's get together again
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 28 Mar 87 14:00:04 PST
Received: from geneva (TCP 2206400372) by MC.LCS.MIT.EDU 28 Mar 87 16:14:05 EST
Received: by GENEVA.AI.MIT.EDU; Sat, 28 Mar 87 16:11:21 est
Date: Sat, 28 Mar 87 16:11:21 est
From: jinx@GENEVA.AI.MIT.EDU (Guillermo J. Rozas)
Message-Id: <8703282111.AA05557@geneva>
To: KMP@STONY-BROOK.SCRC.Symbolics.COM
Cc: willc%tekchips.tek.com@csnet-relay, RRRS-Authors@MC.LCS.MIT.EDU
In-Reply-To: Kent M Pitman's message of Sat, 28 Mar 87 14:35 EST <870328143552.3.KMP@RIO-DE-JANEIRO.SCRC.Symbolics.COM>
Subject: Let's get together again
I agree with KMP. I think the weekend before, if at all possible,
would be better.
I also think that a new meeting would be a good idea.
∂28-Mar-87 2023 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU a modest macro proposal
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 28 Mar 87 20:22:59 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 28 Mar 87 23:28:18 EST
Date: Sat, 28 Mar 87 23:24:42 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: a modest macro proposal
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <175356.870328.JAR@AI.AI.MIT.EDU>
Macros for Scheme
Jonathan Rees
28 March 1987
Primary objectives:
- Macros are scoped, so users won't step on each others' toes.
- The client of a macro need not know anything about the macro's
implementation. In particular, capture problems must be avoidable
both for syntactic keywords and variables.
Secondary objectives:
- Consistent with the "expansion passing style" described
in [1].
- Consistent with the spirit of the macro facilities provided by
MIT Scheme and T.
This is a rough draft, and contains more questions than answers, but I
want to get feedback, and answers to the questions, so here it is.
Overview:
1. Fundamental mechanism
Describes the basic ideas of syntax tables and preprocessed
expressions.
2. Defining macros
Describes two new expression types that introduce scoped macro
definitions.
3. Avoiding free variable capture
Describes ways to circumvent capture problems.
4. Convenience features
Discusses higher-level layers that could make macro writing
easier.
5. Notes and questions
Appendix. An implementation
1. Fundamental mechanism
Two abstractions are introduced, "syntax table" and "preprocessed
expression". A "syntax table" describes a particular mapping from
concrete syntax (expressions) to abstract syntax (preprocessed
expressions). When a user defines a macro, he implicitly defines a
variant on the language and therefore a new mapping from expressions
to preprocessed expressions.
1.1. Reference guide
(For the purposes of this discussion, the term "expression" means
"s-expression", or more precisely:
- Symbols, numbers, booleans, characters, strings, and empty lists
are expressions.
- If E1 and E2 are expressions then the pair (E1 . E2) is an
expression. (In particular, lists of expressions are
expressions.)
- If E0, ... En are expressions, then the vector #(E1 ... En) is
an expression.
- A preprocessed expression is an expression.
- There are no other expressions.)
(PREPROCESS expression syntax-table)
PREPROCESS preprocesses expression according to syntax-table,
and returns a preprocessed expression. The manner in which
the preprocessed expression is determined depends entirely on the
syntax table argument (see the various ways to create syntax tables,
below), with the following exception: (PREPROCESS p syntax-table)
always returns p if p is already a preprocessed expression.
It is an error if expression is not syntactically valid according
to syntax-table.
SCHEME-SYNTAX-TABLE
The value of SCHEME-SYNTAX-TABLE is a syntax table that corresponds
to a language conforming to the Revised↑3 Report. In gory detail,
this means: let E be an expression, and let P be the preprocessed
expression that results from calling
(PREPROCESS E SCHEME-SYNTAX-TABLE).
- If E is a number, boolean, string, or character, then P denotes
an appropriate literal expression.
- If E is a symbol, and E is not a Scheme syntactic keyword (QUOTE,
LAMBDA, etc.), then P denotes a variable reference.
- If E is a pair whose car is a syntactic keyword, then P denotes
an appriopriate expression (unless it contins a syntax error).
- If E is a nonempty list whose car is an expression, then P denotes a
combination (unless some subexpression contains a syntax error).
- If E is already a preprocessed expression, E is equal to P.
- Otherwise E is not syntactically valid.
(ADD-KEYWORD syntax-table symbol expansion-proc)
Expansion-proc must be a procedure of two arguments, an expression
and a syntax table. Expansion-proc must return a preprocessed
expression.
ADD-KEYWORD returns a new syntax table according to which
expressions of the form (symbol ...) are preprocessed by
expansion-proc. That is, PREPROCESS will call expansion-proc and
return what it returns. The arguments passed to expansion-proc will
be the expression and syntax-table that were passed to PREPROCESS.
Any other expression E is preprocessed the same way it would have
been preprocessed according to syntax-table. If this means that it
is to be preprocessed according to SCHEME-SYNTAX-TABLE, then any
subexpressions of the expression will be preprocessed according to
the syntax table that was originally passed to PREPROCESS, not
according to SCHEME-SYNTAX-TABLE.
(REMOVE-KEYWORD syntax-table symbol)
This returns a syntax table in which an expression of the form
(symbol ...) denotes a combination. If symbol had an associated
expansion procedure in syntax-table, that expansion procedure will
be ignored in the new syntax table.
1.2. Discussion
The following may be a helpful analogy:
(EVAL (PREPROCESS
lambda-expression expression
environment) syntax-table)
=> closure => preprocessed-expression
EVAL (or the ENCLOSE of the Revised Report) takes a lambda-expression,
which is context-dependent or "open" because it contains free
variables, and turns it into something that's context-independent or
"closed", namely a closure. PREPROCESS takes an expression, which is
context-dependent because the meanings of subexpressions depend on
what macros are in effect, and returns something that is
context-independent and therefore immune to the vagaries of the macro
context into which it may be placed.
Preprocessed expressions may legitimately appear as subexpressions of
expressions to be passed to PREPROCESS. For example, if M1 and M2 are
preprocessed-expressions, then `(AND ,M1 ,M2) is a valid expression
that can be passed again to PREPROCESS (assuming AND has its usual
meaning). The effect of this is the same as if the expression had
been an AND-expression whose subexpressions were expressions that
would have been preprocessed as M1 and M2 in whatever syntax-table was
the second argument to the call to PREPROCESS.
The nature of "preprocessed-expression" objects is not specified here;
they may or may not be lists, vectors, procedures, etc., or objects of
some new data type. This proposal does not provide any explicit
operations on preprocessed expressions, but it doesn't preclude such
operations, either. Presumably LOAD, EVAL, and compilers know how to
manipulate preprocessed-expressions. Similarly, there may be
operations on syntax tables other than the ones given here; in
particular the clever tricks in [1] could easily work in this
framework.
Note that the syntax table passed to an expansion procedure is not
necessarily the same as the syntax table returned by the call to
ADD-KEYWORD that defined its keyword. The syntax table is the
appropriate one to use in processing subexpressions. The syntax table
argument serves the same purpose as the expansion procedure passed to
expanders in [1].
Detail: definitions, as well as expressions, may be passed to
PREPROCESS.
1.3. Examples
Example 1: The following evaluates to a syntax table that is the
same as that for R↑3R Scheme except that FOO is a syntactic keyword and
(FOO x) means the same as (QUOTE x).
(add-keyword scheme-syntax-table 'foo
(lambda (e st)
(preprocess `(quote ,(cadr e)) scheme-syntax-table)))
This illustrates the general principle that a more complicated
syntax-table can be defined in terms of a simpler one. An expression E
written in a more complicated language L (not even known at macro
definition time) is transformed into a new expression (the expansion),
and then the preprocessed version of the new expression is determined
according to a syntax-table that is known by the expansion procedure to
support the QUOTE keyword in the expected way.
Example 2: The following procedure will augment a given syntax table
with a definition of a simple LET macro.
(define (add-let st)
(add-keyword st 'let
(lambda (exp st)
(let ((bindings (cadr exp))
(body (cddr exp)))
(preprocess `((lambda ,(map car bindings)
,@(map (lambda (exp)
(preprocess exp st))
body))
,@(map (lambda (binding)
(preprocess (cadr binding) st))
bindings))
scheme-syntax-table)))))
The fact that preprocessed-expressions act like normal forms permits the
use of ordinary list constructors (like backquote) in constructing
partially preprocessed expressions.
Note that PREPROCESS is used within expansion procedures for two
distinct purposes:
(a) To compute a preprocessed expression, in the current syntax table,
for each sub-expressions of the expression being expanded.
(b) To preprocess, according to some known syntax table, an expression
that has been determined to be equivalent to the original expression.
Why are syntax tables immutable? This aids (but doesn't guarantee)
consistency between compiled and interpreted code.
2. Defining macros
2.1. LET-SYNTAX
(LET-SYNTAX (((keyword exp-var st-var) . expansion) ...) . body)
LET-SYNTAX is used to define a macro that is local to a single
expression (in practice it is often wrapped around most of a file).
(T and MIT Scheme both have constructs like this.)
For example,
(let-syntax (((foo exp st)
(preprocess `(quote ,(cadr exp)) scheme-syntax-table)))
(foo (a b c)))
=> (a b c)
LET-SYNTAX need not be primitive, assuming there exists an EVAL
procedure and some environment EXPANDER-ENV in which to close
expansion procedures. The following adds a LET-SYNTAX expression
type to any syntax table S:
(add-keyword S 'let-syntax
(lambda (exp st)
(do ((specs (cadr exp) (cdr specs))
(st st
(let ((spec (car specs)))
(add-keyword st (caar spec)
(eval `(lambda ,(cdar spec)
,@(cdr spec))
expander-env)))))
((null? specs)
(preprocess `(begin ,@(map (lambda (exp)
(preprocess exp st))
(cddr exp)))
scheme-syntax-table)))))
In order to reduce the possibility that a macro could accidentally
or intentionally depend on some run-time binding, it is
strongly advised to make the environment in which expanders
are closed be disjoint from the environment in which the expanded
code will be run. Otherwise one could find oneself in the embarrasssing
situation of having code that "works" in an incrementally compiled
implementation but not in a block- or cross-compiled implementation.
2.2. USING-SYNTAX
(USING-SYNTAX syntax-table-exp . body)
USING-SYNTAX lets one make use of some specific macro environment.
(using-syntax scheme-syntax-table (quote yow)) => yow
(add-keyword syntax-table 'using-syntax
(lambda (exp syntax-table)
;; ignore syntax-table
(let ((syntax-table (eval (cadr exp) expander-env)))
(preprocess `(begin ,@(map (lambda (exp)
(preprocess exp syntax-table))
(cddr exp)))
scheme-syntax-table))))
Subtle point:
For these two forms, it might make just as much sense, and perhaps more,
to say
(eval (preprocess foo syntax-table) expander-env)
as
(eval foo expander-env) --
i.e. macros can be written using the macros in effect where the text of
the macro definition occurs, even if they can't make use of the lexical
environment.
3. Avoiding free variable capture
3.1. Free variables introduced into expansions
We want to be able to do things like
(let ((cons +))
`(a ,(cons 1 2) b))
and not lose when QUASIQUOTE expanding into a call to CONS. It
doesn't work to write (as Dan Friedman and others have suggested)
`(',car ,z)
in the definition of QUASIQUOTE because this presents horrible questions
about the meaning of cross-compilation that no one is prepared to
answer right now.
Kohlbecker's solution amounts to performing alpha-conversion and macro
expansion at the same time. This is a lot of mechanism and breaks
down in a few places. Here is a much simpler, low-tech solution.
The solution is for the expander to introduce special expressions into
the expansion that represent "absolute" or "global" references.
Such references are not sensitive to the lexical environment.
(ABSOLUTE node1 node2 ...) [syntax]
Finds a value in an implementation-dependent, tree-structured
namespace. Each node_i should be an identifier; this is to be
considered analogous to a Multics-style pathname >node1>node2>....
In order to make it as easy as possible, Scheme implementors are
urged to cooperate in apportioning sections of this namespace so that
there no conflicts can arise. This is an aministrative problem
analgous to domain naming on the Internet, and perhaps solvable by
similar means.
Only one portion of the namespace is defined here, namely that the
top-level SCHEME-ENV node has as subnodes all the names in the
initial R↑3R Scheme environment. E.g.
(let ((+ -))
((absolute scheme-env +) 1 2)) => 3
(Note that ABSOLUTE must be a new kind of expression -- a procedure
can't so the trick, since that would beg the question of how to name
THAT procedure.)
3.2. Bound variables introduced into the expansion
The flip side of this problem is that macros often want to introduce
new bound variables into expansions, and we don't want these names to
accidentally conflict with names already used in the client's code.
Common Lisp (Maclisp, etc.) programmers don't consider this to be a
problem, since GENSYM and GENTEMP exist. T has GENERATE-SYMBOL (?) and
MIT Scheme has GENERATE-UNINTERNED-SYMBOL. I think something like
this would do the trick. However, I would very much like to
preserve the invariant
(EQ? SYM (STRING->SYMBOL (SYMBOL->STRING SYM))).
which is violated by GENSYM (and GENERATE-UNINTERNED-SYMBOL).
One solution, with a well-defined semantics, would be to have a
procedure that returns a symbol not ocurring in a given expression
(or expressions):
(SYMBOL-NOT-OCCURRING-IN exp) => symbol
This has a nice functional flavor to it, but it could be implemented
nondeterministically, in such a way that only the symbol table need be
examined, not exp itself. (I think T3 does this.)
Another possibility would be to apportion some subset of the set of
all symbols for use as "unique identifiers", e.g. all symbols starting
with some "obscure" prefix, not necessarily even readable (although
read/print symmetry is also a nice feature...).
I don't want to make a concrete proposal at this time.
4. Convenience features
Writing correct macros using ADD-KEYWORD is possible, but cumbersome
and error prone. One must remember to call PREPROCESS on
sub-expressions and on the final output, passing the correct syntax
table to each.
There are several possible ways to address this problem. One is to
say that we should not be in the business of making it easy to write
macros, but instead should do what we can to discourage users from
writing macros, or at least make them recognize the pitfalls. In this
view, the complexity of the process is good.
A second solution is Kohlbecker's "hygienic expansion", which makes it
easy to write correct macros. I suspect this mechanism could be
implemented in terms of the low-level primitives given above, but I
think it has some drawbacks; there are many useful kinds of macros that
can't be written.
I am working on a third solution that, loosely speaking, makes use of
a syntactic description (BNF-like) of the expression type in order to
preprocess subexpressions before handing them to the expansion procedure.
The result is more verbose than hygienic macros and only a little more
verbose than Common Lisp's macros.
5. Notes and open questions
5.1. Compatibility notes
T and MIT Scheme already have syntax tables, but they're mutable.
Expansion procedures are called "syntax descriptors" in T. T has a
MACRO-EXPANDER macro that creates expansion procedures. MIT Scheme has
a MACRO macro for the same purpose.
In MIT Scheme, the syntax table is passed implicitly as a fluid-bound
variable. In T, it is possible to get at the syntax table, as an extra
argument to an expander, but it's painful. In Common Lisp, the
syntax-table corresponds roughly to the &environment argument to macros
(except that in CL you are forbidden to redefine a special
form -- this proposal permits that).
PREPROCESS is similar to the SYNTAX procedure in MIT Scheme, and
vaguely similar to STANDARD-COMPILER in T.
ABSOLUTE is similar to MIT Scheme's ACCESS. In ACCESS, the last
subform is evaluated, which isn't quite what we want, since that makes
it context-sensitive again (although this greatly reduces
opportunities for lossage). [Also, I find the argument order to
ACCESS confusing; it's backwards from the way filenames are usually
written (on Multics and Unix at least) and also backwards from things
like VECTOR-REF, where the aggregate or superior object comes first.]
5.2. Syntax table used by LOAD and/or command loop
1. Which syntax table is used to process forms read by LOAD?
2. Which syntax table is used to process forms typed at a
read-eval-print loop?
3. How can one perform definitions in the environment that will
be seen by USING-SYNTAX?
Here is one conservative proposal, although there are many
possibilities and variations:
The top level syntax-table for any file is initially
SCHEME-SYNTAX-TABLE. Changes must be made explicitly via USING-SYNTAX
or LET-SYNTAX, which should be wrapped around the enire file if
necessary.
The syntax table used at the read-eval-print loop is changed in some
implementation-dependent manner (there's nothing that even says there
IS a read-eval-print loop). E.g. there could be a procedure
(SET-CURRENT-SYNTAX-TABLE! syntax-table).
5.3. Keywords and variables
Several people have complained that
(let ((if list))
(if 1 2 3))
ought, according to the rules of lexical scope, to evaluate to (1 2 3).
It is possible in this framework to make syntax-tables in which variable
bindings shadow syntax bindings, but it requires cooperation from
every macro that binds variables (LET, LETREC, LAMBDA, etc.):
(add-syntax foo 'lambda
(lambda (exp st)
... (do ((vars vars (cdr vars))
(st st (remove-syntax (car vars) st)))
...) ...))
I'd rather not raise this question here since it's really orthogonal to
the rest of this proposal.
5.4. Macros that expand into multiple definitions
The syntax of <program> should be extended to include sequence
expressions:
<program> --> <top>*
<top> --> <definition>
| <expression>
| (begin <top>+)
This is so that macros at top level can expand into multiple
definitions: (begin (define foo ...) (define bar ...)).
There is an ambiguity here in that (begin <expression>+) can be parsed
in either of two ways, but the meaning is the same in either case, so
this isn't a grave problem.
Should the syntax of a <body> be similarly extended to allow
expansions like
(lambda (...) (begin (define ...) (define ...)) ...)?
What about
(lambda (...) (begin (define ...) (compute ...)) ...)?
What about
(lambda (...) (begin (compute ...) (define ...)) ...)?
5.5. Delayed expansion
Some implementations may want to delay macro expansion (preprocessing)
so that the expression tree is processed breadth-first instead of
depth-first. This could be handy for any number of purposes, e.g. in
preventing propagation of syntax errors, in performing
alpha-conversion in parallel with macro expansion, or to speed up file
loading. This should be explicitly permitted by the proposal. The
only way it would make a difference is if a macro expander could
observe or perform a side-effect.
5.6. Analysis of subexpressions
I think it's a bad idea for macros to go snooping into their
subexpressions. This should be unnecessary for "optimization" (the
main reason people did this in Maclisp); it's hard to come
up with valid reasons to want to do it.
On the other hand, it would be nice if someone writing a compiler
could portably use PREPROCESS as a front end. This would mandate having
operations for decomposing preprocessed expressions. One possibility
would be to define a set of accessors and predicates, as MIT Scheme
does. Another way to do it would be to have one or more coercion
functions to do the inverse of PREPROCESS, e.g. (UNPREPROCESS p-e)
would return an expression e such that
(PREPROCESS e SCHEME-SYNTAX-TABLE)
would return something equivalent to p-e; then one could use CAR and
CDR to take the result apart.
Either way you have to answer sticky questions, however, such as
whether derived expressions like LETREC should be expanded out or
preserved.
5.7. Other ways to manipulate the keyword/expander association
Maybe we also want MOVE-KEYWORD or RENAME-KEYWORD?
References.
[1] Dybvig, Friedman, and Haynes. Expansion-passing style: Beyond
conventional macros. 1986 ACM Lisp & FP Conference.
[2] Kohlbecker's thesis.
[3] T manual.
[4] Common Lisp.
[5] Revised↑3 Scheme Report.
---------------------
Appendix: a rudimentary implementation.
;;; Preprocessed expressions
(define (preprocessed? obj)
(and (vector? obj)
(= (vector-length obj) 2)
(eq? (vector-ref obj 0) 'preprocessed)))
(define (make-preprocessed core-exp)
(if (preprocessed? core-exp)
core-exp
(vector 'preprocessed core-exp)))
;;; ->CORE translates a preprocessed expression into the core language.
(define (->core exp)
(if (preprocessed? exp)
(vector-ref exp 1)
(error "not a preprocessed expression" exp)))
;;; A syntax table is a procedure, and PREPROCESS is FUNCALL.
(define (preprocess exp st)
(st exp st))
(define (add-keyword st0 keyword proc)
(lambda (exp st)
(if (and (pair? exp) (eq? (car exp) keyword))
(proc exp st)
(st0 exp st))))
;;; An empty syntax table; defines no special expression types.
(define empty-syntax-table
(lambda (exp st)
(cond ((symbol? exp)
(make-preprocessed exp))
((or (boolean? exp) (number? exp) (char? exp) (string? exp))
(make-preprocessed exp))
((preprocessed? exp)
exp) ;Idempotent!
((not (pair? exp))
(error "not a syntactically valid expression" exp))
(else
;; Combination
;; (There is a small bug here if REMOVE-KEYWORD exists)
(make-preprocessed (map (lambda (arg)
(->core (preprocess arg st)))
exp))))))
;;; Core syntax table. Understands the primitive expression types, but
;;; not the derived ones.
(define core-syntax-table
(do ((st empty-syntax-table
(add-keyword st (caar z) (cadar z)))
(z `((quote
,(lambda (exp st)
(make-preprocessed exp)))
(lambda
,(lambda (exp st)
(make-preprocessed
`(lambda ,(cadr exp)
,(->core (preprocess (caddr exp) st))))))
(set!
,(lambda (exp st)
(make-preprocessed
`(set! ,(cadr exp)
,(->core (preprocess (caddr exp) st))))))
(define
,(lambda (exp st)
(make-preprocessed
`(define ,(cadr exp)
,(->core (preprocess (caddr exp) st))))))
(if
,(lambda (exp st)
(make-preprocessed
`(if ,(->core (preprocess (cadr exp) st))
,(->core (preprocess (caddr exp) st))
,(->core (preprocess (cadddr exp) st))))))
(begin
,(lambda (exp st)
(make-preprocessed
`(begin ,@(map (lambda (exp)
(->core (preprocess exp st)))
(cdr exp))))))
(absolute
,(lambda (exp st)
(make-preprocessed exp))))
(cdr z)))
((null? z) st)))
;;; The scheme syntax table defines the derived expression types.
(define scheme-syntax-table
(do ((st core-syntax-table
(add-keyword st (caar z) (cadar z)))
(z `((and
,(lambda (exp st)
(let ((forms (cdr exp))
(j (lambda (exp) (preprocess exp st))))
(cond ((null? forms) `#t)
((null? (cdr forms)) (j (car forms)))
(else
(preprocess
`((lambda (p th)
(if p (th) p))
,(car forms)
(lambda () (and ,@(map j (cdr forms)))))
scheme-syntax-table))))))
;; ...
(lambda
,(lambda (exp st)
(preprocess
`(lambda ,(cadr exp)
,(preprocess-body (cddr exp) st))
core-syntax-table)))
;; (letrec ,...)
;; ...
;; (quasiquote ,... (absolute scheme-env cons) ...)
)
(cdr z)))
((null? z) st)))
;;; Implements implicit begin and internal defines for lambda bodies.
(define (preprocess-body body st)
(let ((definition? (lambda (exp)
(and (pair? exp) (eq? (car exp) 'define))))
(definition-lhs cadr)
(definition-rhs caddr))
(let loop ((l (map (lambda (exp)
(preprocess exp st))
body))
(d '()))
(if (null? l)
(error "no non-definitions in body" body)
(let ((exp (->core (car l)))) ;Analyze
(if (not (definition? exp))
(preprocess (if (null? d)
`(begin ,@l)
`(letrec ,(reverse d) ,@l))
scheme-syntax-table)
(loop (cdr l)
(cons `(,(definition-lhs exp)
,(make-preprocessed (definition-rhs exp)))
d))))))))
; Fin
∂29-Mar-87 1558 @MC.LCS.MIT.EDU:GJS%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU meeting
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 29 Mar 87 15:58:51 PST
Received: from OZ.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 29 MAR 87 19:04:10 EST
Date: Sun 29 Mar 87 18:57:57-EST
From: "Gerald Jay Sussman" <GJS%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU>
Subject: meeting
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <12290358923.7.GJS@OZ.AI.MIT.EDU>
I agree with Will. I think we should meet and get things under control.
-------
∂30-Mar-87 0917 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU [ALAN: multiple return values]
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 30 Mar 87 09:17:50 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 30 Mar 87 12:23:13 EST
Date: Mon, 30 Mar 87 12:20:13 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: [ALAN: multiple return values]
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <175971.870330.JAR@AI.AI.MIT.EDU>
Date: Sun, 29 Mar 87 02:29:12 EST
From: Alan Bawden <ALAN at AI.AI.MIT.EDU>
To: JAR at AI.AI.MIT.EDU
Re: multiple return values
I will confine myself to reminding you of what I said the last time this
subject was raised: Any implementation of multiple-values that doesn't
have the property that ordinary continuations (for example the continuation
passed to F in (+ (F) 3)) will accept and ignore extra values has missed
the point of multiple values.
Let me try putting it another way: If you decide on a semantics for
multiple values that has the property that a correct implementation can be
written in straight R↑3RS Scheme, then what have you accomplished? You
haven't given the users anything they couldn't have written for themselves.
(Yes, perhaps you can arrange to implement it more efficiently, but since
when has that been the the spirit of the language?)
∂30-Mar-87 1023 @MC.LCS.MIT.EDU:jinx@GENEVA.AI.MIT.EDU [ALAN: multiple return values]
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 30 Mar 87 10:23:15 PST
Received: from geneva (TCP 2206400372) by MC.LCS.MIT.EDU 30 Mar 87 13:08:03 EST
Received: by GENEVA.AI.MIT.EDU; Mon, 30 Mar 87 13:04:33 est
Date: Mon, 30 Mar 87 13:04:33 est
From: jinx@GENEVA.AI.MIT.EDU (Guillermo J. Rozas)
Message-Id: <8703301804.AA09557@geneva>
To: JAR@AI.AI.MIT.EDU
Cc: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: Jonathan A Rees's message of Mon, 30 Mar 87 12:20:13 EST <175971.870330.JAR@AI.AI.MIT.EDU>
Subject: [ALAN: multiple return values]
I agree with ALAN here. I used to prefer the stricter semantics, but
after some thought I've arrived at the conclusion that it is silly.
It adds no new functionality and is hardly more convenient than
passing an explicit continuation (syntax for which can be provided).
The case I like to consider is the case of QUOTIENT (there are many
others like it). It is often very cheap (or even necessary) to
produce the remainder of an integer division when computing the
quotient. Thus it would be natural for QUOTIENT to return the
remainder as a second value. The strict semantics would force anyone
using quotient to use RECEIVE-VALUES, although a very common use, in
fact, is to ignore the remainder. In the absence of "loose" multiple
values, there are two possibilities, both distasteful:
- Provide another procedure which returns both (as in the case of MIT
Scheme's INTEGER-DIVIDE), but this tends to increase the number of
procedures that users have to know about to an unreasonable extent.
- Force users to use both QUOTIENT and REMAINDER when both results are
desired. The only way to get efficiency out of this one is to fall
into the "mighty compiler" assumption.
I think, therefore, that it would not be a good idea to agree on a
standard that allows the strict semantics (and I would vote against
it). If some people have serious objections to the "loose" semantics,
then we may be better off not standardizing at all.
∂30-Mar-87 1136 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU almost scheme in common lisp
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 30 Mar 87 11:36:14 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 30 Mar 87 14:05:11 EST
Date: Mon, 30 Mar 87 14:01:36 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: almost scheme in common lisp
To: common-lisp@SAIL.STANFORD.EDU, scheme@MC.LCS.MIT.EDU
Message-ID: <176048.870330.JAR@AI.AI.MIT.EDU>
I have written a macro package which implements Scheme, less general
tail-recursion and first-class continuations, in Common Lisp. It
appears to be effective at transforming any Common Lisp implementation
into an acceptable development environment for Scheme programs.
Loops written using LETREC, internal DEFINE, or "named LET" are
macroexpanded into an appropriate TAGBODY construct, but other than
that, tail recursion is only done at the whim of your particular CL
implementation.
Being a macro package and not a compiler or interpreter, continuations
also clearly can't work in general (unless, again, your CL just happens
to support them). Other incompatibilities with the "Revised↑3" Scheme
report are minor.
It's called "Pseudoscheme" and resides in
MC.LCS.MIT.EDU: "JAR;PSEUDO >"
The documentation is in
MC.LCS.MIT.EDU: "JAR;PSEUDO DOC"
I'll send it by electronic mail to those unable to FTP it. Please
send mail to INFO-CLSCHEME-REQUEST@MC.LCS.MIT.EDU if you start using it,
so you can stay up to date on improvements.
Feel free to redistribute it, but try to let me know if you do so.
The documentation file describes its peculiarities in somewhat more detail.
- Jonathan Rees
∂30-Mar-87 1455 @MC.LCS.MIT.EDU:willc%tekchips.tek.com@RELAY.CS.NET Re: multiple return values
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 30 Mar 87 14:54:44 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 30 Mar 87 17:33:22 EST
Received: from relay2.cs.net by RELAY.CS.NET id ac22144; 30 Mar 87 15:43 EST
Received: from tektronix.tek.com by RELAY.CS.NET id af28003; 30 Mar 87 15:39 EST
Received: by tektronix.TEK.COM (5.51/6.20)
id AA03473; Mon, 30 Mar 87 09:24:47 PST
Received: by tekchips.TEK.COM (5.31/6.19)
id AA02271; Mon, 30 Mar 87 09:23:19 PST
Message-Id: <8703301723.AA02271@tekchips.TEK.COM>
To: JAR@MC.LCS.MIT.EDU
Cc: rrrs-authors@MC.LCS.MIT.EDU
Subject: Re: multiple return values
In-Reply-To: Your message of Sat, 28 Mar 87 00:03:12 EST.
<174983.870328.JAR@AI.AI.MIT.EDU>
Date: 30 Mar 87 09:23:17 PST (Mon)
From: willc%tekchips.tek.com@RELAY.CS.NET
Will:
I see no way to implement the proposed procedures in R3RS Scheme, but
most implementations should find it easy to add them.
Jonathan:
If "wrong" doesn't imply "signals an error" then the following is a
correct implementation of alternative 1. This is pretty much how the
feature was implemented in T2....
Unfortunately, Jonathan's simple implementation of receive-values and
return-values doesn't quite work: (list 1 (return-values 2) 3) is
supposed to evaluate to (1 2 3) but with Jonathan's implementation it
evaluates to (1 (values-marker 2) 3). The problem is that RETURN-VALUES
doesn't know whether it is returning to a continuation created by
RECEIVE-VALUES or to an "ordinary" continuation. The simplest correct
implementations I've been able to imagine require that one machine
instruction be added to the standard continuation invocation sequence
(i.e. returns from closed-coded non-tail-recursive calls).
Peace, Will
∂30-Mar-87 1509 @MC.LCS.MIT.EDU:willc%tekchips.tek.com@RELAY.CS.NET Re: Let's get together again
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 30 Mar 87 15:08:53 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 30 Mar 87 17:38:45 EST
Received: from relay2.cs.net by RELAY.CS.NET id ab22416; 30 Mar 87 15:49 EST
Received: from tektronix.tek.com by RELAY.CS.NET id aj28003; 30 Mar 87 15:41 EST
Received: by tektronix.TEK.COM (5.51/6.20)
id AA07158; Mon, 30 Mar 87 10:54:59 PST
Received: by tekchips.TEK.COM (5.31/6.19)
id AA03755; Mon, 30 Mar 87 10:53:26 PST
Message-Id: <8703301853.AA03755@tekchips.TEK.COM>
To: RRRS-Authors@MC.LCS.MIT.EDU, willc%tekchips.tek.com@RELAY.CS.NET
Cc: KMP@SCRC-STONY-BROOK.ARPA, jinx%geneva.ai.mit.edu@RELAY.CS.NET
Subject: Re: Let's get together again
In-Reply-To: Your message of Sat, 28 Mar 87 16:11:21 est.
<8703282111.AA05557@geneva>
Date: 30 Mar 87 10:53:22 PST (Mon)
From: willc%tekchips.tek.com@RELAY.CS.NET
27-28 June (Saturday and Sunday) is fine with me. The person in charge
of local arrangements probably ought to be the one to decide the dates
as well. Any volunteers?
Norman Adams pointed out to me that Jonathan's implementation of
multiple return values (as in equation 1 for "single") can be patched
quite easily---he'll be posting the patch. The ease of implementing
equation 1 in existing implementations must then make it my favorite
too.
Peace, Will
∂30-Mar-87 1858 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Let's get together again
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 30 Mar 87 18:58:08 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 30 Mar 87 21:58:15 EST
Date: Mon, 30 Mar 87 21:39:51 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Let's get together again
To: willc%tekchips.tek.com@RELAY.CS.NET
cc: RRRS-Authors@MC.LCS.MIT.EDU
In-reply-to: Msg of 30 Mar 87 10:53:22 PST (Mon) from willc%tekchips.tek.com at RELAY.CS.NET
Message-ID: <176355.870330.JAR@AI.AI.MIT.EDU>
I think it's a great idea.
If no one else from MIT wants to do local arrangements I'd be happy to.
∂30-Mar-87 2026 @MC.LCS.MIT.EDU:adams%tekchips.tek.com@RELAY.CS.NET Re: multiple return values
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 30 Mar 87 20:25:52 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 30 Mar 87 23:31:07 EST
Received: from relay2.cs.net by RELAY.CS.NET id ae29609; 30 Mar 87 22:44 EST
Received: from tektronix.tek.com by RELAY.CS.NET id ac00188; 30 Mar 87 22:40 EST
Received: by tektronix.TEK.COM (5.51/6.20)
id AA10175; Mon, 30 Mar 87 13:58:25 PST
Received: by tekchips.TEK.COM (5.31/6.19)
id AA06188; Mon, 30 Mar 87 13:56:53 PST
Date: Mon, 30 Mar 87 13:56:53 PST
From: Norman Adams <adams%tekchips.tek.com@RELAY.CS.NET>
Message-Id: <8703302156.AA06188@tekchips.TEK.COM>
Subject: Re: multiple return values
To: Jonathan A Rees <JAR@MC.LCS.MIT.EDU>
Cc: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: Jonathan A Rees <JAR@mc.lcs.mit.edu>, Sat, 28 Mar 87 00:03:12 EST
If "wrong" doesn't imply "signals an error" then the following is a
correct implementation of alternative 1. This is pretty much how the
feature was implemented in T2.
(define values-marker (list 'values-marker))
(define receive-values
(lambda (thunk proc)
(let ((vals (thunk)))
(if (and (pair? vals) (eq? (car vals) values-marker))
(apply proc (cdr vals))
(proc vals)))))
(define return-values
(lambda vals
(cons values-marker vals)))
Not quite a correct implementation, I think. RETURN-VALUES should
canonicalize single return values:
(define return-values
(lambda vals
(if (and (pair? vals) (null? (cdr vals)))
(car vals)
(cons values-marker vals))))
-Norman
-------
∂30-Mar-87 2112 @MC.LCS.MIT.EDU:RPG@SAIL.STANFORD.EDU A Couple of Fun Programs
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 30 Mar 87 21:12:06 PST
Received: from SAIL.STANFORD.EDU (TCP 1200000013) by MC.LCS.MIT.EDU 31 Mar 87 00:04:46 EST
Date: 30 Mar 87 2057 PST
From: Dick Gabriel <RPG@SAIL.STANFORD.EDU>
Subject: A Couple of Fun Programs
To: scheme@MC.LCS.MIT.EDU
Jonathan sent out an interesting program the other day, and I was prompted
to send two more. These are (ugh, bletch) Common Lisp programs, but I
think it's instructive to see that CL programs don't have to look
completely silly (not using DO loops, &-constructs, &tc). It's your job
to figure them out without running them. LABELS is like LETREC, TRUNCATE
rounds towards 0, (VALUES x y z) returns three values, and
(MULTIPLE-VALUE-BIND (X Y Z) (RETURN-THREE-VALUES) . <forms>) binds the
three variables X, Y, and Z appropriately and executes <forms>.
(defun f (n)
(labels ((f (n m)
(if (= n m)
n
(let ((h (truncate (+ m n) 2)))
(* (f n h) (f (+ h 1) m))))))
(f 1 n)))
(defun f (i)
(labels ((g (n n-1 n-2 m m-1 m-2)
(let ((k (* n-1 m-1)))
(values (+ (* n m) k)
(+ (* n m-1) (* n-1 m-2))
(+ k (* n-2 m-2)))))
(h (i)
(cond ((zerop i) (values 1 0 0))
((= i 1) (values 1 1 0))
((evenp i)
(multiple-value-bind (n n-1 n-2)
(h (truncate i 2))
(g n n-1 n-2 n n-1 n-2)))
(t
(multiple-value-bind (n n-1 n-2)
(h (1- i))
(g 1 1 0 n n-1 n-2))))))
(prog1 (h i))))
They are written using non-instructive variable names.
-rpg-
∂31-Mar-87 1146 @MC.LCS.MIT.EDU:gls@Think.COM A Couple of Fun Programs
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 31 Mar 87 11:32:07 PST
Received: from Think.COM (TCP 1201000006) by MC.LCS.MIT.EDU 31 Mar 87 12:56:36 EST
Received: from feuerbach by Think.COM via CHAOS; Tue, 31 Mar 87 12:06:05 EST
Date: Tue, 31 Mar 87 12:06 EST
From: Guy Steele <gls@Think.COM>
Subject: A Couple of Fun Programs
To: scheme@mc.lcs.mit.edu
Cc: RPG@sail.stanford.edu, gls@think.com
In-Reply-To: <8703310526.AA01555@Think.COM>
Message-Id: <870331120636.7.GLS@FEUERBACH.THINK.COM>
Those who found RPG's sample programs difficult to read because
of the "non-instructive variable names" may find the following
versions (completely equivalent, valid Common Lisp, and tested)
a bit more perspicuous:
(defun f (if)
(labels ((packagep (if cons)
(if (= if cons)
if
(let ((with-open-file (truncate (+ cons if) 2)))
(* (packagep if with-open-file) (packagep (+ with-open-file 1) cons))))))
(packagep 1 if)))
(defun f (if)
(labels ((atanh (go cond labels do* proclaim set-macro-character)
(let ((setf (* cond proclaim)))
(values (+ (* go do*) setf)
(+ (* go proclaim) (* cond set-macro-character))
(+ setf (* labels set-macro-character)))))
(read-preserving-whitespace (if)
(cond ((zerop if) (values 1 0 0))
((= if 1) (values 1 1 0))
((evenp if)
(multiple-value-bind (go cond labels)
(read-preserving-whitespace (truncate if 2))
(atanh go cond labels go cond labels)))
(t
(multiple-value-bind (go cond labels)
(read-preserving-whitespace (1- if))
(atanh 1 1 0 go cond labels))))))
(prog1 (read-preserving-whitespace if))))
--Quux
∂31-Mar-87 1703 @MC.LCS.MIT.EDU:allen@bfly-vax.bbn.com Re: A Couple of Fun Programs
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 31 Mar 87 17:03:33 PST
Received: from BFLY-VAX.BBN.COM (TCP 20026200235) by MC.LCS.MIT.EDU 31 Mar 87 19:01:10 EST
To: Guy Steele <gls@think.com>
cc: scheme@mc.lcs.mit.edu, RPG@sail.stanford.edu, allen@bfly-vax.bbn.com
Subject: Re: A Couple of Fun Programs
In-reply-to: Your message of Tue, 31 Mar 87 12:06 EST.
<870331120636.7.GLS@FEUERBACH.THINK.COM>
Date: 31 Mar 87 18:04:57 EST (Tue)
From: allen@bfly-vax.bbn.com
Ever thought about doing some user-interface work for Unix? It's clear that
you have the talent.
/Don
∂31-Mar-87 1743 @MC.LCS.MIT.EDU:ramsdell%faron@mitre-bedford.ARPA Scheme Numbers
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 31 Mar 87 17:43:04 PST
Received: from mitre-bedford.ARPA (TCP 3200600102) by MC.LCS.MIT.EDU 31 Mar 87 19:03:33 EST
Posted-From: The MITRE Corp., Bedford, MA
Received: by faron.MENET (4.12/4.7)
id AA11841; Tue, 31 Mar 87 15:36:20 est
Date: Tue, 31 Mar 87 15:36:20 est
From: John D. Ramsdell <ramsdell%faron@mitre-bedford.ARPA>
Posted-Date: Tue, 31 Mar 87 15:36:20 est
Message-Id: <8703312036.AA11841@faron.MENET>
To: rrrs-authors%mc.lcs.mit.edu@mitre-bedford.ARPA
Subject: Scheme Numbers
Last night I tried to find out where the R↑3RS disallows
the reordering of computation involving inexact numbers.
Numerical analysts know that floating point addition and
multiplication are not commutative, and write code that
depends on the fact that these operation are to be preformed
in the precise order given. One of the things FORTRAN does
correctly is promise not to reorder computations involving
inexact numbers. I never found that promise last night.
Let's make that promise to Scheme users in R↑4RS.
John
∂31-Mar-87 1829 @MC.LCS.MIT.EDU:bartley%home%ti-csl.csnet@RELAY.CS.NET multiple return values
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 31 Mar 87 18:29:12 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 31 Mar 87 21:14:11 EST
Received: from relay2.cs.net by RELAY.CS.NET id ag22435; 31 Mar 87 20:42 EST
Received: from ti-csl by RELAY.CS.NET id ar06470; 31 Mar 87 20:35 EST
Received: from home (home.ARPA) by tilde id AA22798; Tue, 31 Mar 87 18:25:08 cst
Received: by home id AA08042; Tue, 31 Mar 87 18:25:03 cst
Date: Tue, 31 Mar 87 18:25:03 cst
From: David Bartley <bartley%home%ti-csl.csnet@RELAY.CS.NET>
Message-Id: <8704010025.AA08042@home>
To: rrrs-authors@MC.LCS.MIT.EDU
Cc: Bartley%home%ti-csl.csnet@RELAY.CS.NET
Subject: multiple return values
(1) I agree with ALAN and Jinx that it seems pretty useless to specify
a multiple value capability and not go beyond Will's alternative #1.
Since I intend to implement Common Lisp on top of Scheme, I will want
to extend the essential capability anyway. (Are ALAN and Jinx arguing
for #2 or #3?)
(2) In his rationale, Will said "The Common Lisp position would say
that when zero values are returned to a continuation that is expecting
one value, then the symbol NIL is passed to the continuation." I
think we could specify this to be "the false value" or "the empty
list" and remain compatible with Common Lisp without having to make
the symbol NIL noteworthy in Scheme.
(3) Will's proposal does not mention CALL-WITH-CURRENT-CONTINUATION.
It seems that a continuation object should accept an arbitrary number
of arguments if we take alternative #2 or #3. If so, we could define
(RETURN-VALUES A B) to be the same as (CALL/CC (LAMBDA (K) (K A B))).
(4) It seems to me that the hairiest part of the multiple value
"feature" in Common Lisp is MULTIPLE-VALUE-PROG1. Something like this
is needed, at least "behind the scenes", if we expect DYNAMIC-WIND
(etc.) to pass through multiple values. We could express
(MULTIPLE-VALUE-PROG1 A B ...) as
(receive-values A (lambda L B ... (apply return-values L))) ,
but that is pretty expensive. Is this common enough to require
standardization so implementors could work on more efficient
mechanisms?
(5) JAR finds the proposed feature "to be pretty unuseable unless
there is some syntactically sugared way to use RECEIVE-VALUES." If
this is true, I think we must agree on what sugar to add. What's the
point of standardizing on something that is too cryptic to be used by
anyone?
I like T's RECEIVE, which I understand to be defined as
(receive <formals> <m-v-expression> . <body>)
==> (receive-values (lambda () <m-v-expression>)
(lambda <formals> . body>))
The key for me is that <formals> is a complete lambda list, possibly
containing "optional" and "rest" arguments, and is not just a list of
"required" identifiers. This seems more flexible than Common Lisp's
MULTIPLE-VALUE-BIND.
If we keep the name RECEIVE-VALUES, then the name RECEIVE is ok here,
but I would prefer something like MULTIPLE-VALUE-LET.
(6) Let's get down to brass tacks and argue about names! I'm bothered
by the "return" in RETURN-VALUES. As Will pointed out, the name
RETURN would be confusing to refugees from other Lisps. However,
RETURN-VALUES still seems to imply an exit from the calling procedure.
A user might ask whether the procedure
(LAMBDA (A B C) (+ A (RETURN-VALUES B) C))
returns the sum of A, B, and C or just B? I think we all intend for
RETURN-VALUES to "return" to its caller (the middle of the body), not
to that procedure's caller. I suggest renaming RETURN-VALUES to be
MULTIPLE-VALUES.
Likewise, the "receive" in RECEIVE-VALUES seems strange; I would
expect the complementary routine to be SEND-VALUES. How about
CALL-WITH-MULTIPLE-VALUES (call/mv?) by analogy with CALL-WITH-
CURRENT-CONTINUATION (call/cc)? (I'm not sure if I'm joking!)
Regards,
David Bartley
∂31-Mar-87 2009 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU multiple return values
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 31 Mar 87 20:08:55 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 31 Mar 87 23:02:38 EST
Date: Tue, 31 Mar 87 22:13:26 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: multiple return values
To: bartley%home%ti-csl.csnet@RELAY.CS.NET
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Tue 31 Mar 87 18:25:03 cst from David Bartley <bartley%home%ti-csl.csnet at RELAY.CS.NET>
Message-ID: <177055.870331.JAR@AI.AI.MIT.EDU>
I would strongly oppose the Common Lisp multiple value semantics. I
find it to be very distasteful. If this means that the language has no
multiple values primitively, and I have to implement semantics #1 myself
using lists or closures or whatever, that's fine with me.
If I have many sympathizers then I'd say it appears that we're
as deadlocked as we were last time this came up...
There's a deeper issue here: I have found that I use a number of
features which can be implemented easily enough in Scheme, but for which
particular scheme implementations have efficient, low-level, nonstandard
support. For example: multiple values, fixnum arithmetic, byte vectors,
certain string operations (like what was in the R↑2 report), hash
tables, PEEK-CHAR, and bitwise logical opertions. What I do is I have
one particular file which implements all these features portably. I can
then replace this file for particular implementations to get better
performance. In general I'll have N+1 versions of this file, one
portable version plus one version for each implementation for which it's
been tuned.
Does anyone else do things like this? Or am I the only person who really
tries to write nontrivial programs that are both portable and fast?
The fact that my programs are portable, and that this "tuning file" is
small in size, is of course due to our standardization effort. It's not
clear that implementation-dependent tuning can go away completely, but
the smaller that file is, the happier I'll be. This is the main
argument I see for adding logically redundant features (like multiple
values #1) to the standard; I assume that's why LENGTH and MEMQ are
in the report. Maybe we need a better way to organize these redundant
features; they don't really belong in the main part of the report.
Jonathan
∂31-Mar-87 2025 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU multiple return values
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 31 Mar 87 20:25:24 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 31 Mar 87 23:23:05 EST
Date: Tue, 31 Mar 87 22:17:54 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: multiple return values
To: bartley%home%ti-csl.csnet@RELAY.CS.NET
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Tue 31 Mar 87 18:25:03 cst from David Bartley <bartley%home%ti-csl.csnet at RELAY.CS.NET>
Message-ID: <177057.870331.JAR@AI.AI.MIT.EDU>
Date: Tue, 31 Mar 87 18:25:03 cst
From: David Bartley <bartley%home%ti-csl.csnet at RELAY.CS.NET>
Likewise, the "receive" in RECEIVE-VALUES seems strange; I would
expect the complementary routine to be SEND-VALUES. How about
CALL-WITH-MULTIPLE-VALUES (call/mv?) by analogy with CALL-WITH-
CURRENT-CONTINUATION (call/cc)? (I'm not sure if I'm joking!)
How about CALL-CURRENT-CONTINUATION ? A little long I guess... I don't
much like the Unix command names (mv, cc)...
SEND-VALUES isn't so bad.
PROVIDE-VALUES, GIVE-VALUES
ACCEPT-VALUES, USE-VALUES, TAKE-VALUES, GET-VALUES
∂31-Mar-87 2037 @MC.LCS.MIT.EDU:RPG@SAIL.STANFORD.EDU More on Fun Programs
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 31 Mar 87 20:37:27 PST
Received: from SAIL.STANFORD.EDU (TCP 1200000013) by MC.LCS.MIT.EDU 31 Mar 87 23:24:14 EST
Date: 31 Mar 87 1531 PST
From: Dick Gabriel <RPG@SAIL.STANFORD.EDU>
Subject: More on Fun Programs
To: scheme@MC.LCS.MIT.EDU
Now that you've seen the instructional version of the second puzzle
function, here's the slightly bummed (15% faster) version:
(defun f (i)
(labels ((g (i)
(cond ((zerop i) (values 1 0))
((= i 1) (values 1 1))
((evenp i)
(multiple-value-bind (n n-1)
(g (/ i 2))
(values (+ (* n n) (* n-1 n-1))
(+ (* n n-1) (* n-1 (- n n-1))))))
(t
(multiple-value-bind (n n-1)
(g (- i 1))
(values (+ n n-1) n))))))
(values (g i))))
-rpg-
∂01-Apr-87 0215 @MC.LCS.MIT.EDU,@MIT-MULTICS.ARPA:ETSTMOL@HDETUD1.BITNET NOTE from ETSTMOL
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 1 Apr 87 02:15:45 PST
Received: from MIT-MULTICS.ARPA (TCP 1200000006) by MC.LCS.MIT.EDU 1 Apr 87 05:01:23 EST
Received: from HDETUD1(ETSTMOL) by MITVMA (Mailer X1.23) id 8125;
Wed, 01 Apr 87 04:47:17 EST
Date: Wed, 01 Apr 87 11:42:45 MET
To: SCHEME@MC.LCS.MIT.EDU
From: ETSTMOL@HDETUD1.BITNET
Subject: NOTE from ETSTMOL
Date: 1 April 1987, 11:41:06 MET
From: Marcel Mol ETSTMOL at HDETUD1
Delft University of Technology
Faculty of Electrical engineering
To: SCHEME at MC.LCS
At the Delft University in the Netherlands we started a Lisp
project. At this moment we want to build a package onto scheme
that implements Common Lisp. Has someone done this before, or
thought about it before? We appreciate any help.
Thanks
Marcel Mol, Frank ten Wolde
Anton Klaasen, Arno Wezenbeek
∂01-Apr-87 0546 @MC.LCS.MIT.EDU:kwh@ multiple return values
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 1 Apr 87 05:46:07 PST
Received: from geneva (TCP 20015013114) by MC.LCS.MIT.EDU 1 Apr 87 08:49:46 EST
Received: by ; Wed, 1 Apr 87 08:48:04 est
Date: Wed, 1 Apr 87 08:48:04 est
From: kwh@@ (Ken Haase)
Message-Id: <8704011348.AA08026@geneva>
To: JAR@AI.AI.MIT.EDU
Cc: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: Jonathan A Rees's message of Tue, 31 Mar 87 22:13:26 EST <177055.870331.JAR@AI.AI.MIT.EDU>
Subject: multiple return values
I do the same thing, having a set of `PLUS' files which extend R↑*S in
implementation dependent ways to provide features I want to use. One
thing that I've found useful in transporting code between Common LISP
implementations (or Symbolics LISP releases!) has been a standard way
(the STATUS form) for determining what system or release I'm in.
Beyond this, though I find it somewhat distasteful, the presence of
the `#+' character macro for read-time conditionalizing code makes
writing transportable code a good deal easier.
Ken
∂01-Apr-87 1030 @MC.LCS.MIT.EDU:gls@Think.COM A Couple of Fun Programs
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 1 Apr 87 10:29:49 PST
Received: from Think.COM (TCP 1201000006) by MC.LCS.MIT.EDU 1 Apr 87 12:58:45 EST
Received: from feuerbach by Think.COM via CHAOS; Wed, 1 Apr 87 12:51:57 EST
Date: Wed, 1 Apr 87 12:52 EST
From: Guy Steele <gls@Think.COM>
Subject: A Couple of Fun Programs
To: scheme@mc.lcs.mit.edu
Cc: RPG@sail.stanford.edu, gls@think.com
In-Reply-To: <870331120636.7.GLS@FEUERBACH.THINK.COM>
Message-Id: <870401125208.6.GLS@FEUERBACH.THINK.COM>
Date: 31 Mar 87 1531 PST
From: Dick Gabriel <RPG@sail.stanford.edu>
Now that you've seen the instructional version of the second
puzzle function, here's the slightly bummed (15% faster) version:
...
And, as a further public service, here is a translation:
(defun f (*)
(labels ((> (*)
(cond ((zerop *) (values 1 0))
((= * 1) (values 1 1))
((evenp *)
(multiple-value-bind (+ /)
(> (/ * 2))
(values (+ (* + +) (* / /))
(+ (* + /) (* / (- + /))))))
(t
(multiple-value-bind (+ /)
(> (- * 1))
(values (+ + /) +))))))
(values (> *))))
--Quux
∂01-Apr-87 1142 @MC.LCS.MIT.EDU:gls@Think.COM multiple return values
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 1 Apr 87 11:41:47 PST
Received: from Think.COM (TCP 1201000006) by MC.LCS.MIT.EDU 1 Apr 87 13:03:52 EST
Received: from feuerbach by Think.COM via CHAOS; Wed, 1 Apr 87 12:34:23 EST
Date: Wed, 1 Apr 87 12:34 EST
From: Guy Steele <gls@Think.COM>
Subject: multiple return values
To: bartley%home%ti-csl.csnet@relay.cs.net, rrrs-authors@mc.lcs.mit.edu
Cc: gls@think.com
In-Reply-To: <8704010025.AA08042@home>
Message-Id: <870401123434.4.GLS@FEUERBACH.THINK.COM>
Date: Tue, 31 Mar 87 18:25:03 cst
From: David Bartley <bartley%home%ti-csl.csnet@relay.cs.net>
...
(6) Let's get down to brass tacks and argue about names! I'm bothered
by the "return" in RETURN-VALUES. As Will pointed out, the name
RETURN would be confusing to refugees from other Lisps. However,
RETURN-VALUES still seems to imply an exit from the calling procedure.
A user might ask whether the procedure
(LAMBDA (A B C) (+ A (RETURN-VALUES B) C))
returns the sum of A, B, and C or just B? I think we all intend for
RETURN-VALUES to "return" to its caller (the middle of the body), not
to that procedure's caller. I suggest renaming RETURN-VALUES to be
MULTIPLE-VALUES. ...
Actually, I think this is one of the few names that Common Lisp
really got right. What's wrong with VALUES? Note that it is likely
to be used much more frequently than the matching receiving form.
--Guy
∂01-Apr-87 1158 @MC.LCS.MIT.EDU:gls@Think.COM Apologies
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 1 Apr 87 11:58:19 PST
Received: from Think.COM (TCP 1201000006) by MC.LCS.MIT.EDU 1 Apr 87 14:47:08 EST
Received: from feuerbach by Think.COM via CHAOS; Wed, 1 Apr 87 14:40:24 EST
Date: Wed, 1 Apr 87 14:40 EST
From: Guy Steele <gls@Think.COM>
Subject: Apologies
To: scheme@mc.lcs.mit.edu
In-Reply-To: <870401125208.6.GLS@FEUERBACH.THINK.COM>
Message-Id: <870401144024.7.GLS@FEUERBACH.THINK.COM>
It has been pointed out to me that me translation of
RPG's latest program does not preserve its semantics
quite properly because "+" and "*" are typically proclaimed
SPECIAL in Common Lisp implementations and therefore are
dynamically bound whether you like it or not. Here is
a correct translation that avoids this problem, and I'll not
trouble you any further.
--Quux
(defun f (])
(labels (([ (])
(cond ((zerop ]) (values 1 0))
((= ] 1) (values 1 1))
((evenp ])
(multiple-value-bind ({ })
([ (/ ] 2))
(values (+ (* { {) (* } }))
(+ (* { }) (* } (- { }))))))
(t
(multiple-value-bind (+ })
([ (- ] 1))
(values (+ { }) {))))))
(values ([ ]))))
∂01-Apr-87 1907 @MC.LCS.MIT.EDU:allen@bfly-vax.bbn.com Re: A Couple of Fun Programs
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 1 Apr 87 19:07:12 PST
Received: from BFLY-VAX.BBN.COM (TCP 20026200235) by MC.LCS.MIT.EDU 1 Apr 87 19:50:49 EST
To: Guy Steele <gls@think.com>
cc: scheme@mc.lcs.mit.edu, RPG@sail.stanford.edu, allen@bfly-vax.bbn.com
Subject: Re: A Couple of Fun Programs
In-reply-to: Your message of Tue, 31 Mar 87 12:06 EST.
<870331120636.7.GLS@FEUERBACH.THINK.COM>
Date: 01 Apr 87 17:54:35 EST (Wed)
From: allen@bfly-vax.bbn.com
To help you get a start in your gnu career as a Unix hacker, here's my
conjecture as to how you might have written the second function had
you worked at Bell Labs or Berkeley:
(defun yucc (++)
(labels (($1 (grep ↑[↑:]*:: /usr/etc/passwd kill %1 a.out)
(let ((*p++ (* ↑[↑:]*:: %1)))
(values (+ (* grep kill) *p++)
(+ (* grep %1) (* ↑[↑:]*:: a.out))
(+ *p++ (* /usr/etc/passwd a.out)))))
(*argv[] (++)
(cond ((zerop ++) (values 1 0 0))
((= ++ 1) (values 1 1 0))
((evenp ++)
(multiple-value-bind (grep ↑[↑:]*:: /usr/etc/passwd)
(*argv[] (truncate ++ 2))
($1 grep ↑[↑:]*:: /usr/etc/passwd grep ↑[↑:]*::
/usr/etc/passwd)))
(t
(multiple-value-bind (grep ↑[↑:]*:: /usr/etc/passwd)
(*argv[] (1- ++))
($1 1 1 0 grep ↑[↑:]*:: /usr/etc/passwd))))))
(prog1 (*argv[] ++))))
%!$don
∂01-Apr-87 1953 @MC.LCS.MIT.EDU:allen@bfly-vax.bbn.com Re: A Couple of Fun Programs
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 1 Apr 87 19:53:18 PST
Received: from BFLY-VAX.BBN.COM (TCP 20026200235) by MC.LCS.MIT.EDU 1 Apr 87 19:50:49 EST
To: Guy Steele <gls@think.com>
cc: scheme@mc.lcs.mit.edu, RPG@sail.stanford.edu, allen@bfly-vax.bbn.com
Subject: Re: A Couple of Fun Programs
In-reply-to: Your message of Tue, 31 Mar 87 12:06 EST.
<870331120636.7.GLS@FEUERBACH.THINK.COM>
Date: 01 Apr 87 17:54:35 EST (Wed)
From: allen@bfly-vax.bbn.com
To help you get a start in your gnu career as a Unix hacker, here's my
conjecture as to how you might have written the second function had
you worked at Bell Labs or Berkeley:
(defun yucc (++)
(labels (($1 (grep ↑[↑:]*:: /usr/etc/passwd kill %1 a.out)
(let ((*p++ (* ↑[↑:]*:: %1)))
(values (+ (* grep kill) *p++)
(+ (* grep %1) (* ↑[↑:]*:: a.out))
(+ *p++ (* /usr/etc/passwd a.out)))))
(*argv[] (++)
(cond ((zerop ++) (values 1 0 0))
((= ++ 1) (values 1 1 0))
((evenp ++)
(multiple-value-bind (grep ↑[↑:]*:: /usr/etc/passwd)
(*argv[] (truncate ++ 2))
($1 grep ↑[↑:]*:: /usr/etc/passwd grep ↑[↑:]*::
/usr/etc/passwd)))
(t
(multiple-value-bind (grep ↑[↑:]*:: /usr/etc/passwd)
(*argv[] (1- ++))
($1 1 1 0 grep ↑[↑:]*:: /usr/etc/passwd))))))
(prog1 (*argv[] ++))))
%!$don
∂01-Apr-87 2232 @MC.LCS.MIT.EDU:CPH@AI.AI.MIT.EDU multiple return values
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 1 Apr 87 22:32:28 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 2 Apr 87 00:20:13 EST
Date: Wed, 1 Apr 87 21:51:51 EST
From: Chris Hanson <CPH@AI.AI.MIT.EDU>
Subject: multiple return values
To: JAR@AI.AI.MIT.EDU
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Tue 31 Mar 87 22:13:26 EST from Jonathan A Rees <JAR at AI.AI.MIT.EDU>
Message-ID: <177708.870401.CPH@AI.AI.MIT.EDU>
Date: Tue, 31 Mar 87 22:13:26 EST
From: Jonathan A Rees <JAR at AI.AI.MIT.EDU>
I would strongly oppose the Common Lisp multiple value semantics. I
find it to be very distasteful. If this means that the language has no
multiple values primitively, and I have to implement semantics #1 myself
using lists or closures or whatever, that's fine with me.
If I have many sympathizers then I'd say it appears that we're
as deadlocked as we were last time this came up...
I think that I agree with JAR... I've just got back from vacation and
have not yet read all the mail on this (at 1200 baud, I'll wait for
work tomorrow!), but I am very disturbed by the direction this is
taking. I don't see a need for a complicated semantics! I'll reply
more fully later when I've had a chance to read all of this.
∂01-Apr-87 2333 @MC.LCS.MIT.EDU:jinx@GENEVA.AI.MIT.EDU multiple return values (LONG)
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 1 Apr 87 23:32:48 PST
Received: from geneva (TCP 2206400372) by MC.LCS.MIT.EDU 2 Apr 87 02:20:53 EST
Received: by GENEVA.AI.MIT.EDU; Wed, 1 Apr 87 22:53:32 est
Date: Wed, 1 Apr 87 22:53:32 est
From: jinx@GENEVA.AI.MIT.EDU (Guillermo J. Rozas)
Message-Id: <8704020353.AA11729@geneva>
To: bartley%home%ti-csl.csnet@RELAY.CS.NET
Cc: rrrs-authors@MC.LCS.MIT.EDU, Bartley%home%ti-csl.csnet@RELAY.CS.NET
In-Reply-To: David Bartley's message of Tue, 31 Mar 87 18:25:03 cst <8704010025.AA08042@home>
Subject: multiple return values (LONG)
*** Note: this is a relatively long message. ***
(1) I agree with ALAN and Jinx that it seems pretty useless to specify
a multiple value capability and not go beyond Will's alternative #1.
Since I intend to implement Common Lisp on top of Scheme, I will want
to extend the essential capability anyway. (Are ALAN and Jinx arguing
for #2 or #3?)
I like #2. More about this below.
(2) In his rationale, Will said "The Common Lisp position would say
that when zero values are returned to a continuation that is expecting
one value, then the symbol NIL is passed to the continuation." I
think we could specify this to be "the false value" or "the empty
list" and remain compatible with Common Lisp without having to make
the symbol NIL noteworthy in Scheme.
I don't like arbitrary values created. Again, more on this below.
(3) Will's proposal does not mention CALL-WITH-CURRENT-CONTINUATION.
It seems that a continuation object should accept an arbitrary number
of arguments if we take alternative #2 or #3. If so, we could define
(RETURN-VALUES A B) to be the same as (CALL/CC (LAMBDA (K) (K A B))).
No and yes, respectively. Again, see below.
(4) It seems to me that the hairiest part of the multiple value
"feature" in Common Lisp is MULTIPLE-VALUE-PROG1. Something like this
is needed, at least "behind the scenes", if we expect DYNAMIC-WIND
(etc.) to pass through multiple values. We could express
(MULTIPLE-VALUE-PROG1 A B ...) as
(receive-values A (lambda L B ... (apply return-values L))) ,
but that is pretty expensive. Is this common enough to require
standardization so implementors could work on more efficient
mechanisms?
I think it is worth thinking about, but given that the above is
sufficient, I don't think there is a need to standardize.
(5) JAR finds the proposed feature "to be pretty unuseable unless
there is some syntactically sugared way to use RECEIVE-VALUES." If
this is true, I think we must agree on what sugar to add. What's the
point of standardizing on something that is too cryptic to be used by
anyone?
I like T's RECEIVE, which I understand to be defined as
(receive <formals> <m-v-expression> . <body>)
==> (receive-values (lambda () <m-v-expression>)
(lambda <formals> . body>))
The key for me is that <formals> is a complete lambda list, possibly
containing "optional" and "rest" arguments, and is not just a list of
"required" identifiers. This seems more flexible than Common Lisp's
MULTIPLE-VALUE-BIND.
If we keep the name RECEIVE-VALUES, then the name RECEIVE is ok here,
but I would prefer something like MULTIPLE-VALUE-LET.
What about MULTIPLE-VALUE-BIND? The syntax is not like LET at all,
and it really is similar to the CL construct.
(6) Let's get down to brass tacks and argue about names! I'm bothered
by the "return" in RETURN-VALUES. As Will pointed out, the name
RETURN would be confusing to refugees from other Lisps. However,
RETURN-VALUES still seems to imply an exit from the calling procedure.
A user might ask whether the procedure
(LAMBDA (A B C) (+ A (RETURN-VALUES B) C))
returns the sum of A, B, and C or just B? I think we all intend for
RETURN-VALUES to "return" to its caller (the middle of the body), not
to that procedure's caller. I suggest renaming RETURN-VALUES to be
MULTIPLE-VALUES.
Likewise, the "receive" in RECEIVE-VALUES seems strange; I would
expect the complementary routine to be SEND-VALUES. How about
CALL-WITH-MULTIPLE-VALUES (call/mv?) by analogy with CALL-WITH-
CURRENT-CONTINUATION (call/cc)? (I'm not sure if I'm joking!)
I don't care much about the names of procedures, but I agree with GLS.
What's wrong with VALUES? Another possibility for RECEIVE-VALUES is
MULTIPLE-VALUE-COMPOSE, or even, CALL-EXPECTING-MULTIPLE-VALUES.
------------------------------------------------------------------------------
Well, here is my argument for proposal #2:
I think that there is a very important symmetry between procedure
invocation and continuation invocation. Indeed, if the code is CPS
converted, they become the same thing.
At apply time there is strict number of arguments checking, although
procedures, through optional or rest arguments, may allow a range of
numbers of arguments. I think it is important to be consistent here
and make continuation invocation be the same. Thus when an explicit
continuation is provided (as in the case of RECEIVE-VALUES), the
number of arguments (values) should be checked just as strictly.
Thus, I think that both
(receive-values (lambda () (values 1 2 3))
(lambda (a b) ...))
(receive-values (lambda () (values 1))
(lambda (a b) ...))
should be in error. The CL semantics can easily be implemented on top
of this by making the actual procedure passed to RECEIVE-VALUES accept
any number of arguments, and then initialize the ones not provided
with #f. Implementations can even be more lax since being in error
does not mean that one is signalled.
Now, wait a minute... This seems like an argument for #1, right?
Well, the difference is that there are (as far as I can tell) no
implicit procedures, but there certainly are implicit continuations,
and the behavior can be different.
The rule is as follows: an implicit continuation may be called with
MORE values than it expects, and these extra values are ignored. Thus
returning zero values to a continuation that expects one should be an
error (as opposed to creating a #f), but returning 2 should be valid.
This makes all the cases that I'm interested in work, yet allows the
error checking when multiple values are explicitely asked for.
Thus, assuming that QUOTIENT returns 2 values,
(let ((x (quotient (fact 100) (expt 2 23))))
...)
should work, but
(receive-values (lambda () (quotient (fact 100) (expt 2 23)))
(lambda (x) ...))
should be in error.
In case you are wondering, the example with the implicit continuation
is equivalent to
(receive-values (lambda () (quotient (fact 100) (expt 2 23)))
(lambda (x . ignore) ...))
As far as continuation objects obtained with CWCC are concerned, they
should accept multiple arguments if the corresponding continuation
accepted multiple values, thus
(receive-values (lambda ()
(cwcc (lambda (here)
(here 2 3))))
(lambda (x y)
(list x y)))
should return (2 3),
(receive-values (lambda ()
(cwcc (lambda (here)
(here 2 3))))
(lambda (x)
x))
should be in error, and
(let ((x (cwcc (lambda (here)
(here 2 3)))))
x)
should return 2.
Thus the number of arguments that continuations expect is not
arbitrary, but it is the case that
(return a b c)
is equivalent to
(cwcc (lambda (k) (k a b c)))
Having said all this, I'll also say that I'm afraid that we will not
be able to standardize. JAR feels relatively strongly about proposal
#1, and I think that other people do also. I feel relatively strongly
agains standardizing on the CL standard, since I don't believe in the
random NILs (or #Fs) being created on demand, so I'm therefore opposed
to #3, and I would not be surprised if other people had their own pet
theories.
∂02-Apr-87 0714 @MC.LCS.MIT.EDU:hoey@nrl-aic.ARPA More bum code
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 2 Apr 87 07:14:04 PST
Received: from nrl-aic.ARPA (TCP 3200200010) by MC.LCS.MIT.EDU 2 Apr 87 10:10:40 EST
Return-Path: <hoey@nrl-aic.ARPA>
Received: Thu, 2 Apr 87 10:09:10 est by nrl-aic.ARPA id AA10377
Date: 2 Apr 1987 09:53:40 EST (Thu)
From: Dan Hoey <hoey@nrl-aic.ARPA>
Subject: More bum code
To: scheme@mc.lcs.mit.edu
Message-Id: <544373621/hoey@nrl-aic>
It seems a shame to change the names in the code without improving the
algorithm. So I bummed out a quarter of the multiplications and a
seventh of the additions, and dyked out the useless clause. Sorry it's
so late....
(defun f(| |)
(labels ((|| (| |)
(cond ((zerop | |) (values 1 0))
((evenp | |)
(multiple-value-bind (|(| |)|) (|| (/ | | 2))
(values (+ (* |(| |(|) (* |)| |)|))
(* (+ |(| (- |(| |)|)) |)|))))
(t
(multiple-value-bind (|(| |)|) (|| (/ (1- | |) 2))
(values (* |(| (+ |(| |)| |)|))
(+ (* |(| |(|) (* |)| |)|))))))))
(values (|| | |))))
Dan
∂02-Apr-87 1129 @MC.LCS.MIT.EDU:bartley%home%ti-csl.csnet@RELAY.CS.NET multiple return values (LONG)
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 2 Apr 87 11:29:19 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 2 Apr 87 13:32:41 EST
Received: from relay2.cs.net by RELAY.CS.NET id ac22936; 2 Apr 87 13:11 EST
Received: from ti-csl by RELAY.CS.NET id ac00800; 2 Apr 87 13:02 EST
Received: from home (home.ARPA) by tilde id AA18402; Thu, 2 Apr 87 10:31:31 cst
Received: by home id AA01664; Thu, 2 Apr 87 10:31:45 cst
Date: Thu, 2 Apr 87 10:31:45 cst
From: David Bartley <bartley%home%ti-csl.csnet@RELAY.CS.NET>
Message-Id: <8704021631.AA01664@home>
To: jinx%geneva.ai.mit.edu@RELAY.CS.NET
Cc: RRRS-Authors@MC.LCS.MIT.EDU, Bartley%home%ti-csl.csnet@RELAY.CS.NET
In-Reply-To: "Guillermo J. Rozas"'s message of Wed, 1 Apr 87 22:53:32 est
Subject: multiple return values (LONG)
> (1) I agree with ALAN and Jinx that it seems pretty useless to specify
> a multiple value capability and not go beyond Will's alternative #1.
> Since I intend to implement Common Lisp on top of Scheme, I will want
> to extend the essential capability anyway. (Are ALAN and Jinx arguing
> for #2 or #3?)
> I like #2. More about this below.
JINX makes a pretty good case for #2 and I'm persuaded. More below.
Scratch the term "useless"---standardizing on #1 at least gives us a
common basis for our various extensions.
> (4) It seems to me that the hairiest part of the multiple value
> "feature" in Common Lisp is MULTIPLE-VALUE-PROG1. Something like this
> [...]
>
> I think it is worth thinking about, but given that the above is
> sufficient, I don't think there is a need to standardize.
OK.
> (5) JAR finds the proposed feature "to be pretty unuseable unless
> there is some syntactically sugared way to use RECEIVE-VALUES." If
> this is true, I think we must agree on what sugar to add. What's the
> point of standardizing on something that is too cryptic to be used by
> anyone?
>
> I like T's RECEIVE [...]
>
> If we keep the name RECEIVE-VALUES, then the name RECEIVE is ok here,
> but I would prefer something like MULTIPLE-VALUE-LET.
>
> What about MULTIPLE-VALUE-BIND? The syntax is not like LET at all,
> and it really is similar to the CL construct.
Upon reflection, I wonder if there really is a problem. Does anyone
else feel that the proposal is "pretty unuseable unless there is some
syntactically sugared way to use RECEIVE-VALUES" or that it is "too
cryptic"? I don't.
> (6) Let's get down to brass tacks and argue about names! [...]
>
> I don't care much about the names of procedures, but I agree with GLS.
> What's wrong with VALUES? Another possibility for RECEIVE-VALUES is
> MULTIPLE-VALUE-COMPOSE, or even, CALL-EXPECTING-MULTIPLE-VALUES.
OK. I like VALUES or MULTIPLE-VALUES instead of RETURN-VALUES; both
avoid the imperative "return" that seems to imply some kind of throw.
I like WITH-VALUES or CALL-WITH-VALUES or CALL-WITH-MULTIPLE-VALUES
instead of RECEIVE-VALUES. The problem with "RECEIVE-" is that ones
first guess at the meaning of (RECEIVE-VALUES ...) might be that it
"receives" multiple values and returns them, rather than disposing of
them by a further call. The problem with "CALL-" is that it isn't
clear which of the two procedure arguments the "call" refers to. The
"CALL-" in CALL-WITH-MULTIPLE-VALUES refers to the second argument.
The "CALL-" in CALL-EXPECTING-MULTIPLE-VALUES refers to the first.
> Well, here is my argument for proposal #2:
>
> I think that there is a very important symmetry between procedure
> invocation and continuation invocation. Indeed, if the code is CPS
> converted, they become the same thing.
This symmetry gives us a rational basis for the whole idea, so I like
the idea of remaining consistent with it.
> [...]
> Now, wait a minute... This seems like an argument for #1, right?
>
> Well, the difference is that there are (as far as I can tell) no
> implicit procedures, but there certainly are implicit continuations,
> and the behavior can be different.
>
> The rule is as follows: an implicit continuation may be called with
> MORE values than it expects, and these extra values are ignored. Thus
> [...]
I like the idea of defining implicit continuations to look like
(LAMBDA (X . IGNORE) ...)).
> As far as continuation objects obtained with CWCC are concerned, they
> should accept multiple arguments if the corresponding continuation
> accepted multiple values, thus [...]
This is what I was trying to accomplish with my proposal. Thanks for
clarifying the issue.
> Having said all this, I'll also say that I'm afraid that we will not
> be able to standardize. JAR feels relatively strongly about proposal
> #1, and I think that other people do also. I feel relatively strongly
> agains standardizing on the CL standard, since I don't believe in the
> random NILs (or #Fs) being created on demand, so I'm therefore opposed
> to #3, and I would not be surprised if other people had their own pet
> theories.
Will's proposal was carefully worded so as to allow us to standardize
in #1, #2, or #3 and still allow those of us who want to to make
extensions compatible with Common Lisp. I think we should make an
effort to agree on names and syntax for multiple values, preferably
using alternative #2 (but I'll accept #1 if necessary), because it at
least gives us a common base for our extensions.
In summary: I like the names VALUES (or MULTIPLE-VALUES) and
WITH-VALUES (or CALL-WITH-VALUES or CALL-WITH-MULTIPLE-VALUES). I
like the syntax proposed by Will. I prefer alternative #2 but will
accept #1 rather than lose the chance to standardize. I see no need
for MULTIPLE-VALUE-PROG1 or syntactic sugar like MULTIPLE-VALUE-BIND.
Regards,
David Bartley
∂02-Apr-87 1138 @MC.LCS.MIT.EDU:bartley%home%ti-csl.csnet@RELAY.CS.NET multiple return values
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 2 Apr 87 11:37:53 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 2 Apr 87 13:33:13 EST
Received: from relay2.cs.net by RELAY.CS.NET id ad22936; 2 Apr 87 13:11 EST
Received: from ti-csl by RELAY.CS.NET id ad00800; 2 Apr 87 13:03 EST
Received: from home (home.ARPA) by tilde id AA18814; Thu, 2 Apr 87 10:49:03 cst
Received: by home id AA02024; Thu, 2 Apr 87 10:49:21 cst
Date: Thu, 2 Apr 87 10:49:21 cst
From: David Bartley <bartley%home%ti-csl.csnet@RELAY.CS.NET>
Message-Id: <8704021649.AA02024@home>
To: CPH@MC.LCS.MIT.EDU
Cc: JAR@MC.LCS.MIT.EDU, rrrs-authors@MC.LCS.MIT.EDU,
Bartley%home%ti-csl.csnet@RELAY.CS.NET
In-Reply-To: Chris Hanson's message of Wed, 1 Apr 87 21:51:51 EST
Subject: multiple return values
> Date: Wed, 1 Apr 87 21:51:51 EST
> From: Chris Hanson <CPH@mc.lcs.mit.edu>
>
> Date: Tue, 31 Mar 87 22:13:26 EST
> From: Jonathan A Rees <JAR at AI.AI.MIT.EDU>
>
> I would strongly oppose the Common Lisp multiple value semantics. I
> find it to be very distasteful. If this means that the language has no
> multiple values primitively, and I have to implement semantics #1 myself
> using lists or closures or whatever, that's fine with me.
>
> If I have many sympathizers then I'd say it appears that we're
> as deadlocked as we were last time this came up...
>
> I think that I agree with JAR... I've just got back from vacation and
> have not yet read all the mail on this (at 1200 baud, I'll wait for
> work tomorrow!), but I am very disturbed by the direction this is
> taking. I don't see a need for a complicated semantics! I'll reply
> more fully later when I've had a chance to read all of this.
I hope we can at least agree on the names and the syntax for a
standard facility. I agree that we shouldn't STANDARDIZE on anything
complicated, but that we should have the basis for extensions in the
direction of Common Lisp for those of us that want it.
> Date: Sun, 29 Mar 87 02:29:12 EST
> From: Alan Bawden <ALAN at AI.AI.MIT.EDU>
>
> I will confine myself to reminding you of what I said the last time this
> subject was raised: Any implementation of multiple-values that doesn't
> have the property that ordinary continuations (for example the continuation
> passed to F in (+ (F) 3)) will accept and ignore extra values has missed
> the point of multiple values.
This is why I prefer alternative #2.
> Let me try putting it another way: If you decide on a semantics for
> multiple values that has the property that a correct implementation can be
> written in straight R↑3RS Scheme, then what have you accomplished? You
> haven't given the users anything they couldn't have written for themselves.
> (Yes, perhaps you can arrange to implement it more efficiently, but since
> when has that been the the spirit of the language?)
I would prefer this to no agreement at all. Can we avoid deadlock?
Regards,
David Bartley
∂03-Apr-87 1043 @MC.LCS.MIT.EDU:bartley%home%ti-csl.csnet@RELAY.CS.NET optional arguments
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 3 Apr 87 10:43:29 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 3 Apr 87 13:39:18 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa04453; 3 Apr 87 10:21 EST
Received: from ti-csl by RELAY.CS.NET id aj00816; 3 Apr 87 11:18 EST
Received: from home (home.ARPA) by tilde id AA19574; Fri, 3 Apr 87 09:55:04 cst
Received: by home id AA16369; Fri, 3 Apr 87 09:55:18 cst
Date: Fri, 3 Apr 87 09:55:18 cst
From: David Bartley <bartley%home%ti-csl.csnet@RELAY.CS.NET>
Message-Id: <8704031555.AA16369@home>
To: RRRS-Authors@MC.LCS.MIT.EDU
Cc: Bartley%home%ti-csl.csnet@RELAY.CS.NET
Subject: optional arguments
And now for something completely different...
I believe it is time to consider adopting a simple extension to the
syntax for formal argument lists in Lambda expressions to include
optionally supplied arguments. Here's a proposal that seems to codify
the essentials of existing practice in at least a few implementations.
MOTIVATION
It was successfully argued at Brandeis that "rest" arguments suffice
for the definition of procedures that take arbitrary numbers of actual
arguments. Although this is certainly true, it has at least three
disadvantages. First, a direct implementation of optional arguments
could be more efficient by avoiding the extra consing needed for a
fully general rest argument. Second, error checking is more sporadic
when programmers supply their own mechanisms. It is cumbersome to
specify a finite number of optional arguments given the open ended
nature of rest args. Third, providing for optional arguments is so
common a paradigm that readability and portability would be enhanced
if we could agree on a standard mechanism.
ISSUES
I see several issues to be resolved:
(1) An extended syntax allowing optional arguments must be compatible
with the existing standard for Scheme. It is also desirable that it
not conflict with existing extensions for optional arguments and
existing or proposed extensions in other directions. (For example,
anyone favoring an extension of formal parameter lists to allow
destructuring of arguments has few available syntactic alternatives.)
(2) It must be decided whether a full or barebones facility should be
standardized. If the latter, the extended syntax for optionals should
also allow for further extension.
(3) It should be possible to determine at run time whether a
particular optional argument was supplied by the caller. One way to
do this is to supply a count of the number of arguments passed to the
called procedure. Another way is to allow the called procedure to ask
whether a given argument were supplied.
(4) It is useful to allow specification of values to be bound to
optional arguments when actual parameters are not supplied by the
caller. This facility is convenient but can be built upon the ability
to determine whether a value had been supplied by the caller. It also
has subtle problems, such as the exact lexical environment to be used
in evaluating the initializing expression.
INFORMAL DESCRIPTION
I suggest that we adopt the following mechanism for optional arguments
as a non-essential feature. It is basically the approach used
internally here at TI based on our understanding of a similar facility
in MIT Scheme. However, it includes modifications suggested by Will
Clinger.
-- Formal argument lists containing optional arguments are
distinguished by the presence of the keyword #!OPTIONAL, which acts
like &OPTIONAL in Common Lisp. (I could write out an informal
description here based on Steele's book, but there's no need to yet.)
-- Formal variables which do not receive values are said to be "bound"
but not "assigned". It is an error to reference an unassigned
variable. Ideally, an implementation would trap on such references.
However, it may choose to mark unassigned variables with a
distinguished value (or values), such as the token #!UNASSIGNED.
(The R↑3RS formal semantics assumes that all variables are bound
in the initial environment, but this is an area where implementations
differ. Some implementations may extend the syntax for DEFINE so
(DEFINE X) creates a binding for X but leaves it unassigned.)
The special form (ASSIGNED? <id>) returns #T iff the variable named by
<id> has been assigned a value (e.g., from the calling procedure's
actual argument list). The value of (ASSIGNED? X) is unspecified if X
is unbound. For example the value of (LETREC ((X (ASSIGNED? X))) X)
is not clear, just as the value of (LETREC ((X X)) X) is unspecified.
-- A "rest" argument is always assigned. If the list of actual
arguments is no longer than the number of required and optional
formals, the rest argument receives the value ().
-- Optional arguments may be given default values by first testing
them with ASSIGNED? as in the following example:
(lambda (a #!optional b)
(let ((b (if (assigned? b) b (+ a 42))))
...))
or
(lambda (a #!optional b)
(when (not (assigned? b)) (set! b (+ a 42)))
...)
This makes clear the environment that the initialization expression
for B is to be evaluated in.
FORMAL SEMANTICS
Will Clinger has kindly volunteered the following formal semantics for
ASSIGNED? and LAMBDA. The "\" character should be read as Greek lambda.
E [[ (assigned? I) ]]
= \ r k . hold (lookup r I)
(single (\ e . e = undefined --> false, true))
E [[ (lambda (I0* #!optional I1*) C* E0 ]]
= \ r k . \ s .
new s \in L -->
send (< new s | L,
\ e* k' .
(# e* >= # I0*) & (# e* <= (# I0* + # I1*)) -->
tievals
(\ a* . (\ r' . C [[ C* ]] r' (E [[ E0 ]] r' k'))
(extends r (I0* concat I1*) a*))
(e* concat (seq (# I0* + # I1* - # e*) undefined)),
wrong "wrong number of arguments">
in E)
k
(update (new s | L) unspecified s),
wrong "out of memory" s
E [[ (lambda (I0* #!optional I1* . I) C* E0 ]]
= \ r k . \ s .
new s \in L -->
send (< new s | L,
\ e* k' .
# e* >= # I0* -->
tievalsrest
(\ a* . (\ r' . C [[ C* ]] r' (E [[ E0 ]] r' k'))
(extends r (I0* concat I1* concat <I>) a*))
((takefirst e* (# I0*))
concat (seq (# I0* + # I1* - # e*) undefined)
concat (dropfirst e* (# I0*)))
(# I0* + # I1*),
wrong "too few arguments">
in E)
k
(update (new s | L) unspecified s),
wrong "out of memory" s
where
seq = \ n x . n <= 0 --> <>, <x> concat (seq (n - 1) x)
DISCUSSION
I don't propose a syntactic extension for specifying default
initialization more conveniently because (1) the obvious syntax
would conflict with an extension for argument list destructuring;
(2) testing whether a variable had been supplied by the caller or from
evaluation of the default initialization expression becomes more
complicated; (3) the explicit mechanism given here seems quite
readable and convenient to me; and (4) I think it's important to make
explicit which environment the initialization form is evaluated in and
to allow variations.
I've mentioned destructuring several times because I have the
impression much of the opposition to optional arguments comes from the
desire to leave the way open for destructuring lambda lists. It seems
to me that the simple addition of the #!OPTIONAL keyword should not
seriously hinder destructuring, since it is unambiguous and can be
easily recognized.
I welcome all comments.
Regards,
David Bartley
∂03-Apr-87 1415 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU optional arguments
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 3 Apr 87 14:15:19 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 3 Apr 87 16:47:46 EST
Date: Fri, 3 Apr 87 16:47:09 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: optional arguments
To: bartley%home%ti-csl.csnet@RELAY.CS.NET
cc: RRRS-Authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Fri 3 Apr 87 09:55:18 cst from David Bartley <bartley%home%ti-csl.csnet at RELAY.CS.NET>
Message-ID: <178851.870403.JAR@AI.AI.MIT.EDU>
I have a different optional arguments proposal, which people should keep
in mind as an alternative:
Don't make any change to the syntax of LAMBDA. Instead, just introduce
a new special form for taking apart rest arguments. Example:
(LAMBDA (A B . R)
(OPTIONAL ((X 1) (Y (+ X 5))) R
-body-))
would be analogous to the Comon Lisp lambda-expression
(LAMBDA (A B &OPTIONAL (X 1) (Y (+ X 5)))
-body-),
and
(LAMBDA (A B . R)
(OPTIONAL ((X 1) (Y (+ X 5)) . R) R
-body-))
would be like
(LAMBDA (A B &OPTIONAL (X 1) (Y (+ X 5)) &REST R)
-body-),
I think this gets most of the benefits you want without making LAMBDA
hairy. It provides parameter list destructuring and error checking in a
nice orthogonal way, and is only a little bit more verbose than hairy
LAMBDA-isms. And it can be implemented in straightforwardly as a macro.
I have had this in the back of my mind since about 1981. I never got
around to installing it in T, but I should have. I have implemented and
used it on several occasions (e.g. for implementing R↑2 Scheme in T),
and was fairly happy with it.
Effiency note: the mythical "sufficiently clever compiler" can avoid
consing the rest-list if there's only the one reference to R. I think
this would be a very straightforward transformation.
Jonathan
∂04-Apr-87 2028 @MC.LCS.MIT.EDU:RMACHUCA@SIMTEL20.ARPA TIPC windows
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 4 Apr 87 20:28:05 PST
Received: from SIMTEL20.ARPA (TCP 3200000112) by MC.LCS.MIT.EDU 4 Apr 87 23:26:54 EST
Date: Sat 4 Apr 87 21:24:08-MST
From: Raul Machuca <RMACHUCA@SIMTEL20.ARPA>
Subject: TIPC windows
To: scheme@MC.LCS.MIT.EDU
Message-ID: <12291980245.17.RMACHUCA@SIMTEL20.ARPA>
An application of PC Scheme that I am working on requires that
a large amount of asc2 data be displayed. One large monitor available
is the Amdek 1280 which displays 160 columns by 50 rows. Does
anyone have any experience using PC Scheme with this or any other
monitor that can display as much or more data? Do the PC
window programs work without modification?
-------
∂04-Apr-87 2330 @MC.LCS.MIT.EDU:tim@linc.cis.upenn.edu scheme in prolog
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 4 Apr 87 23:30:43 PST
Received: from linc.cis.upenn.edu (TCP 1201000140) by MC.LCS.MIT.EDU 5 Apr 87 01:47:17 EST
Received: by linc.cis.upenn.edu
id AA08740; Sun, 5 Apr 87 01:42:37 EST
Date: Sun, 5 Apr 87 01:42:37 EST
From: tim@linc.cis.upenn.edu (Tim Finin)
Posted-Date: Sun, 5 Apr 87 01:42:37 EST
Message-Id: <8704050642.AA08740@linc.cis.upenn.edu>
To: scheme@mc.lcs.mit.edu, prolog-request@sushi.stanford.edu
Subject: scheme in prolog
A while back there was a discussion on the SCHEME newsgroup concerning
implementations of logic programming languages in Scheme. David Moon
wondered if anyone had implemented Prolog in Scheme. His query
stimulated me to give it a try. I wrote two interpreters for a subset
of Scheme, one with and one without continuation semantics. I'm happy
to share these with anyone who is interested.
What I found most interesting about the exercise has more to do with
Prolog than with Scheme - It is very difficult to implement an
efficient interpreter for a language which has side-effects in prolog.
I could not find a way to represent environments which had what I
consider to be the neccessary features:
1 - unreferenced enviroments should be automatically GCed.
2 - looking up the value of a variable should be cheap and,
in particular, should not depend on the the number of values it
has received in the past.
3 - variable assignment should be cheap and, in particular should not
require copying abritrary portions of an environment.
4 - The interpreter should not require an infinite stack nor
should the host prolog be required to detect and optimize
for tail recursion.
I basically considered two alternatives for representing the environment:
o represent an environment as a term which contains a sequence of
variable-name/variable-value pairs. This achieves (1) in most prologs
but must give up on either (2) or (3).
o represent an environment as a set of assertions in the clausal
database of the form: bound(Symbol,Value,EnvironmentID). This wins on
(2) and (3) but loses on (1).
This makes me think that a side-effect predicate like RPLACARG
(discussed in PROLOG-DIGEST about a year ago) is not such a bad idea.
It also reinforces the notion that Lisp is either a (i) more general
or (ii) lower level language than Prolog, depending, of course, on
your point of view.
Tim
∂06-Apr-87 0927 @MC.LCS.MIT.EDU:RMACHUCA@SIMTEL20.ARPA Need consultant
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 6 Apr 87 09:27:36 PDT
Received: from SIMTEL20.ARPA (TCP 3200000112) by MC.LCS.MIT.EDU 6 Apr 87 12:22:19 EDT
Date: Mon, 6 Apr 87 10:19:25 MDT
From: Raul Machuca <RMACHUCA@SIMTEL20.ARPA>
Subject: Need consultant
To: scheme@MC.LCS.MIT.EDU
Message-ID: <12292372602.16.RMACHUCA@SIMTEL20.ARPA>
We are working on a small prototype for a range scheduling system using
TIPC Scheme. We need the help of a faculty member familiar with
Scheme and AI concepts. The total time would be 90 days not necessarily
continuous but taking place within 6 months from the date the
contract is initiated. Starting date would be about the end of June.
The work would be done at your installation and graduate students
could be included.
If anyone is interested please let me know and I will send
you more information.
PS. Rate of pay is computed from 9 month salary.
-------
∂06-Apr-87 1044 @MC.LCS.MIT.EDU:bartley%home%ti-csl.csnet@RELAY.CS.NET optional arguments
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 6 Apr 87 10:44:18 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 6 Apr 87 12:58:28 EDT
Received: from relay2.cs.net by RELAY.CS.NET id aj14655; 6 Apr 87 12:36 EDT
Received: from ti-csl by RELAY.CS.NET id at06040; 6 Apr 87 12:35 AST
Received: from home (home.ARPA) by tilde id AA06696; Mon, 6 Apr 87 10:12:42 cst
Received: by home id AA23220; Mon, 6 Apr 87 11:13:06 cdt
Date: Mon, 6 Apr 87 11:13:06 cdt
From: David Bartley <bartley%home%ti-csl.csnet@RELAY.CS.NET>
Message-Id: <8704061613.AA23220@home>
To: JAR@MC.LCS.MIT.EDU
Cc: Bartley%home%ti-csl.csnet@RELAY.CS.NET, RRRS-Authors@MC.LCS.MIT.EDU
In-Reply-To: Jonathan A Rees's message of Fri, 3 Apr 87 16:47:09 EST
Subject: optional arguments
> Date: Fri, 3 Apr 87 16:47:09 EST
> From: Jonathan A Rees <JAR@mc.lcs.mit.edu>
>
> I have a different optional arguments proposal, which people should keep
> in mind as an alternative:
>
> Don't make any change to the syntax of LAMBDA. Instead, just introduce
> a new special form for taking apart rest arguments. Example:
>
> (LAMBDA (A B . R)
> (OPTIONAL ((X 1) (Y (+ X 5))) R
> -body-))
This appears to be more of a destructuring form than one restricted to
defining optional arguments. Would you allow the (OPTIONAL ...) to
appear anywhere or just directly inside a LAMBDA as its body? Must
the second "argument" (R) be the name of a "rest" arg?
> [...]
> I think this gets most of the benefits you want without making LAMBDA
> hairy. It provides parameter list destructuring and error checking in a
> nice orthogonal way, and is only a little bit more verbose than hairy
> LAMBDA-isms. And it can be implemented in straightforwardly as a macro.
It apparently only allows destructuring at the top level of a list.
My suggestion can also be implemented straightforwardly as a macro.
> [...]
> Effiency note: the mythical "sufficiently clever compiler" can avoid
> consing the rest-list if there's only the one reference to R. I think
> this would be a very straightforward transformation.
I like this notation, but not the idea that its efficiency depends on
the cleverness of the compiler, since that inhibits using such
features in portable code. It would require a compiler to determine
whether the declared rest arg R were otherwise referenced from within
the body of the procedure in order to approach the efficiency a dumb
compiler could get with my approach.
On the other hand, if one customarily wrote
(LAMBDA (A B . R1)
(OPTIONAL ((X 1) (Y (+ X 5)) . R2) R1
-body-))
with the variables R1 and R2 having the same name, then a preprocessor
for LAMBDA could "look ahead" for an OPTIONAL form in its body and
determine that R1 could possibly have but one use. This would be a
fairly localized test. (But is it proper for one macro to assume that
another macro has not been redefined?)
Regards,
David Bartley
∂06-Apr-87 1232 @MC.LCS.MIT.EDU:RPG@SAIL.STANFORD.EDU Optionals
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 6 Apr 87 12:32:09 PDT
Received: from SAIL.STANFORD.EDU (TCP 1200000013) by MC.LCS.MIT.EDU 6 Apr 87 14:48:44 EDT
Date: 06 Apr 87 1144 PDT
From: Dick Gabriel <RPG@SAIL.STANFORD.EDU>
Subject: Optionals
To: rrrs-authors@MC.LCS.MIT.EDU
Jonathan proposes:
(LAMBDA (A B . R)
(OPTIONAL ((X 1) (Y (+ X 5))) R
-body-))
As one of the sad, major forces behind Common Lisp, I'm glad to
see that Common Lisp doesn't have a monopoly on bad taste.
The only palletable line in this code reads:
-body-))
-rpg-
∂06-Apr-87 1241 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU current membership
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 6 Apr 87 12:41:16 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 6 Apr 87 14:52:52 EDT
Date: Mon, 6 Apr 87 14:20:42 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: current membership
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <179905.870406.JAR@AI.AI.MIT.EDU>
Enclosed is the current membership of RRRS-AUTHORS. Sometime in
February or March I added two members of the Eulisp committee, Julian
Padget and Andy Norman. Most list members seem to be observers rather
than participants, which I take to be a sign that we're doing something
right.
We could use a new name for the mailing list, since "RRRS-authors"
hasn't been appropriate since the R↑2 report came out (a year and a half
ago). Maybe something like "Scheme-authors" or "Scheme-designers" or
"Scheme-report-authors". "R↑NRS-authors" isn't pronounceable.
- Jonathan
;;; MIT:
(file [LSPMAI;RRRS MAIL]) ;Local archive file
SCHEME-RRRS@OZ.AI.MIT.Edu ;Oz people
alco@VX.LCS.MIT.Edu ;Dave Alcocer
LS.SRB@Deep-Thought.MIT.Edu ;Steve Balzac
ALAN ;Alan Bawden
Ziggy@VX.LCS.MIT.Edu ;Michael Blair
RHH ;Bert Halstead
CPH ;Chris Hanson
NICK ;Nick Papadakis
JAR ;?
;;; Non-MIT:
jleech@ADS.ARPA ;ADS / Jay Leech
william@ADS.ARPA ; William Bricken
andy@ADS.ARPA ; Andy Cromarty
padget%uk.ac.bath.ux63@CS.UCL.AC.UK ;Bath / Julian Padget
HP-SCHEME@HPLABS.HP.Com ;HP / Henry Wu
ange%hplb.csnet@Relay.CS.Net ; Andy Norman
dyb%indiana@Relay.CS.Net ;Indiana/ Kent Dybvig
scheme-rrrs%indiana@Relay.CS.Net ;Indiana / ...
linus!ramsdell@Mitre-Bedford.ARPA ;MITRE / John Ramsdell
wand%corwin.ccs.northeastern.edu@Relay.CS.Net ;Northeastern / Mitch Wand
("#COMSCH.MSG[SCH,LSP]" @SAIL.Stanford.Edu) ;Stanford / file archive
ANDY@Sushi.Stanford.Edu ; Andy Freeman
RPG@SAIL.Stanford.Edu ; Dick Gabriel
Daniel ; Daniel Weise
RDZ ; Ramin Zabih
KMP ;Symbolics / Kent Pitman
adams%tekchips%tektronix@Relay.CS.Net ;Tektronix / Norman Adams
willc%tekchips%tektronix@Relay.CS.Net ; Will Clinger
rrrs-authors-incoming%TI-CSL@Relay.CS.Net ;TI / ...
GLS ;TMI / Guy Steele
patel@CS.UCLA.EDU ;UCLA / Dorab Patel
Hudak@Yale.ARPA ;Yale / Paul Hudak
Kelsey@Yale.ARPA ; Richard Kelsey
Kranz@Yale.ARPA ; David Kranz
Philbin-Jim@Yale.ARPA ; Jim Philbin
∂06-Apr-87 1319 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU optional arguments
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 6 Apr 87 13:19:38 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 6 Apr 87 15:38:24 EDT
Date: Mon, 6 Apr 87 15:03:55 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: optional arguments
To: bartley%home%ti-csl.csnet@RELAY.CS.NET
cc: RRRS-Authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Mon 6 Apr 87 11:13:06 cdt from David Bartley <bartley%home%ti-csl.csnet at RELAY.CS.NET>
Message-ID: <179940.870406.JAR@AI.AI.MIT.EDU>
Date: Mon, 6 Apr 87 11:13:06 cdt
From: David Bartley <bartley%home%ti-csl.csnet at RELAY.CS.NET>
This appears to be more of a destructuring form than one restricted to
defining optional arguments. Would you allow the (OPTIONAL ...) to
appear anywhere or just directly inside a LAMBDA as its body? Must
the second "argument" (R) be the name of a "rest" arg?
It can appear anywhere, and R can be any list. In other words, it's
the obvious macro, nothing more or less, semantically at least.
(The syntax "(OPTIONAL r ((var default) ...) body)" is probably better than
"(OPTIONAL ((var default) ...) r body)".)
It apparently only allows destructuring at the top level of a list.
My use of the term "destructuring" was a little too free then. Your
proposal also only allows it at top level, yes? Mixing default
values with full destructuring would be awful...
My suggestion can also be implemented straightforwardly as a macro.
Into what would it expand? You would still need either (1) a
PRIMITIVE-LAMBDA expression type, (2) an incompatible LAMBDA in some
distinct syntax table, or (3) the ability to overload macros. I think
there are problems with all three approaches. I prefer the orthogonal
approach of giving distinct features distinct names.
(Well... why does LAMBDA support rest-arguments, you ask? And why does
the language have "named LET"? I remember that Dan Friedman argued
against overloading LAMBDA for n-ary procedures back in '84, for exactly
this reason. I vacillate between agreeing with him and not. I argued
against named LET, but other people said you can view unnamed LET as a
special case of named LET, therefore the overloading is OK, and
desirable because you want to minimize the number of reserved words at
almost any cost. They shouted more loudly, and won.)
I like this notation, but not the idea that its efficiency depends on
the cleverness of the compiler, since that inhibits using such
features in portable code. It would require a compiler to determine
whether the declared rest arg R were otherwise referenced from within
the body of the procedure in order to approach the efficiency a dumb
compiler could get with my approach.
As Alan Bawden asked, since when were efficiency considerations so
important in language design? However, I don't think OPTIONAL need be
inefficient. Sure, it needs a two-pass compiler, but given that,
detecting the situation is trivial, much easier than detecting whether a
LETREC is a loop or that an environment may be allocated on a stack or
in registers. I assume the PC Scheme compiler and most others are
already two-pass, so I don't think this is a big deal. I don't know of
anyone who is using a pure interpreter these days.
If you're concerned about the speed of portable code, I'd say this is
probably the least of your worries. Other kinds of unnecessary consing,
especially of environments, procedures, and continuations, will dominate
this kind if the compiler is only one-pass.
(But is it proper for one macro to assume that
another macro has not been redefined?)
The answer is no, if syntactic keywords are scoped at all (and they
ought to be) then it is definitely not proper, but that doesn't mean a
macro has no hope of examining subforms. Did you read my macro
proposal? You could deal with situations like this if there was some
way to examine preprocessed expressions. The ->CORE procedure in the
proposal would suffice if OPTIONAL-expressions were in its range.
But I think it would be better to put it in the compiler, especially
since the case without the rest-argument is the important one for error
checking. You don't want people to forego the error checking -- one
of the main reasons having an explicit optional-argument feature comes
up -- just in order to reduce consing, and you don't want macros doing
optimizations in any case.
Jonathan.
∂06-Apr-87 1404 @MC.LCS.MIT.EDU:RPG@SAIL.STANFORD.EDU Taste
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 6 Apr 87 14:04:17 PDT
Received: from SAIL.STANFORD.EDU (TCP 1200000013) by MC.LCS.MIT.EDU 6 Apr 87 16:40:54 EDT
Date: 06 Apr 87 1334 PDT
From: Dick Gabriel <RPG@SAIL.STANFORD.EDU>
Subject: Taste
To: rrrs-authors@MC.LCS.MIT.EDU
Sorry, I mispelled ``palatable.''
I was under the impression that people on this list were not required
to explain why they thought something was in bad taste nor provide
alternatives. Jonathan wrote recently:
``I would strongly oppose the Common Lisp multiple value semantics. I
find it to be very distasteful.''
There was no further discussion of reasons or alternatives.
The line:
(LAMBDA (X Y Z . R) ...)
puts a lot semantic emphasis on the character `.'. It relies on a joke
involving the (coincidental) underling data structure that is sometimes
used to represent expressions. The line that starts
(OPTIONALS ...)
is simply a recovery from the language design error reflected on the
previous line.
I think that if we (may I be so bold?) are considering a richer
parameter-passing language, we should carefully consider and decide what
information we wish to have expressed regarding how variables will be
bound upon function entry. Possibly we want to define a language for
passing structures of various types which will then be decomposed and bound
upon function entry - this would be much like alien structure languages
in some languages.
The advantage of Common Lisp &-markers is that it is relatively clear that
something funny is going on, and a programmer doesn't have to rely on a
human reader to always see the tiny `.'.
If the strategy is to be able to pass an arbitrary number of arguments,
then a syntax that binds one variable to all of them following by a
pretty destructuring bind of some sort is much better than a
syntax that mixes required with &rest (as Jonathan suggested).
-rpg-
∂06-Apr-87 1431 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Optionals
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 6 Apr 87 14:30:59 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 6 Apr 87 17:09:14 EDT
Date: Mon, 6 Apr 87 16:10:23 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Optionals
To: RPG@SAIL.STANFORD.EDU
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of 06 Apr 87 1144 PDT from Dick Gabriel <RPG at SAIL.STANFORD.EDU>
Message-ID: <179987.870406.JAR@AI.AI.MIT.EDU>
Date: 06 Apr 87 1144 PDT
From: Dick Gabriel <RPG at SAIL.STANFORD.EDU>
As one of the sad, major forces behind Common Lisp, I'm glad to
see that Common Lisp doesn't have a monopoly on bad taste.
The only palletable line in this code reads:
-body-))
Don't be elliptical. Please elaborate, explain why tasteless, propose
alternative, and explain to me whether or not the following is legal
Common Lisp and what it returns:
((lambda (&rest foo &key ((foo foo) 3 foo)) foo)
:foo 5 :foo 8 :allow-other-keys nil :allow-other-keys 13)
PS I don't find "palletable" in my dictionary. I do find
pallet n. 1. a wooden flat-bladed instrument 2. a lever or surface in a
timepiece that receives an impulse fom the escapement wheel and imparts
motion to a balance or pendulum 3. a portable platform for handling,
storing or moving materials and packages (as in warehouses, factories,
or vehicles)
palletize vt. to place on, transport, or store by means of pallets
Perhaps you mean "palletizable"?
J.
∂07-Apr-87 0542 @MC.LCS.MIT.EDU:ramsdell%faron@mitre-bedford.ARPA macros
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 7 Apr 87 05:42:06 PDT
Received: from mitre-bedford.ARPA (TCP 3200600102) by MC.LCS.MIT.EDU 7 Apr 87 08:44:44 EDT
Full-Name:
Posted-From: The MITRE Corp., Bedford, MA
Received: by faron.MENET (4.12/4.7)
id AA08662; Tue, 7 Apr 87 07:44:26 est
Date: Tue, 7 Apr 87 07:44:26 est
From: John D. Ramsdell <ramsdell%faron@mitre-bedford.ARPA>
Posted-Date: Tue, 7 Apr 87 07:44:26 est
Message-Id: <8704071244.AA08662@faron.MENET>
To: rrrs-authors%mc.lcs.mit.edu@mitre-bedford.ARPA
Subject: macros
Multiple returns and optional arguments are interesting
to discuss, but everybody uses macros. It seems to me
that an agreement on macros is much more important. JAR's
proposal appears to satisfy most needs for macros. At first
I worried about the added complexity of specifying macros, but
now I think that its good to discourage its use by making it
hairy. Do I understand the lack of discussion to mean that
there are no objections to JAR's proposal? If so, let's adopt
it and move on.
John
∂07-Apr-87 0825 @MC.LCS.MIT.EDU:gls@Think.COM Optionals
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 7 Apr 87 08:25:21 PDT
Received: from Think.COM (TCP 1201000006) by MC.LCS.MIT.EDU 7 Apr 87 11:07:05 EDT
Received: from godot.think.com by Think.COM; Tue, 7 Apr 87 11:02:33 EST
Received: from thorlac by godot.think.com via CHAOS; Tue, 7 Apr 87 11:02:22 EST
Date: Tue, 7 Apr 87 10:03 EST
From: Guy Steele <gls@Think.COM>
Subject: Optionals
To: JAR@ai.ai.mit.edu, RPG@sail.stanford.edu
Cc: rrrs-authors@mc.lcs.mit.edu
In-Reply-To: <179987.870406.JAR@AI.AI.MIT.EDU>
Message-Id: <870407100325.3.GLS@THORLAC.THINK.COM>
Date: Mon, 6 Apr 87 16:10:23 EDT
From: Jonathan A Rees <JAR@ai.ai.mit.edu>
... Please ...
explain to me whether or not the following is legal
Common Lisp and what it returns:
((lambda (&rest foo &key ((foo foo) 3 foo)) foo)
:foo 5 :foo 8 :allow-other-keys nil :allow-other-keys 13)
RPG did not respond to this point in his reply, so I will take
the liberty here:
There are three distinct areas that you are muddling here. One is the
question of whether Common Lisp specifies the meaning of this
expression precisely and unambiguously. The second is whether the
facilities of the language can be abused to produce unreadable code.
The third is, if the scond is true, does the language design encourage
such abuse.
The existing Common Lisp specification unfortunately is not entirely
precise unambiguous. For example, it does not address the question of
whether there may be two parameters of the same name in a single
lambda-list. (The latest sentiment I have observed is that it should be
an error.) On the other hand, the first keyword argument FOO will be
bound to 5, not 8; that is specified on page 62. You have raised an
interesting point concerning :allow-other-keys; the wording of the
second bulleted point on page 63 is unfortunately inconsistent with the
statement on page 62 about taking the leftmost pair.
I think we have already seen in the last week how easy it is to produce
unreadable code, and I will not belabor the point here beyond the simple
assertion that it simply IS NOT A VALID ARGUMENT to assert that a language
is bad because it is possible to write programs that are difficult to
understand.
Now, if you had argued that the design of Common Lisp actively encourages
such abuse, rather than merely permitting it, I would be sympathetic.
∂07-Apr-87 1337 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU macros
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 7 Apr 87 13:37:45 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 7 Apr 87 16:35:13 EDT
Date: Tue, 7 Apr 87 16:33:22 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: macros
To: ramsdell%faron@MITRE-BEDFORD.ARPA
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Tue 7 Apr 87 07:44:26 est from John D. Ramsdell <ramsdell%faron at mitre-bedford.ARPA>
Message-ID: <180699.870407.JAR@AI.AI.MIT.EDU>
Date: Tue, 7 Apr 87 07:44:26 est
From: John D. Ramsdell <ramsdell%faron at mitre-bedford.ARPA>
Multiple returns and optional arguments are interesting
to discuss, but everybody uses macros. It seems to me
that an agreement on macros is much more important. JAR's
proposal appears to satisfy most needs for macros. At first
I worried about the added complexity of specifying macros, but
now I think that its good to discourage its use by making it
hairy. Do I understand the lack of discussion to mean that
there are no objections to JAR's proposal? If so, let's adopt
it and move on.
I believe there are serious objections from Gene Kohlbecker and/or Dan
Friedman, at least. Gene is off the net, but I'll get in touch with
him. Perhaps Dan will overcome his shyness and let us know why an
"unhygienic" least common denominator is the wrong thing.
Jonathan
∂07-Apr-87 1710 @MC.LCS.MIT.EDU:mike%acorn@LIVE-OAK.LCS.MIT.EDU scheme in prolog
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 7 Apr 87 17:10:13 PDT
Received: from LIVE-OAK.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 7 APR 87 20:08:11 EDT
Received: from GOLD-HILL-ACORN.DialNet.Symbolics.COM by MIT-LIVE-OAK.ARPA via DIAL with SMTP id 36410; 7 Apr 87 20:07:38-EDT
Received: from BOSTON.Gold-Hill.DialNet.Symbolics.COM by ACORN.Gold-Hill.DialNet.Symbolics.COM via CHAOS with CHAOS-MAIL id 62778; Tue 7-Apr-87 19:38:06-EST
Date: Tue, 7 Apr 87 19:38 est
From: mike%acorn@oak.lcs.mit.edu
To: tim@linc.cis.upenn.edu (Tim Finin)
Reply-to: mike%acorn@oak.lcs.mit.edu
Subject: scheme in prolog
Cc: scheme@mc.lcs.mit.edu, prolog-request@sushi.stanford.edu
Date: Sun, 5 Apr 87 01:42:37 EST
From: tim@linc.cis.upenn.edu (Tim Finin)
What I found most interesting about the exercise has more to do with
Prolog than with Scheme - It is very difficult to implement an
efficient interpreter for a language which has side-effects in prolog.
No more difficult, I think, than interpreting a language with
side-effects in a language without side effects. Consider writing a
scheme interpreter in Pure Scheme or in ML (not using the side
effects). In either case, the technique you end up using makes the
interpreter look alot like a denotational semantics (Pure Scheme or ML
case) or a Plotkin-Style operational semantics (Prolog Case).
I basically considered two alternatives for representing the environment:
o represent an environment as a term which contains a sequence of
variable-name/variable-value pairs. This achieves (1) in most prologs
but must give up on either (2) or (3).
o represent an environment as a set of assertions in the clausal
database of the form: bound(Symbol,Value,EnvironmentID). This wins on
(2) and (3) but loses on (1).
I think you should build an abstract data type for this rather than
expecting terms and pattern matching or the interpreter to do it for you.
The best you'll be able to do in prolog is a tree like representation,
requiring logarithmic access time and update time (as well as logarithmic
space for copying on updates.)
lookup (X, Env, Value) :- ....given X find value V in environment E.
update (X, V, Env1, Env2) :- update X to value V in environment Env1 to get
environment Env2.
This makes me think that a side-effect predicate like RPLACARG
(discussed in PROLOG-DIGEST about a year ago) is not such a bad idea.
Yup. The difficulty is that it is hard to use side effects in a language
with automatic control structures. You basically can't get the level
of operational control you need, but the declarative model also breaks down.
In any case I'd say RPLACARG will be infinitely MORE useful than
assert and retract ever were. Consider for example the UPDATE predicate
above. This, written using RPLACARG would destructively update the environment
Env1 to make Env2, which is exactly what you need.
It also reinforces the notion that Lisp is either a (i) more general
or (ii) lower level language than Prolog, depending, of course, on
your point of view.
Both I'd say. Prolog is a very high level language, and is less expressive
than languages with side effects. What I mean by expressive here is not
the usual formal definition, since Prolog is clearly complete in that
all computable functions can be computed, but rather a pragmatic
view. Any language without side effects is restricted in that it
cannot describe changes of state over time without having representations
of those states separately.
Try writing code for hash-tables in prolog or pure scheme and you'll
see what I mean. Hashing (like most side effect oriented code) requires
side effects in its essence since it has to reason about whether buckets
in the table are in use "yet". They also lack any notion of EQ-ness
as in Lisp or Scheme for the same reason.
...mike beckerle
Gold Hill Computers
∂07-Apr-87 1944 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Taste
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 7 Apr 87 19:44:34 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 7 Apr 87 21:19:09 EDT
Date: Tue, 7 Apr 87 21:17:08 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Taste
To: RPG@SAIL.STANFORD.EDU
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of 06 Apr 87 1334 PDT from Dick Gabriel <RPG at SAIL.STANFORD.EDU>
Message-ID: <180826.870407.JAR@AI.AI.MIT.EDU>
Date: 06 Apr 87 1334 PDT
From: Dick Gabriel <RPG at SAIL.STANFORD.EDU>
I was under the impression that people on this list were not required
to explain why they thought something was in bad taste nor provide
alternatives. Jonathan wrote recently:
``I would strongly oppose the Common Lisp multiple value semantics. I
find it to be very distasteful.''
There was no further discussion of reasons or alternatives.
No one asked... if you care to know, it's because I think ignored
values, as well optional arguments for that matter, are a form of
overloading, and overloading is a kind of pun, and punning is to be
avoided where possible, since (in my opinion) it's likely to lead to
code that's buggy and/or unreadable and/or not well thought out.
Sometimes overloading is just what you want in order for your code to be
modular, but I haven't observed that in these situations. This is all
very vague, of course, which is why I waved my hands.
The line:
(LAMBDA (X Y Z . R) ...)
puts a lot semantic emphasis on the character `.'. It relies on a joke
involving the (coincidental) underling data structure that is sometimes
used to represent expressions.
I agree, this is a feature of dubious design. This probably ought to be
written (LAMBDA ARGS (... something which takes apart ARGS ...)).
Perhaps the n-ary version of LAMBDA ought to have a different name.
The line that starts
(OPTIONALS ...)
is simply a recovery from the language design error reflected on the
previous line.
I think that if we (may I be so bold?) are considering a richer
parameter-passing language, we should carefully consider and decide what
information we wish to have expressed regarding how variables will be
bound upon function entry. Possibly we want to define a language for
passing structures of various types which will then be decomposed and bound
upon function entry - this would be much like alien structure languages
in some languages.
The advantage of Common Lisp &-markers is that it is relatively clear that
something funny is going on, and a programmer doesn't have to rely on a
human reader to always see the tiny `.'.
I know of no instance where someone has failed to see the dot, or where
someone has been confused about its basic meaning... a bigger problem with
it than its small size is the fact that you can't write
(LAMBDA (. R) ...)
(which, by the way, is legal in T, and it does what you'd expect). &REST,
#!REST, &DOT, |.|, etc., it is true, do not suffer from this problem.
If the strategy is to be able to pass an arbitrary number of arguments,
then a syntax that binds one variable to all of them following by a
pretty destructuring bind of some sort is much better than a
syntax that mixes required with &rest (as Jonathan suggested).
I agree. In my experience, pattern-matching languages seem to have an
inevitable tendency to become baroque and disgusting. But let's not
stop looking for a decent one.
Thanks for explaining.
Jonathan...
∂08-Apr-87 0803 @MC.LCS.MIT.EDU:VERACSD@A.ISI.EDU Concurrency in Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Apr 87 08:03:28 PDT
Received: from A.ISI.EDU (TCP 3200600147) by MC.LCS.MIT.EDU 8 Apr 87 11:00:55 EDT
Date: 8 Apr 1987 10:56-EDT
Sender: VERACSD@A.ISI.EDU
Subject: Concurrency in Scheme
From: VERACSD@A.ISI.EDU
To: scheme@MC.LCS.MIT.EDU
Cc: veracsd.ck@A.ISI.EDU
Message-ID: <[A.ISI.EDU] 8-Apr-87 10:56:52.VERACSD>
I am in the process of writing a metacircular Lisp interpreter which
accommodates concurrent programming constructs (e.g. parbegin/parend's
and semaphores) and have recently come across *engines* in PC Scheme.
Engines seem like they offer much potential for this sort of thing,
however, they seem somewhat tricky. It is especially unclear to me
how to elegantly handle waits & signals for semaphores.
(There must be a better way than Ben-Ari's Pascal concurreny simulator.)
Any advice, pointers to sources, or code would be much appreciated.
Cris Kobryn
VERACSD.CK@A.ISI.EDU
∂08-Apr-87 0917 @MC.LCS.MIT.EDU:bartley%home%ti-csl.csnet@RELAY.CS.NET macros
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Apr 87 09:17:29 PDT
Received: from mitre-bedford.ARPA (TCP 3200600102) by MC.LCS.MIT.EDU 8 Apr 87 12:20:08 EDT
Posted-From: The MITRE Corp., Bedford, MA
Received: from relay2.cs.net by RELAY.CS.NET id ai04077; 7 Apr 87 17:07 EDT
Received: from ti-csl by RELAY.CS.NET id ao16423; 7 Apr 87 17:05 AST
Received: from home (home.ARPA) by tilde id AA17230; Tue, 7 Apr 87 14:48:35 cst
Received: by home id AA18814; Tue, 7 Apr 87 15:48:56 cdt
Date: Tue, 7 Apr 87 15:48:56 cdt
From: David Bartley <bartley%home%ti-csl.csnet@RELAY.CS.NET>
Message-Id: <8704072048.AA18814@home>
To: ramsdell%faron@mitre-bedford.ARPA
Cc: rrrs-authors%mc.lcs.mit.edu@mitre-bedford.ARPA
In-Reply-To: "John D. Ramsdell"'s message of Tue, 7 Apr 87 07:44:26 est
Subject: macros
> Date: Tue, 7 Apr 87 07:44:26 est
> From: "John D. Ramsdell" <ramsdell%faron@MITRE-BEDFORD.ARPA>
>
> Multiple returns and optional arguments are interesting
> to discuss, but everybody uses macros. It seems to me
> that an agreement on macros is much more important.
I agree that it is equally important, but harder to resolve.
> JAR's
> proposal appears to satisfy most needs for macros. At first
> I worried about the added complexity of specifying macros, but
> now I think that its good to discourage its use by making it
> hairy.
I can't agree that any language feature should be made hairy in order
to discourage its use. If a feature deserves to be in Scheme then it
deserves to be done right. You (or I, at least) can't morally
discourage the use of a feature by booby-trapping it with excess
complexity.
> Do I understand the lack of discussion to mean that
> there are no objections to JAR's proposal? If so, let's adopt
> it and move on.
No, I at least just haven't finished preparing a response. His
proposal is detailed, has much merit, and deserves serious study.
This topic is *much* more complicated than the others raised so far,
so it's hard to critique one proposal without suggesting alternatives.
> John
--db--
∂08-Apr-87 1025 @MC.LCS.MIT.EDU:Kahn.pa@Xerox.COM Re: scheme in prolog
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Apr 87 10:25:50 PDT
Received: from Xerox.COM (TCP 1200400040) by MC.LCS.MIT.EDU 8 Apr 87 13:24:10 EDT
Received: from Cabernet.ms by ArpaGateway.ms ; 08 APR 87 10:20:52 PDT
Date: Wed, 8 Apr 87 10:20:31 PDT
From: Kahn.pa@Xerox.COM
Subject: Re: scheme in prolog
In-Reply-To: "mike%acorn@LIVE-OAK.LCS.MIT.EDU's message of Tue, 7 Apr 87
19:38:00 EST"
To: mike%acorn@LIVE-OAK.LCS.MIT.EDU
cc: scheme@mc.lcs.mit.edu, prolog-request@sushi.stanford.edu
Message-ID: <870408-102052-1129@Xerox>
Tim Finin says "It is very difficult to implement an efficient
interpreter for a language which has side-effects in prolog," while mike
beckerle says "No more difficult, I think, than interpreting a language
with side-effects in a language without side effects."
Notice that Tim says "efficient" and mike doesn't. I think that much of
the argument hinges on this point. Just to muddy the waters I want to
bring up a paper in the 2nd international logic programming conference
(1984) called "Mutable arrays in Prolog" (or some such). The paper
essentially presents a naive implementation of arrays in Pure Prolog
where every write copies and a read entails a linear search. It then
goes on to describe a primitive implementation of the predicates for
creating and accessing arrays. The primitive implementation in some
cases actually had the same computational complexity as array primitives
in conventional languages. Is there any specification of Prolog which
would rule out a compiler that did such optimizations?
The point is that something is wrong with the question of whether one
language can EFFICIENTLY implement another. One can ask whether a
particular implementation of a language can efficiently implement
another. A more interesting question I think is whether one language
can EASILY and NATURALLY implement another.
- ken kahn
References
mike%acorn@LIVE-OAK.LCS.MIT.EDU's message of Tue, 7 Apr 87 19:38:00 EST
-- scheme in prolog
∂08-Apr-87 1532 @MC.LCS.MIT.EDU:bartley%home%ti-csl.csnet@RELAY.CS.NET towards an agenda
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Apr 87 15:31:50 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 8 Apr 87 18:24:44 EDT
Received: from relay2.cs.net by RELAY.CS.NET id ab14032; 8 Apr 87 17:50 EDT
Received: from ti-csl by RELAY.CS.NET id ab23460; 8 Apr 87 17:46 AST
Received: from home (home.ARPA) by tilde id AA15867; Wed, 8 Apr 87 14:38:40 cst
Received: by home id AA06501; Wed, 8 Apr 87 15:39:02 cdt
Date: Wed, 8 Apr 87 15:39:02 cdt
From: David Bartley <bartley%home%ti-csl.csnet@RELAY.CS.NET>
Message-Id: <8704082039.AA06501@home>
To: rrrs-authors@MC.LCS.MIT.EDU
Cc: Bartley%home%ti-csl.csnet@RELAY.CS.NET
Subject: towards an agenda
I had hoped to propose an agenda here, but I tripped over too many
unknowns, so let's try to nail a few things down first.
Is there agreement on which days we will meet? Jonathan, can you
suggest which hours of the day will be available for scheduling?
Can everyone arrange to attend?
Will and I suggested the following topics that we would like to see
resolved:
1. multiple return values
2. customizable reader
3. number syntax and exactness
4. macros
5. optional arguments
6. structures and opaque objects (& set!, maybe)
7. environments and modules
These are roughly in descending order of priority as we see it. We
already have proposals for 1, 4, and 5. Will hopes to cover 2 soon.
I suggested a more Common Lisp-like number syntax last year, so I'll
plan to clean that up and propose it again. Kent Dybvig's book
contains some language about exactness that I'd like to comprehend in
my proposal. Chez Scheme and TI Scheme (and perhaps others) have
somewhat contradictory define-structure features, so it would be nice
to head off further divergence in that area.
Although topic 7, environments and modules, is last on the list, I see
it as having long-term impact on whether Scheme continues to be used
for ever larger and larger "production" systems. "Programming in the
large" is a serious challenge for everyone looking to Lisp dialects
for new programming paradigms right now, and I'd like to find a way to
give Scheme an edge over other languages.
Other topics were suggested at the 1986 Lisp conference luncheon, e.g.
a way to declare that a variable such as CAR is never assigned. Would
anyone care to propose any of them for discussion at our next meeting?
--db--
∂08-Apr-87 2121 @MC.LCS.MIT.EDU:CPH@AI.AI.MIT.EDU multiple values
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Apr 87 21:21:03 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 8 Apr 87 23:55:12 EDT
Date: Wed, 8 Apr 87 23:29:15 EDT
From: Chris Hanson <CPH@AI.AI.MIT.EDU>
Subject: multiple values
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <181512.870408.CPH@AI.AI.MIT.EDU>
I've finally finished reading all of the mail on this topic, and I'd
like to offer a few comments:
First, I disagree with Alan when he states that not discarding extra
values misses the point of multiple values. In fact, I think there
are two things that one gets, which JAR indicated with his message.
First, just having multiple values of any kind is useful by itself.
The extra functionality of discarding additional values is an
additional convenience and not in any way "essential" to the concept
of multiple values. Like JAR, I've been using semantics #1 for some
time and have found it quite useful, even implemented in Scheme as I
have done.
Jinx's argument in favor of semantics #2 contains an additional flaw.
In fact, the particular example he chose highlights it rather clearly:
given an implementation of quotient that returned two values, why is
there any particular reason that the first value should be treated
specially? In fact, one might be interested in the remainder more
often than the quotient, and the order of arguments then enforces a
built in prejudice about which value is used more often. Am I then to
assume that, to correct for this bias, `remainder' also returns two
values, but in the opposite order?
Another argument in favor of semantics #1 is that programs written in
that semantics will also run in an implementation with semantics #2.
On possible way to resolve the conflict is to accept semantics #1
immediately with a provision to upgrade to semantics #2 later if
everyone can be convinced that it is reasonable.
However, I'd like to propose something different. We have already
accepted (I think) that multiple values are optional extensions rather
than required. Why not accept BOTH semantics? That gives
implementations more flexibility since they can choose between three
options: no multiple values, or either of the semantics #1 or #2.
People can write programs in any of those forms, with appropriate
restrictions to portability: in my case I might choose to write using
semantics #1, accepting that my programs will not run in systems
without multiple values (or else supplying my own implementation in
those cases). Others could write using semantics #2 and accept that
their programs would be somewhat less portable.
In any case, because multiple values are optional, I think that
standard procedures (like `quotient') should not return multiple
values.
Lastly, I like the names `values' and `with-values'. But I must admit
that I wish
(with-values (lambda () <generate>) <receive>)
would read
(with-values <generate> <receive>.
However, I understand why this might be undesirable from the
implementor's point of view.
∂08-Apr-87 2219 @MC.LCS.MIT.EDU:munnari!goanna.oz!hal@seismo.CSS.GOV towards an agenda
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Apr 87 22:18:56 PDT
Received: from seismo.CSS.GOV (TCP 30003106431) by MC.LCS.MIT.EDU 9 Apr 87 00:48:41 EDT
Received: from munnari.oz by seismo.CSS.GOV (5.54/1.14) with UUCP
id AA13684; Wed, 8 Apr 87 22:51:15 EDT
Message-Id: <8704090251.AA13684@seismo.CSS.GOV>
Received: from goanna by munnari with SunIII (5.5)
id AA09438; Thu, 9 Apr 87 12:23:00 EST
Date: Thu, 9 Apr 87 10:49:43 EST
From: munnari!goanna.oz!hal@seismo.CSS.GOV (Hal Abelson)
Received: by goanna.OZ (4.3)
id AA14144; Thu, 9 Apr 87 10:49:43 EST
To: rrrs-authors@mc.lcs.mit.edu
Subject: towards an agenda
Bartley's agenda doesn't include error-handling mechanisms.
I thought we had decided to worry about that.
∂08-Apr-87 2243 @MC.LCS.MIT.EDU:tim@linc.cis.upenn.edu scheme in prolog
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Apr 87 22:43:35 PDT
Received: from linc.cis.upenn.edu (TCP 1201000140) by MC.LCS.MIT.EDU 9 Apr 87 01:01:40 EDT
Received: by linc.cis.upenn.edu
id AA03895; Wed, 8 Apr 87 23:31:29 AST
Date: Wed, 8 Apr 87 23:31:29 AST
From: tim@linc.cis.upenn.edu (Tim Finin)
Posted-Date: Wed, 8 Apr 87 23:31:29 AST
Message-Id: <8704090331.AA03895@linc.cis.upenn.edu>
To: Kahn.pa@xerox.com, mike%acorn@live-oak.lcs.mit.edu, hudak-paul@yale-arpa
Cc: scheme@mc.lcs.mit.edu, prolog-request@sushi.stanford.edu
Subject: scheme in prolog
The points that Ken, Mike and Paul make are quite valid and very
interesting. Implementing an interpreter for a language with side
effects in a language without them is bit of a problem and leads to
some known tradeoffs. The mutable array example is a case in point.
However, Prolog, as opposed to a purer and more abstact logic
programming language does have side effects. One is free, if one
chooses, to dynamically assert and retract clauses in the database. I
was, in general, pleased with the way my scheme-in-prolog interpreter
turned out, except when it came to implementing SET!. I was surprised
that Prolog's side-effecting operations did not enable handle this in
what I considered a good way.
Tim
∂09-Apr-87 0052 @MC.LCS.MIT.EDU:hudak-paul@YALE.ARPA Re: scheme in prolog
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Apr 87 00:52:05 PDT
Received: from yale-celed.arpa (TCP 20011000034) by MC.LCS.MIT.EDU 8 Apr 87 19:21:14 EDT
Received: by yale-celed.arpa; Wed, 8 Apr 87 17:17:56 EDT
Date: Wed, 8 Apr 87 17:17:56 EDT
From: Paul Hudak <hudak-paul@YALE.ARPA>
Full-Name: Paul Hudak
Message-Id: <8704082117.AA14910@yale-celed.arpa>
Received: by yale-ring (midas.ring.cs.yale.edu/58D)
via WIMP-SWEEP (Version 1.8/1.4) ; Wed Apr 8 16:06:30
Received: by yale-ring (node-add2.ring.cs.yale.edu/ADD2)
via WIMP-SPOOL (Version 1.2/1.4) ; Wed Apr 8 16:10:21
Subject: Re: scheme in prolog
To: scheme@mc.lcs.mit.edu, prolog-request@sushi.stanford.edu
Cc: mike%acorn@oak.lcs.mit.edu, tim@linc.cis.upenn.edu, Kahn.pa@Xerox.COM
I was about to respond to the Tim Finin / Mike Beckerle discussion
in much the same way that Ken Kahn did, so I won't bother now, except
to point out that the efficiency issue, in particular the "aggregate
update" or "copy avoidance" issue, has also been addressed by the
functional programming community. This includes work in
semantics-directed compilation as well as more general work by Alan
Mycroft (in his dissertation), David Schmidt (see a recent TOPLAS
paper about detecting "singlethreaded stores") and me (see POPL 85,
Lisp and FP 86).
The nice thing about doing all this in the functional programming
paradigm is that the implementation of an interpreter for a language
looks VERY MUCH (if not identical) to the formal semantics of the
language. At Yale we have been experimenting a bit with such "truly
direct" semantics-directed compilation/interpretation with very
encouraging results. Thus, assuming one believes in denotational
semantics (and I realize that some people don't...), then the answer
to Ken Kahn's question:
A more interesting question I think is whether one language
can EASILY and NATURALLY implement another.
would have to be in the affirmative.
-Paul Hudak
-------
∂09-Apr-87 0732 @MC.LCS.MIT.EDU:jinx@GENEVA.AI.MIT.EDU towards an agenda
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Apr 87 07:32:04 PDT
Received: from geneva (TCP 2206400372) by MC.LCS.MIT.EDU 9 Apr 87 10:33:53 EDT
Received: by GENEVA.AI.MIT.EDU; Thu, 9 Apr 87 09:32:58 est
Date: Thu, 9 Apr 87 09:32:58 est
From: jinx@GENEVA.AI.MIT.EDU (Guillermo J. Rozas)
Message-Id: <8704091432.AA18976@geneva>
To: bartley%home%ti-csl.csnet@RELAY.CS.NET
Cc: rrrs-authors@MC.LCS.MIT.EDU, Bartley%home%ti-csl.csnet@RELAY.CS.NET
In-Reply-To: David Bartley's message of Wed, 8 Apr 87 15:39:02 cdt <8704082039.AA06501@home>
Subject: towards an agenda
I feel very strongly against customizable readers. I think they are
not really very useful, and on the other hand are abused immensely.
I've seen plenty of code which I can no longer recognize as Lisp code
because of all the reader extensions used in it.
I think it is a bad idea to standardaize on one.
∂09-Apr-87 1001 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU readers & tokenizers
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Apr 87 10:01:42 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 9 Apr 87 12:40:25 EDT
Date: Thu, 9 Apr 87 12:38:35 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: readers & tokenizers
To: jinx@GENEVA.AI.MIT.EDU
cc: bartley%home%ti-csl.csnet@RELAY.CS.NET,
rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Thu 9 Apr 87 09:32:58 est from jinx at GENEVA.AI.MIT.EDU (Guillermo J. Rozas)
Message-ID: <181778.870409.JAR@AI.AI.MIT.EDU>
Date: Thu, 9 Apr 87 09:32:58 est
From: jinx at GENEVA.AI.MIT.EDU (Guillermo J. Rozas)
To: bartley%home%ti-csl.csnet at RELAY.CS.NET
cc: rrrs-authors at MC.LCS.MIT.EDU,
Bartley%home%ti-csl.csnet at RELAY.CS.NET
Re: towards an agenda
I feel very strongly against customizable readers. I think they are
not really very useful, and on the other hand are abused immensely.
I've seen plenty of code which I can no longer recognize as Lisp code
because of all the reader extensions used in it.
I think it is a bad idea to standardaize on one.
I sympathize with this. However, the argument I see for this is as
follows: many Scheme implementations internally have high-speed
tokenizers which either are or could easily be made to be table-driven.
If for some reason one writes a Scheme program which needs a tokenizer,
a (Pascal, Prolog, ...) compiler for example, one has a choice between
writing slow portable code and writing fast unportable code. The
speedup can be quite significant; how many implementations have readers
that are written using only the i/o primitives in the report?
(The reader in the meta-circular Scheme implementation I'm working on
comes close, except that it uses PEEK-CHAR.)
I'm not going to be precise about what I mean by "tokenizer" but at the
very least it means something akin to READ-LINE which stops when it
comes upon a "delimiter", and perhaps does some sort of filtering or
parsing (e.g. case normalization, escape sequence handling) in the
process.
Of course, you can in this case use the technique I described in a
previous message, of defining your own interface and then making a
different bummed implementation of it for each different implementation
you actually use. But any situation like this is a candidate for
standardization, if more than one person is likely to use it.
For things like this (the category also includes multiple values #1,
hash tables, Chris's string-manipulation primitives, and other things I
have mentioned before), we are really in the business of standardizing
on interfaces to libraries of things that can be written portably but
are often better not. We're not talking changes to the language, we're
talking making life easier for those who use these features and people
who read their code.
As for defining "read macros" for scheme programs, that's another story.
I've never felt much need for this except when emulating one lisp
dialect in another, and this application has certainly diminished in
importance now that there is some degree of standardization. In cases
where I feel I just can't do without, e.g. if I'm playing with some idea
for a language design which for some bizarre reason really needs a new
read macro, I probably wouldn't mind too terribly writing my own reader,
which isn't such a difficult thing, especially if there's already a
tokenizer handy. You probably want to do that if you're emulating other
dialects (like Common Lisp), too.
The peculiar thing about the Common Lisp situation is that it supports
read macros, but it doesn't give you any control of the tokenizer. E.g.
if you're implementing C and need to distinguish case, you're out of
luck. If you want 1A to be an error, or colon to be alphabetic, or
... to be a valid symbol, give up. But then generality was explicitly
not one of their design goals in this case.
Jonathan
∂09-Apr-87 1012 @MC.LCS.MIT.EDU:jinx@GENEVA.AI.MIT.EDU readers & tokenizers
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Apr 87 10:12:14 PDT
Received: from geneva (TCP 2206400372) by MC.LCS.MIT.EDU 9 Apr 87 12:49:07 EDT
Received: by GENEVA.AI.MIT.EDU; Thu, 9 Apr 87 11:48:40 est
Date: Thu, 9 Apr 87 11:48:40 est
From: jinx@GENEVA.AI.MIT.EDU (Guillermo J. Rozas)
Message-Id: <8704091648.AA19230@geneva>
To: JAR@AI.AI.MIT.EDU
Cc: bartley%home%ti-csl.csnet@RELAY.CS.NET, rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: Jonathan A Rees's message of Thu, 9 Apr 87 12:38:35 EDT <181778.870409.JAR@AI.AI.MIT.EDU>
Subject: readers & tokenizers
I'm not opposed to making available the tokenizer to users. I think
that's a good idea. But I really dislike the idea of reader macros,
and would much rather make people write their own readers when
imbedding/implementing other languages.
If by customizable reader you mean tokenizer (as a procedure or set of
procedures to invoke on a port, for example), then I don't mind, but I
will very strongly oppose anything which allowes users to define #.
easily.
∂09-Apr-87 1324 @MC.LCS.MIT.EDU:gls@Think.COM readers & tokenizers
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Apr 87 13:24:24 PDT
Received: from Think.COM (TCP 1201000006) by MC.LCS.MIT.EDU 9 Apr 87 16:10:24 EDT
Received: from feuerbach by Think.COM via CHAOS; Thu, 9 Apr 87 16:05:08 EST
Date: Thu, 9 Apr 87 16:05 EDT
From: Guy Steele <gls@Think.COM>
Subject: readers & tokenizers
To: jinx@geneva.ai.mit.edu, JAR@ai.ai.mit.edu
Cc: bartley%home%ti-csl.csnet@relay.cs.net, rrrs-authors@mc.lcs.mit.edu,
gls@think.com
In-Reply-To: <8704091648.AA19230@geneva>
Message-Id: <870409160550.5.GLS@FEUERBACH.THINK.COM>
Date: Thu, 9 Apr 87 11:48:40 est
From: jinx@geneva.ai.mit.edu (Guillermo J. Rozas)
I'm not opposed to making available the tokenizer to users. I think
that's a good idea. But I really dislike the idea of reader macros,
and would much rather make people write their own readers when
imbedding/implementing other languages.
If by customizable reader you mean tokenizer (as a procedure or set of
procedures to invoke on a port, for example), then I don't mind, but I
will very strongly oppose anything which allowes users to define #.
easily.
Connection Machine Lisp would have been considerably more difficult
to prototype if not for the availability of the reader-macro facility.
--Guy
∂09-Apr-87 1412 @MC.LCS.MIT.EDU:KMP@STONY-BROOK.SCRC.Symbolics.COM multiple return values
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Apr 87 14:11:58 PDT
Received: from STONY-BROOK.SCRC.Symbolics.COM (TCP 30002424620) by MC.LCS.MIT.EDU 9 Apr 87 17:14:23 EDT
Received: from RIO-DE-JANEIRO.SCRC.Symbolics.COM by STONY-BROOK.SCRC.Symbolics.COM via CHAOS with CHAOS-MAIL id 112884; Thu 9-Apr-87 17:07:22 EDT
Date: Thu, 9 Apr 87 17:07 EDT
From: Kent M Pitman <KMP@STONY-BROOK.SCRC.Symbolics.COM>
Subject: multiple return values
To: jinx@GENEVA.AI.MIT.EDU, JAR@AI.AI.MIT.EDU,
adams%tekchips.tek.com@RELAY.CS.NET, ALAN@AI.AI.MIT.EDU,
willc%tekchips.tek.com@RELAY.CS.NET
cc: RRRS-AUTHORS@MC.LCS.MIT.EDU
In-Reply-To: <8703272347.AA03757@tekchips.TEK.COM>,
<8703301804.AA09557@geneva>
Message-ID: <870409170703.4.KMP@RIO-DE-JANEIRO.SCRC.Symbolics.COM>
The Common Lisp decision to allow additional return values to be silently
ignored when unreferenced is an interesting decision but it is certainly
not the only position that one can take.
The CL specification is muddied by having to explain that there are
different kinds of bound variable lists, some of which care how many
values are passed through and others of which do not. I would be sad if
Scheme went down this road.
I think that the Scheme community is in a unique position in being able
to see clearly the close relation between returning (invoking functions
which are continuations) and calling (invoking functions which are not
continuations). I think that in the long run it would be much more valuable
to the computer science community as a whole for us to explore the
consequences of that close relation than it would be for us to be
gratuitously compatible with CL.
I think that great advantage in terms of static and dynamic error
checking can come from explicitly specifying when these values are to be
returned and when not. I think that continuations which take optional
or rest arguments are fine as long as they're notated as such. This
protects people who want the error checking that comes from return
values being mismatched in number and who can afford to pay for that
checking. If we adopt a strategy which says that checking is illegal,
we're making it very hard for people to get checking.
I do agree with a subset of the worry that Alan expressed, though, which
is that (+ (F) 3) should work whether F is implemented by
(LAMBDA () 4)
or
(LAMBDA () (RETURN-VALUES 4)).
I don't think that:
(LAMBDA () (RETURN-VALUES 4 5))
needs to work, though. In fact, I think it should be permitted (and
encouraged) to signal an error. I think some syntactic sugar could
easily make this palatable; eg, (+ (VALUE 0 (F)) 3)... or better
still, (+ (G) 3) where G was a function defined to do what I really
meant to be doing.
∂09-Apr-87 1420 @MC.LCS.MIT.EDU:andy@hobbes.ads.ARPA readers & tokenizers
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Apr 87 14:20:47 PDT
Received: from grape.ads.ARPA (TCP 1200400070) by MC.LCS.MIT.EDU 9 Apr 87 17:16:11 EDT
Received: by hobbes.ads.arpa (3.2/SMI-3.2)
id AA09630; Thu, 9 Apr 87 14:11:51 PDT
Date: Thu, 9 Apr 87 14:11:51 PDT
From: andy@hobbes.ads.ARPA (Andy Cromarty)
Message-Id: <8704092111.AA09630@hobbes.ads.arpa>
To: rrrs-authors@mc.lcs.mit.edu
Subject: readers & tokenizers
One of the difficulties with conventional read tables is that
they become very dangerous in a "real" production software
environment, relying on lots of Scout's Honor programming
practices and usage restrictions. If you write one 10,000 line
component of a large system and I write another, there is a risk
that you will change the semantics of (READ) out from under me,
breaking my code in ways that I will find extremely difficult
to debug. To the extent that we are serious about having people
use Scheme outside the classroom, this is an important concern.
I have used many LISPs that lack both a user-modifiable reader and
reader "macros" -- in fact, I have written compilers using those LISPs
(including, of course, lexical and syntactic analysis) in a relatively
painless fashion. It merely requires good coding practices combined
with a little extra effort to build up the lexical analysis subsystem
yourself (really a fairly small number of additional functions). I
offer this as an "existence proof" of sorts to indicate that we don't
really *need* extra gook in the reader, and to suggest that we should
be careful about how and why we make it more complex.
I have no objection to an improved input system if it is stateless.
A trivial new function that would be useful is a (READ-LINE [PORT])
procedure that reads a sequence of characters terminated by NEWLINE
or EOF-OBJECT, whichever it encounters first, returning it as a string.
A slight extension of this capability would require you to provide
the termination character yourself, e.g. (READ-LINE CHAR [PORT]).
This can be further extended to take a list of termination characters
instead of one character (making it similar to the scanning and breaking
functions in SNOBOL), or perhaps a predicate procedure of one argument that
returns #T iff the character it is passed is a token terminator, viz.
(READ-TOKEN TERMINATOR?-PROC [PORT]). This permits you to perform
lexical analysis of an input stream in a quite straightforward fashion
without adding significantly to the complexity of the reader for the >90%
of the cases where you are just reading symbols, lists, and other objects
that the reader already handles well.
The advantage I see in such an approach is that all the state is tied
up in your predicate or your specific invocation of READ-LINE. There
thus is no risk of collisions between different modules, even if they
are interleaving reads on the same port. Further, it can be implemented
in a quite straightforward fashion.
One might object that this could be "inefficient." Such an argument
doesn't seem compelling on the face of it, first because a non-stateless
reader imposes risks that are significantly more costly than the loss
of a few cpu cycles, and second because if we take seriously the suggestion
that Scheme should be a useful systems programming language, then such
an approach will help ensure that implementors will be pressured into
improving the performance of those critical parts of the Scheme system
that usually are very slow in LISPs (i.e. readers).
I don't know that I want to call this a "proposal," but at least I
feel that the spirit of a proposal is there, i.e. that the reader
should be stateless if we can find an effective way to achieve that goal.
Finally, I would advocate one extension to the reader itself.
That is the inclusion of #+ and #-. We already have added these
to the ADS Scheme reader, because we found that it had a tremendous
impact on portability of code from one LISP environment to another.
Again, this sort of capability is critical for large development
efforts or for the production of commercial tools that are intended
to work in multiple LISP dialects. I further suggest that "scheme"
specifically be recognized by #+ and #- and that "#+scheme" be true
in R?RS Scheme.
asc
∂09-Apr-87 1638 @MC.LCS.MIT.EDU:bartley%home%ti-csl.csnet@RELAY.CS.NET number syntax
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Apr 87 16:38:43 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 9 Apr 87 18:47:11 EDT
Received: from relay2.cs.net by RELAY.CS.NET id af25165; 9 Apr 87 18:19 EDT
Received: from ti-csl by RELAY.CS.NET id ac00940; 9 Apr 87 18:17 AST
Received: from home (home.ARPA) by tilde id AA14513; Thu, 9 Apr 87 15:19:09 cst
Received: by home id AA23970; Thu, 9 Apr 87 16:19:28 cdt
Date: Thu, 9 Apr 87 16:19:28 cdt
From: David Bartley <bartley%home%ti-csl.csnet@RELAY.CS.NET>
Message-Id: <8704092119.AA23970@home>
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: number syntax
Before I make another proposal on number syntax, I'd like some
feedback on current practice.
Has anyone implemented exactness using a mechanism substantially
different from the one Kent Dybvig describes in his new book?
(Quoting his page 111: "In practice, the internal representation for
an exact quantity is as an integer or ratio, and the internal
representation for an inexact quantity is as a floating point number,
although other representations are possible." Also, "The exactness of
a complex numeric object depends on the exactness of its real and
imaginary parts.") How do people feel about this approach? Does this
fulfill the spirit of exactness? Does anyone want to pay for a more
orthogonal exactness attribute for numbers?
Is it permissible for an exact 3.5 to print (by default) as 7/2 or an
inexact 2 to print as 2.0?
Has anyone implemented the -1+2i or 5@7 syntax for complex numbers?
Is there strong resistance to Common Lisp's #c(-1 2) representation?
In general, is there anyone strongly opposed to the idea that Scheme
number representations should be made to look more like Common Lisp's?
--db--
∂09-Apr-87 1648 @MC.LCS.MIT.EDU:bartley%home%ti-csl.csnet@RELAY.CS.NET readers & tokenizers
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Apr 87 16:48:14 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 9 Apr 87 18:48:03 EDT
Received: from relay2.cs.net by RELAY.CS.NET id ac25167; 9 Apr 87 18:19 EDT
Received: from ti-csl by RELAY.CS.NET id ae00940; 9 Apr 87 18:17 AST
Received: from home (home.ARPA) by tilde id AA14868; Thu, 9 Apr 87 15:28:47 cst
Received: by home id AA24121; Thu, 9 Apr 87 16:29:05 cdt
Date: Thu, 9 Apr 87 16:29:05 cdt
From: David Bartley <bartley%home%ti-csl.csnet@RELAY.CS.NET>
Message-Id: <8704092129.AA24121@home>
To: JAR@MC.LCS.MIT.EDU
Cc: jinx%geneva.ai.mit.edu@RELAY.CS.NET,
bartley%home%ti-csl.csnet@RELAY.CS.NET, rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: Jonathan A Rees's message of Thu, 9 Apr 87 12:38:35 EDT
Subject: readers & tokenizers
> For things like this (the category also includes multiple values #1,
> hash tables, Chris's string-manipulation primitives, and other things I
> have mentioned before), we are really in the business of standardizing
> on interfaces to libraries of things that can be written portably but
> are often better not. We're not talking changes to the language, we're
> talking making life easier for those who use these features and people
> who read their code.
Perhaps we should discuss a more formal way to share libraries of
useful code (a "yellow pages"). Then we could concentrate our
standardization efforts on the library interface (modules and
environments again!) and other true language features.
∂09-Apr-87 1803 @MC.LCS.MIT.EDU:jinx@GENEVA.AI.MIT.EDU number syntax
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Apr 87 18:03:45 PDT
Received: from geneva (TCP 2206400372) by MC.LCS.MIT.EDU 9 Apr 87 20:49:10 EDT
Received: by GENEVA.AI.MIT.EDU; Thu, 9 Apr 87 19:11:01 est
Date: Thu, 9 Apr 87 19:11:01 est
From: jinx@GENEVA.AI.MIT.EDU (Guillermo J. Rozas)
Message-Id: <8704100011.AA22486@geneva>
To: bartley%home%ti-csl.csnet@RELAY.CS.NET
Cc: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: David Bartley's message of Thu, 9 Apr 87 16:19:28 cdt <8704092119.AA23970@home>
Subject: number syntax
Has anyone implemented exactness using a mechanism substantially
different from the one Kent Dybvig describes in his new book?
(Quoting his page 111: "In practice, the internal representation for
an exact quantity is as an integer or ratio, and the internal
representation for an inexact quantity is as a floating point number,
although other representations are possible." Also, "The exactness of
a complex numeric object depends on the exactness of its real and
imaginary parts.") How do people feel about this approach? Does this
fulfill the spirit of exactness? Does anyone want to pay for a more
orthogonal exactness attribute for numbers?
That is very much against the proposal. We have not implemented it at
MIT, but the original proposal is such that both exact and inexact
flonums are possible (and desirable), and similarly for the other
types. Although we have not implemented it, we have an implementation
in mind, and it is orthogonal: for each type of number, there is a bit
specifying whether it is exact or not.
Is it permissible for an exact 3.5 to print (by default) as 7/2 or an
inexact 2 to print as 2.0?
It depends on the format specification. For the explicit ones, there
should be no question. I think, however, that if the format is (HEUR)
it should print as #i2 .
Has anyone implemented the -1+2i or 5@7 syntax for complex numbers?
Is there strong resistance to Common Lisp's #c(-1 2) representation?
CPH has implemented the r↑3rs complex notation for MIT Scheme. Having the #c
notation should be optional. I don't think the syntax becomes
ambiguous if it is added, but there is no need for it.
In general, is there anyone strongly opposed to the idea that Scheme
number representations should be made to look more like Common Lisp's?
Not I, as long as it does not run counter to what the report already
states.
∂09-Apr-87 1848 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU yellow pages
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Apr 87 18:48:09 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 9 Apr 87 21:50:50 EDT
Date: Thu, 9 Apr 87 21:49:15 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: yellow pages
To: bartley%home%ti-csl.csnet@RELAY.CS.NET
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Thu 9 Apr 87 16:29:05 cdt from David Bartley <bartley%home%ti-csl.csnet at RELAY.CS.NET>
Message-ID: <182098.870409.JAR@AI.AI.MIT.EDU>
Date: Thu, 9 Apr 87 16:29:05 cdt
From: David Bartley <bartley%home%ti-csl.csnet at RELAY.CS.NET>
Perhaps we should discuss a more formal way to share libraries of
useful code (a "yellow pages"). Then we could concentrate our
standardization efforts on the library interface (modules and
environments again!) and other true language features.
I agree completely. I think the distinction would be very useful in
taking some of the heat out of our discussions, since people needn't be
as sensitive about things which have no impact on semantics (and
therefore no impact on implementation).
We really need to think in general about what the eventual documentary
outcome of our next meeting (or two) ought to be. I think a yellow
pages of some sort, clearly separated from a description of extensions
to the semantics, is definitely in order.
Jonathan.
∂09-Apr-87 1921 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU readers & tokenizers
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Apr 87 19:21:19 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 9 Apr 87 22:23:10 EDT
Date: Thu, 9 Apr 87 22:21:24 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: readers & tokenizers
To: andy@ADS.ARPA
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Thu 9 Apr 87 14:11:51 PDT from andy at hobbes.ads.ARPA (Andy Cromarty)
Message-ID: <182109.870409.JAR@AI.AI.MIT.EDU>
Date: Thu, 9 Apr 87 14:11:51 PDT
From: andy at hobbes.ads.ARPA (Andy Cromarty)
One of the difficulties with conventional read tables is that
they become very dangerous in a "real" production software
environment...
I have no objection to an improved input system if it is stateless.
...
Just for the record, I fell obliged to point out that T has a
parameterized reader (i.e. readtables), and at the same time it is
completely safe and stateless. There is no such thing as *READTABLE* in
T; the global default reader parameters are immutable. There is a
version of READ (called READ-OBJECT) which takes a read table as an
argument. READ extracts a read table out of the port being read from
and then calls READ-OBJECT. A port's readtable is initially the
standard readtable when the port is opened, but it can be set to be
something else after the port is opened; thus readtables are lexically
scoped. A user can create new readtables and mutate them (e.g. define a
read macro or alter the input radix), but the standard readtable is
immutable, so there's no way you can accidentally step on a readtable
that someone else will see.
I do not propose this for Scheme, but I thought you should know that
stateless doesn't mean you have to throw away the possibility of something
higher level than the scanner you suggest, or even read macros.
I think a function of the sort you propose would be fine, that's
basically the minimum I had in mind for a "tokenizer". We might
consider introducing "character sets" as in Icon (and MIT Scheme?? I
vaguely remember seeing something of the sort) to help make this go even
faster (since that's the point of the proposal). One procedure could
coerce a list of or predicate on characters to a character set, and then
the character set specifying the delimiters could be passed to READ-LINE
(actually READ-STRING is probably a better name).
Finally, I would advocate one extension to the reader itself.
That is the inclusion of #+ and #-. We already have added these
to the ADS Scheme reader, because we found that it had a tremendous
impact on portability of code from one LISP environment to another.
Again, this sort of capability is critical for large development
efforts or for the production of commercial tools that are intended
to work in multiple LISP dialects. I further suggest that "scheme"
specifically be recognized by #+ and #- and that "#+scheme" be true
in R?RS Scheme.
I have used read-time conditionalization in the past and have concluded
that it is not a good idea. If a language must have conditionalization,
it must have run-time semantics (although of course a compiler can
optimize it into load-time or compile-time, depending on what it knows
about the target system). The problem with read time conditionalization
is that it interacts extremely poorly with cross-compilation, static
code analysis, and macros.
What I always do is encapsulate implementation dependencies by defining
an interface, and then write multiple implementations of the same
interface. In my experience this leads to code that's much prettier,
more modular, AND more portable. Why won't this work for you?
Jonathan.
∂09-Apr-87 2348 @MC.LCS.MIT.EDU:andy@hobbes.ads.ARPA Re: readers & tokenizers
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Apr 87 23:48:02 PDT
Received: from grape.ads.ARPA (TCP 1200400070) by MC.LCS.MIT.EDU 10 Apr 87 02:46:39 EDT
Received: by hobbes.ads.arpa (3.2/SMI-3.2)
id AA10303; Thu, 9 Apr 87 23:41:40 PDT
Date: Thu, 9 Apr 87 23:41:40 PDT
From: andy@hobbes.ads.ARPA (Andy Cromarty)
Message-Id: <8704100641.AA10303@hobbes.ads.arpa>
To: JAR@AI.AI.MIT.EDU
Subject: Re: readers & tokenizers
Cc: andy%hobbes@ads.arpa, rrrs-authors@MC.LCS.MIT.EDU
Reply-To: andy@ADS.arpa
The T model, or something like it, seems to meet the criteria
I proposed for statelessness. What I would prefer to see us
avoid is the monolithic global model of read tables. T seems to
offer one nice way to do that, given your description.
I have used read-time conditionalization in the past and have concluded
that it is not a good idea. If a language must have conditionalization,
it must have run-time semantics....
What I always do is encapsulate implementation dependencies by defining
an interface, and then write multiple implementations of the same
interface. In my experience this leads to code that's much prettier,
more modular, AND more portable. Why won't this work for you?
In what I recall you guys at universities calling the "real world,"
we often don't have the luxury of writing all the code ourselves,
nor even of specifying it. One specific case I had in mind when
I wrote my note was a medium-sized (~25,000 lines of code) LISP
software tool written in Common LISP that we have been rendering
compatible with Scheme. (Note that I did not say "porting to Scheme"
-- it must remain fully compatible with the other LISPs in which it
executes, and given its size it is unthinkable to maintain separate
versions of the source as the software is constantly extended.)
Use of #+/#- reader conditionals have permitted us to add minimal
annotations to this software and make it compatible with Scheme.
Perhaps more importantly, the code *already* contains #+ and #-, because
it is "real" code written to run under 3 brands of Common Lisp, as well as
MacLISP and Franz, and we don't have the option of ripping all that
stuff out (nor the budget and wo/manpower to rip all the offending
conditionalization code out). The harsh reality was that being able to use
existing desirable software tools required us to support #+ and #-, because
historically that has been viewed as the "clean" way to conditionalize
other LISP code. (Note that this is not the same as arguing, for
example, that the Scheme reader should support InterLisp CLisp syntax
or something along those lines. It merely recognizes that the way code
has been written to make it portable is using #+ and #-, and if we want
to make it possible to run non-trivial non-Scheme LISP code in Scheme,
this may be the lowest-cost highest-payoff addition to Scheme's reader
that we could make.)
I disagree with the implication that Scheme has escaped run-time
conditionalization. I made a comment about this many months ago
when we discussed LOAD. If we really want to be able to view our
files as containing static code, then we cannot have a LOAD of the
sort we presently use, in my view; we need an INCLUDE instead, specifically
one that is utterly literal in its interpretation. That is, for files as
in
file1: (set! *closed-var 1)
(set! *closed-var 2)
file2: (let ((*closed-var '()))
(if (read)
(include "file1"))
*closed-var)
then "loading" or "executing" file2 would be identical to executing
(let ((*closed-var '()))
(if (read)
(set! *closed-var 1)
(set! *closed-var 2))
*closed-var)
The use of LOAD introduces some fascinating difficulties into
the sort of static analysis of code you wish to perform; for
example consider "loading or executing" file2, with contents as per
file1: (set! foo (lambda () (write 'goodbye)(newline)))
file2: (define foo (lambda () (write 'hello)(newline)))
(if (read)
(load "file1"))
(foo)
The extension to problems with macros (especially if we can redefine
IF, for example -- which I advocate permitting, BTW), is equivalently
problematic, or more so. The point is that we already have introduced
constructs that render static analysis difficult or meaningless, even
where there might have been cleaner alternatives (INCLUDE instead of
LOAD, say). I would not find an argument that this is poor use of LOAD
very interesting, since these (ab)uses of LOAD seem to me to be very much
in the spirit of dynamic-scoping-of-the-execution-environment that was
precisely the reason LOAD was defined the way it was in R3RS, at least
according to my recollection of the discussion.
I also would add that, although we did create additional primitives for
managing a sort of "features list" in ADS Scheme, there is no need to do this
if you wish to have a Scheme that supports #+scheme and yet remains
susceptible to static analysis. If the user may not change the "features
list," then the compiler always can know that #+scheme can be ignored and
that #-scheme means "the following expression reliably will be discarded."
The same static interpretation rules can hold for other #+/#- "features." I
see no problems for static analysis in this case.
Regards, asc
∂10-Apr-87 0734 @MC.LCS.MIT.EDU:jmiller@MEPHISTOPHELES.AI.MIT.EDU yellow pages
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 10 Apr 87 07:34:45 PDT
Received: from mephisto (TCP 2206400250) by MC.LCS.MIT.EDU 10 Apr 87 10:37:23 EDT
Received: by MEPHISTOPHELES.AI.MIT.EDU; Fri, 10 Apr 87 10:33:31 edt
Date: Fri, 10 Apr 87 10:33:31 edt
From: jmiller@MEPHISTOPHELES.AI.MIT.EDU (Jim Miller)
Message-Id: <8704101433.AA00738@mephisto>
To: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: Jonathan A Rees's message of Thu, 9 Apr 87 21:49:15 EDT
Subject: yellow pages
D'Accord! I personally feel that the highest and simplest item on the
agenda should be an agreement on a STANDARD way to guarantee in ALL
implementations that a program written using all and only the features
in R↑nS will run. We discussed and rejected an attempt to work on
this just before publication of the report because of time
constraints.
This means, essentially, some standardized way to wrap code indicating
that the R↑nS syntax and reader are to be used. Once we have this, we
can actually begin to exchange our code with confidence that it will
work as intended at the recipient's end -- which simply isn't true
today without a wizard as the receiver.
--Jim
∂10-Apr-87 0944 @MC.LCS.MIT.EDU:bartley%home%ti-csl.csnet@RELAY.CS.NET macros
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 10 Apr 87 09:44:39 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 10 Apr 87 12:20:11 EDT
Received: from relay2.cs.net by RELAY.CS.NET id ac03508; 10 Apr 87 12:06 EDT
Received: from ti-csl by RELAY.CS.NET id ae06442; 10 Apr 87 12:02 AST
Received: from home (home.ARPA) by tilde id AA04458; Fri, 10 Apr 87 09:28:07 cst
Received: by home id AA06276; Fri, 10 Apr 87 10:26:31 cdt
Date: Fri, 10 Apr 87 10:26:31 cdt
From: David Bartley <bartley%home%ti-csl.csnet@RELAY.CS.NET>
Message-Id: <8704101526.AA06276@home>
To: RRRS-Authors@MC.LCS.MIT.EDU
Cc: Bartley%home%ti-csl.csnet@RELAY.CS.NET
Subject: macros
I confess that I find the macro problem to be one of the hairiest yet
one of the most important ones we face. I'm not yet ready to comment
on Jonathan's proposal because it differs so much from my current
approach that I need to re-examine my assumptions and biases.
Before debating the specific merits of any particular proposal,
perhaps we should discuss some basic issues first and work our way up
from there. I'd also like to get a feel for what kind of an
agreement, and how much of one, we should be working towards.
My list of basic issues regarding macros includes...
-- One or two namespaces or a hybrid?
How do we deal with the fact that both macro/syntax keywords and
variables are drawn from the same set of identifiers? I think
lambda-bound names should take precedence over keywords, but should
LET-SYNTAX-bound keywords take precedence over lambda-bound names of
an outer level?
What about top-level DEFINE? Does (DEFINE X ...), like (LAMBDA (X) ...),
take precedence over keywords?
What do we do with keywords that appear in places where a keyword is not
expected, like (+ IF AND), and thus appear to be variable references?
Should we embed syntax tables in the lexical environment or keep them
separate?
For those who might prefer a single namespace: should INLINE and other
optimizations be encompassed? How about named constants like PI and
EOF-OBJECT?
-- Mutable or immutable syntax tables?
It seems excessively cumbersome to wrap a LET-SYNTAX around a file or
collection of files.
Why should extending the syntax differ from the style of incrementally
adding definitions with DEFINE?
Perhaps INCLUDE is a better answer than LOAD.
-- Solution of capture problems
Eugene and others have addressed this.
-- Must a macro expand into an expression--i.e. not a keyword?
Suppose an (*IF*) macro expands into the identifier IF. Then how does
one interpret the result of the expansion ((*if*) a b c) ==> (if a b c)?
-- Which syntax table is used by various REPLs, LOAD, COMPILE-FILE, etc.?
-- What about macros that expand into multiple definitions?
-- Should a macro writer have the ability to make absolute (that is,
"qualified") references?
-- Should COMPILE-FILE execute any of the forms it compiles?
-- Can we avoid EVAL-WHEN ?
* * *
How much agreement must we reach to be useful?
-- basic principles?
Deciding how identifiers in programs are resolved as references is a
good start.
-- a syntax for >using< macros?
We're probably wedded to the current syntax that can only distinguish
macros from applications by recognizing keywords.
-- a syntax for >defining< macros?
A portable way for defining "global" macros would satisfy many users
and may be easier to reach agreement on than dealing more deeply with
scoping issues. On the other hand, many of us will probably proceed
to implement lexically scoped syntax definitions.
-- user-friendly syntax for defining macros
Since user-friendly macro definition capabilities tend to have
restricted capabilities, this will probably always be an extension
beyond more primitive capabilities. Perhaps this is a candidate for
the "yellow pages."
What is a reasonable goal for us to work towards?
--db--
∂10-Apr-87 1000 @MC.LCS.MIT.EDU:gls@Think.COM number syntax
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 10 Apr 87 10:00:13 PDT
Received: from Think.COM (TCP 1201000006) by MC.LCS.MIT.EDU 10 Apr 87 12:46:18 EDT
Received: from godot.think.com by Think.COM; Fri, 10 Apr 87 12:42:01 EST
Received: from desiderius by godot.think.com via CHAOS; Fri, 10 Apr 87 12:41:55 EST
Date: Fri, 10 Apr 87 11:42 EST
From: Guy Steele <gls@Think.COM>
Subject: number syntax
To: bartley%home%ti-csl.csnet@relay.cs.net, rrrs-authors@mc.lcs.mit.edu
Cc: gls@think.com
In-Reply-To: <8704092119.AA23970@home>
Message-Id: <870410114254.2.GLS@DESIDERIUS.THINK.COM>
Date: Thu, 9 Apr 87 16:19:28 cdt
From: David Bartley <bartley%home%ti-csl.csnet@relay.cs.net>
Has anyone implemented the -1+2i or 5@7 syntax for complex numbers?
Is there strong resistance to Common Lisp's #c(-1 2) representation?
Actually, I think the #C(1 2) notation is really awful. It was the result
of a compromise--some persons did not want to have to implement hairier
token parsing for complex numbers. Much of the motivation for the notion
of "potential numbers" was to leave the path open for Common Lisp eventually
to adopt such a notation as -1+2i.
--Guy
∂10-Apr-87 1238 @MC.LCS.MIT.EDU:CPH@AI.AI.MIT.EDU number syntax
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 10 Apr 87 12:38:05 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 10 Apr 87 15:41:03 EDT
Date: Fri, 10 Apr 87 15:39:27 EDT
From: Chris Hanson <CPH@AI.AI.MIT.EDU>
Subject: number syntax
To: bartley%home%ti-csl.csnet@RELAY.CS.NET
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Thu 9 Apr 87 16:19:28 cdt from David Bartley <bartley%home%ti-csl.csnet at RELAY.CS.NET>
Message-ID: <182630.870410.CPH@AI.AI.MIT.EDU>
Date: Thu, 9 Apr 87 16:19:28 cdt
From: David Bartley <bartley%home%ti-csl.csnet at RELAY.CS.NET>
Has anyone implemented exactness using a mechanism substantially
different from the one Kent Dybvig describes in his new book?
(Quoting his page 111: "In practice, the internal representation for
an exact quantity is as an integer or ratio, and the internal
representation for an inexact quantity is as a floating point number,
although other representations are possible." Also, "The exactness of
a complex numeric object depends on the exactness of its real and
imaginary parts.") How do people feel about this approach? Does this
fulfill the spirit of exactness? Does anyone want to pay for a more
orthogonal exactness attribute for numbers?
Is it permissible for an exact 3.5 to print (by default) as 7/2 or an
inexact 2 to print as 2.0?
We have not yet implemented exactness.
Has anyone implemented the -1+2i or 5@7 syntax for complex numbers?
Is there strong resistance to Common Lisp's #c(-1 2) representation?
We have implemented this syntax. I don't have strong feelings about this.
∂10-Apr-87 1637 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU macros
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 10 Apr 87 16:36:53 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 10 Apr 87 18:48:42 EDT
Date: Fri, 10 Apr 87 18:46:55 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: macros
To: bartley%home%ti-csl.csnet@RELAY.CS.NET
cc: RRRS-Authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Fri 10 Apr 87 10:26:31 cdt from David Bartley <bartley%home%ti-csl.csnet at RELAY.CS.NET>
Message-ID: <182704.870410.JAR@AI.AI.MIT.EDU>
Date: Fri, 10 Apr 87 10:26:31 cdt
From: David Bartley <bartley%home%ti-csl.csnet at RELAY.CS.NET>
-- One or two namespaces or a hybrid?
I think this could coherently go either way. T switched from one
namespace to two after a year or so in order to be compatible with MIT
Scheme. I'll flame about this later if need be.
How do we deal with the fact that both macro/syntax keywords and
variables are drawn from the same set of identifiers? I think
lambda-bound names should take precedence over keywords, but should
LET-SYNTAX-bound keywords take precedence over lambda-bound names of
an outer level?
For symmetry, the answer must be yes.
What about top-level DEFINE? Does (DEFINE X ...), like (LAMBDA (X) ...),
take precedence over keywords?
A harder question. The definition could be an error if X has a keyword
binding in that lexical contour.
What do we do with keywords that appear in places where a keyword is not
expected, like (+ IF AND), and thus appear to be variable references?
Error.
Should we embed syntax tables in the lexical environment or keep them
separate?
This is practically the same as the one versus two namespace question.
I don't know what distinction you're trying to make here.
For those who might prefer a single namespace: should INLINE and other
optimizations be encompassed? How about named constants like PI and
EOF-OBJECT?
No. No.
-- Mutable or immutable syntax tables?
Immutable. Otherwise you get all sorts of obscure bugs and disgusting
semantic questions. The semantic questions remain if an STF (i.e.
expander) can detect or produce side-effects, but every little bit of
sanity helps.
It seems excessively cumbersome to wrap a LET-SYNTAX around a file or
collection of files.
Immutable does not imply LET-SYNTAX. A DEFINE-MACRO-esque for could
work just as well. Simply make DEFINE-MACRO part of the syntax of a
<program> (or perhaps even a <body>. The scope of the macro then starts
at the point the DEFINE-MACRO occurs, and ends at the end of the file,
<program>, or <body>.
Why should extending the syntax differ from the style of incrementally
adding definitions with DEFINE?
Maybe it shouldn't. The main difference is that DEFINE's can be
mutually recursive, whereas you run into all sorts of nasty problems if
you try to make the scope a macro definition include any text that
precedes it. (This is because you have to expand macros in order to
determine whether or not a macro definition is present in the first
place.)
Perhaps INCLUDE is a better answer than LOAD.
Perhaps. This seems like an independent question, however, more
properly discussed under the heading of "modules".
-- Solution of capture problems
Eugene and others have addressed this.
What is the computational complexity of the hygienic expansion
algorithm, by the way?
-- Must a macro expand into an expression--i.e. not a keyword?
Yes.
-- Which syntax table is used by various REPLs, LOAD, COMPILE-FILE, etc.?
The report doesn't talk about REPL's. The syntax table for files should
be the standard one (i.e. the one with only the official bindings in it,
no user bindings). If the file wants to use nonstandard syntax it must
explicitly request them using a DEFINE-MACRO or USE-SYNTAX-TABLE form
which is effective only for that file.
For controlling the REPL's syntax table, you could have something like
(set-current-syntax-table ...). This should have no effect on which
macros are seen by LOAD, however.
-- What about macros that expand into multiple definitions?
No problem: the expansion can be (begin (define ...) (define ...)).
BEGIN behaves like Maclisp's (PROGN 'COMPILE ...).
-- Should a macro writer have the ability to make absolute (that is,
"qualified") references?
I don't see what the alternative is. Otherwise there's no way to write
things like QUASIQUOTE.
-- Should COMPILE-FILE execute any of the forms it compiles?
Yes, the right-hand side of a DEFINE-MACRO or USE-SYNTAX-TABLE, and the
body of an (AT-PREPROCESS-TIME ...).
-- Can we avoid EVAL-WHEN ?
Yes, but we might need something like (AT-PREPROCESS-TIME ...) in order
to make definitions available to expansion procedures.
* * *
How much agreement must we reach to be useful?
-- basic principles?
Deciding how identifiers in programs are resolved as references is a
good start.
The R↑3 report hedges this question, and we may be able to persist in
this.
-- a syntax for >using< macros?
Necessary. There's not much point in defining a macro if you can't use
it.
We're probably wedded to the current syntax that can only distinguish
macros from applications by recognizing keywords.
This is not a problem.
-- a syntax for >defining< macros?
A portable way for defining "global" macros would satisfy many users
and may be easier to reach agreement on than dealing more deeply with
scoping issues. On the other hand, many of us will probably proceed
to implement lexically scoped syntax definitions.
I think scoped macros are absolutely essential. Otherwise there's
absolutely no hope of writing portable code, as Jim Miller has reminded
us.
-- user-friendly syntax for defining macros
Since user-friendly macro definition capabilities tend to have
restricted capabilities, this will probably always be an extension
beyond more primitive capabilities. Perhaps this is a candidate for
the "yellow pages."
Please define user-friendly. I certainly would hope that something that
complicated could be defined as a yellow-pages layer. Obviously no one
would would want to actually write macros using only the low-level
primitives in my proposal. I have implemented something a bit higher
level which, like EXTEND-SYNTAX, uses an input pattern, but unlike
EXTEND-SYNTAX doesn't use an output pattern. But it's not obvious that
everyone will like either my pattern language or Gene's, so I advocate
making the lower-level hooks available as well.
Next time try to come up with some challenging questions.... 8*&
Jonathan
∂10-Apr-87 1646 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU meeting dates/times/places
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 10 Apr 87 16:46:43 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 10 Apr 87 19:18:21 EDT
Date: Fri, 10 Apr 87 19:17:09 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: meeting dates/times/places
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <182720.870410.JAR@AI.AI.MIT.EDU>
KMP's suggestion that we meet over the weekend of 27-28 June was
seconded by Jinx and assented to by Will. The weekend is fine with me
too. I don't think it will be difficult to find a reasonable room in
which to meet on a weekend, but I'll officially arrange for a room if
possible. Getting into Tech Square is no problem; the lobby doors on
each floor will be locked, but we can probably work something out
(doorbell, a room near a door, or a room somewhere else on the MIT
campus).
If I hear no objections to 27-28 within the next couple weeks, I'll start
looking into this more seriously. Then we can start thinking about what
time of day we want to start on Saturday and Sunday.
****** Let me know if think you might attend so I can determine the optimal
****** room size.
KMP et al. -- is Monday morning a possibilty? If so we could consider
meeting Sunday all day and Monday morning. What time of day will the
X3J13 subcommittees start meeting?
Jonathan.
∂10-Apr-87 1653 @MC.LCS.MIT.EDU:bartley%home%ti-csl.csnet@RELAY.CS.NET number syntax
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 10 Apr 87 16:53:34 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 10 Apr 87 19:37:25 EDT
Received: from relay2.cs.net by RELAY.CS.NET id ae15584; 10 Apr 87 19:22 EDT
Received: from ti-csl by RELAY.CS.NET id al08455; 10 Apr 87 19:19 AST
Received: from home (home.ARPA) by tilde id AA05738; Fri, 10 Apr 87 17:15:01 cdt
Received: by home id AA13566; Fri, 10 Apr 87 17:13:35 cdt
Date: Fri, 10 Apr 87 17:13:35 cdt
From: David Bartley <bartley%home%ti-csl.csnet@RELAY.CS.NET>
Message-Id: <8704102213.AA13566@home>
To: jinx%geneva.ai.mit.edu@RELAY.CS.NET
Cc: bartley%home%ti-csl.csnet@RELAY.CS.NET, rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: "Guillermo J. Rozas"'s message of Thu, 9 Apr 87 19:11:01 est
Subject: number syntax
> [Bartley:]
> Is it permissible for an exact 3.5 to print (by default) as 7/2 or an
> inexact 2 to print as 2.0?
>
> [Jinx:]
> It depends on the format specification. For the explicit ones, there
> should be no question. I think, however, that if the format is (HEUR)
> it should print as #i2 .
I agree that an inexact integer 2 >should< print as #i2, but is it
permissible to print it as 2.0?
Likewise, is it permissible for the reader to read 2.0 as an inexact
integer 2? May it read #e3.5 as the rational number 7/2 rather than
an "exact" float (whatever that may be)? What I'm leading to is that
any discussion about how to represent numbers that are read in without
benefit of an explicit exactness indicator will have to deal with the
issue of alternative ways to represent exactness.
BTW--How do those that believe in keeping exactness orthogonal to numeric
subtype plan to deal with "exact" reals that are not rational?
--db--
∂10-Apr-87 2103 @MC.LCS.MIT.EDU:willc%tekchips.tek.com@RELAY.CS.NET Re: number syntax
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 10 Apr 87 21:03:06 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 10 Apr 87 23:56:13 EDT
Received: from relay2.cs.net by RELAY.CS.NET id aa19043; 10 Apr 87 23:48 EDT
Received: from tektronix.tek.com by RELAY.CS.NET id ae09755; 10 Apr 87 23:41 AST
Received: by tektronix.TEK.COM (5.51/6.20)
id AA21241; Fri, 10 Apr 87 16:19:49 PDT
Received: by tekchips.TEK.COM (5.31/6.19)
id AA07578; Fri, 10 Apr 87 16:18:13 PDT
Message-Id: <8704102318.AA07578@tekchips.TEK.COM>
To: rrrs-authors@MC.LCS.MIT.EDU
Cc: bartley%home%ti-csl.csnet@RELAY.CS.NET,
willc%tekchips.tek.com@RELAY.CS.NET, jinx%geneva.ai.mit.edu@RELAY.CS.NET
Subject: Re: number syntax
In-Reply-To: Your message of Thu, 9 Apr 87 19:11:01 est.
<8704100011.AA22486@geneva>
Date: 10 Apr 87 16:18:11 PDT (Fri)
From: willc%tekchips.tek.com@RELAY.CS.NET
Bartley:
Has anyone implemented exactness using a mechanism substantially
different from the one Kent Dybvig describes in his new book?
(Quoting his page 111: "In practice, the internal representation for
an exact quantity is as an integer or ratio, and the internal
representation for an inexact quantity is as a floating point number,
although other representations are possible." Also, "The exactness of
a complex numeric object depends on the exactness of its real and
imaginary parts.") How do people feel about this approach? Does this
fulfill the spirit of exactness? Does anyone want to pay for a more
orthogonal exactness attribute for numbers?
The passage quoted says "integer" and "ratio" and "floating point number"
when the proper R3RS terminology is "fixnum or bignum" and "ratnum" and
"flonum". I feel like I'm being overly picky by pointing this out, since
all of these terms (except integer) are implementation-dependent and the
book describes only Chez Scheme, but Jinx's response shows why precision
is important in words as well as numbers.
Jinx:
That is very much against the proposal. We have not implemented it at
MIT, but the original proposal is such that both exact and inexact
flonums are possible (and desirable), and similarly for the other
types. Although we have not implemented it, we have an implementation
in mind, and it is orthogonal: for each type of number, there is a bit
specifying whether it is exact or not.
I have to disagree with Jinx's first two sentences above. R3RS makes
clear that exact reals and inexact integers are both possible and
desirable, but it says nothing at all about exact flonums and inexact
fixnums. Though their semantics are poorly defined in R3RS, "exact" and
"inexact" are intended to be significant concepts in the language. By
contrast, "flonum" and "fixnum" are names for internal representation
strategies that have no standing in the language. Thus "exact flonum"
is at best an implementation concept, and at worst a category error.
Suppose I implement Scheme (without complex numbers, to keep things
simpler) by representing all numbers as ratnums, augmented by a bit
that tells whether the number is exact or inexact. This is perfectly
legitimate, right? Now suppose people complain about its performance
on certain numerical programs, and my investigations show that the
reason for the poor performance is that it takes too long to add and
to multiply inexact reals. Suppose I tweak my implementation by
arranging for inexact reals to be represented as flonums, augmented
by a bit that tells whether the number is exact or inexact. That's
a perfectly legitimate efficiency hack, right? Suppose I then notice
that the exactness bit for a real represented as a flonum always says
that the real is inexact, because I'm still representing exact reals
as ratnums. So I flush the exactness bit for reals represented as
flonums, because the fact that the real is represented as a flonum
implies that it's inexact. I would be silly not to, right?
If I then add two more efficiency hacks by representing exact integers
as bignums, and by representing small exact integers as fixnums, I
arrive at an implementation similar to that hinted at by Dybvig's book.
Not only do I see nothing wrong with this, it seems the obvious way to
go. In terms of Jinx's remarks, you can be orthogonal at the language
level without being orthogonal at the implementation level.
I would oppose any attempt to mandate particular implementation strategies.
Cadence Research and TI and Tektronix have no more right to impose their
favorite implementation strategy on MIT than MIT has to impose its
favorite strategy on us.
Bartley:
Is it permissible for an exact 3.5 to print (by default) as 7/2 or an
inexact 2 to print as 2.0?
Fine with me. I'm more concerned about whether "7/2" reads as an exact
3.5 and whether "2.0" reads as an inexact 2. The examples in section 6.8
of R3RS are sufficient to imply that "1" and "5" read as exact integers,
assuming that the same reader is used to read both programs and data.
Peace, Will
∂11-Apr-87 0814 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU towards an agenda - yeller pages
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 11 Apr 87 08:14:24 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 11 Apr 87 11:16:22 EDT
Date: Sat, 11 Apr 87 11:15:02 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: towards an agenda - yeller pages
To: bartley%home%ti-csl.csnet@RELAY.CS.NET
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Wed 8 Apr 87 15:39:02 cdt from David Bartley <bartley%home%ti-csl.csnet at RELAY.CS.NET>
Message-ID: <183040.870411.JAR@AI.AI.MIT.EDU>
I nominate the general topic of "yellow pages" for the agenda, with the
following subtopics:
- what the yellow pages are for
- string manipulation
- bitwise logical operators
- byte vectors (or something a little more general)
- hash tables
- I/O extensions (e.g. READ-LINE, READ-STRING, maybe a simple FORMAT)
- sets ?
- arrays ?
Some thoughts:
By yellow pages I mean a collection of facilities that are implementable
(although not necessarily implemented) in terms of things that are
already in the language. A description of a yellow pages facility should
be accompanied by a sample implementation for two reasons: (1) as a
substitute for a formal specification (which are hard to write); (2) as
an existence proof that the facility is implementable. The informal
description should specify what behavior of the sample implementation is
accidental and what's not (e.g. (PAIR? a-hash-table) might be true in a
sample implementation, but not part of the spec).
If we can figure out modules (packages, whatever) then we might even be
able to get away with keeping these things out of the global
namespace.
If we have an official notion of yellow-page, then we should be able to
demote some of the things that are currently in the main part of the
report (MEMQ, EQUAL?, VECTOR-FILL!). In addition, if we can agree on
macros, most of the derived expression types (with the possible
exception of BEGIN and LETREC) can be similary demoted.
I don't think I like the term "yellow page", but that's another story.
- Jonathan
∂12-Apr-87 1158 @MC.LCS.MIT.EDU,@MIT-MULTICS.ARPA:LISP@BROWNVM.BITNET Scheme85 interpreter from Indiana...
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 12 Apr 87 11:58:25 PDT
Received: from MIT-MULTICS.ARPA (TCP 1200000006) by MC.LCS.MIT.EDU 12 Apr 87 14:39:35 EDT
Received: from BROWNVM(MAILER) by MITVMA (Mailer X1.23) id 9156;
Sun, 12 Apr 87 14:32:12 EDT
Received: by BROWNVM (Mailer X1.23) id 9090; Sun, 12 Apr 87 14:34:44 EDT
Date: Sun, 12 Apr 87 14:30:13 EDT
From: David G. Durand <LISP@BROWNVM>
To: SCHEME@MC.LCS.MIT.EDU
Subject: Scheme85 interpreter from Indiana...
I was interested in ftp-ing the scheme85 source, but the routing tables used on
bitnet seem to be rather old, and we have no way of getting to your node. If
you could send me some mail maybe we can figure something out.
Thanks much,
David G. Durand (LISP@BROWMVM.BITNET (or something like that))
∂12-Apr-87 1724 @MC.LCS.MIT.EDU:harris%hplwhh@hplabs.HP.COM Re: number syntax
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 12 Apr 87 17:24:20 PDT
Received: from hplabs.HP.COM (TCP 30001235012) by MC.LCS.MIT.EDU 12 Apr 87 20:24:38 EDT
Received: from hplms1 by hplabs.HP.COM with TCP ; Sun, 12 Apr 87 16:20:01 pst
Received: from hplwhh (hplwhh) by hplms1; Sun, 12 Apr 87 16:19:39 pst
Return-Path: <harris@hplwhh>
Received: by hplwhh ; Sun, 12 Apr 87 17:19:23 pdt
From: Warren Harris <harris%hplwhh@hplabs.HP.COM>
Message-Id: <8704130019.AA04702@hplwhh>
To: jinx@geneva.ai.mit.edu, bartley%home%ti-csl.csnet@relay.cs.net
Cc: rrrs-authors@mc.lcs.mit.edu
X-Mailer: mh
Subject: Re: number syntax
In-Reply-To: Your message of 10 Apr 87 16:18:11 PDT (Fri).
<8704102318.AA07578@tekchips.TEK.COM>
Date: Sun, 12 Apr 87 16:19:17 PST
> ... the original proposal is such that both exact and inexact
> flonums are possible (and desirable), and similarly for the other
> types. Although we have not implemented it, we have an implementation
> in mind, and it is orthogonal: for each type of number, there is a bit
> specifying whether it is exact or not.
In the presence of an exactness indicator bit, I would be all for adding
an exactness indicator to number syntax. This would allow the user to
explicitly specify whether a number is exact or inexact, independent
of its type. For example, one could use:
-3.14, 7/8, 2+7i,
to mean an exact quantities, and:
~-3.14, ~7/8, ~2+7i
to mean inexact quantities. (I use tilde to indicate "approximately" as
opposed to "not" like in C).
This explicit notation would allow exactness to be preserved by coersion
operators:
(float ~7/2) => ~3.5
as well as removing ambiguities from operations such as:
(sqrt 4) => 2
(sqrt ~4) => ~2
(sqrt 4.0) => 2.0 ; this would have been considered inexact
; if all flonums were inexact
(sqrt 3) => ~1.7320508075688772 ; finite precision
(sqrt -4) => 0+2i ; this might have been considered inexact too
∂12-Apr-87 2125 @MC.LCS.MIT.EDU:wand%corwin.ccs.northeastern.edu@RELAY.CS.NET Re: meeting dates/times/places
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 12 Apr 87 21:25:43 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 13 Apr 87 00:26:48 EDT
Received: from relay2.cs.net by RELAY.CS.NET id af12757; 13 Apr 87 0:20 EDT
Received: from northeastern.edu by RELAY.CS.NET id ag20908; 13 Apr 87 0:17 AST
Received: from corwin.ccs.northeastern.edu by
nuhub.acs.northeastern.edu; Sun, 12 Apr 87 23:46 EST
Received: by corwin.CCS.Northeastern.EDU (5.51/5.17)
id AA08253; Sun, 12 Apr 87 22:36:39 AST
Date: Sun, 12 Apr 87 22:36:39 AST
From: wand%corwin.ccs.northeastern.edu@RELAY.CS.NET
To: JAR@MC.LCS.MIT.EDU, rrrs-authors@MC.LCS.MIT.EDU
Subject: Re: meeting dates/times/places
I would prefer not meeting on Saturday, if it is at all possible --Mitch
∂13-Apr-87 0951 @MC.LCS.MIT.EDU:larus@paris.Berkeley.EDU Scheme programs
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 13 Apr 87 09:51:35 PDT
Received: from paris.Berkeley.EDU (TCP 20010113056) by MC.LCS.MIT.EDU 13 Apr 87 12:49:19 EDT
Received: by paris.Berkeley.EDU (3.2/1.22)
id AA00188; Mon, 13 Apr 87 09:45:15 PDT
From: larus@paris.Berkeley.EDU (James Larus)
Message-Id: <8704131645.AA00188@paris.Berkeley.EDU>
To: scheme@mc.lcs.mit.edu
Cc: Jonathan A Rees <JAR@ai.ai.mit.edu>
Subject: Scheme programs
Date: Mon, 13 Apr 87 09:45:12 PDT
I'm sure that this question has been asked before (in fact, I
may have asked it a while ago), but I'll ask again.
I am looking for some moderate-sized (< 2,000 lines) Scheme
programs that I can use as input for a program restructurer that I am
writing. I would prefer programs that actually solve a definite
problem and that are not IO bound.
If you know of such a program and are willing to share it,
please send me some mail describing it.
Thanks,
/Jim
∂13-Apr-87 1346 @MC.LCS.MIT.EDU:cth@iucs.cs.indiana.edu Pattern matching, not optional arguments
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 13 Apr 87 13:45:50 PDT
Received: from iucs.cs.indiana.edu (TCP 30003147315) by MC.LCS.MIT.EDU 13 Apr 87 16:23:55 EDT
Date: Mon, 13 Apr 87 15:19:27 est
From: Chris Haynes <cth@iucs.cs.indiana.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: Pattern matching, not optional arguments
RPG: If the strategy is to be able to pass an arbitrary number of arguments,
then a syntax that binds one variable to all of them following by a
pretty destructuring bind of some sort is much better than a
syntax that mixes required with &rest (as Jonathan suggested).
JAR: I agree. In my experience, pattern-matching languages seem to have an
inevitable tendency to become baroque and disgusting. But let's not
stop looking for a decent one.
Me too. Our experience at Indiana is that a relatively simple match
facility goes a long long way. It does not need to complicate the
rest of the language. On the contrary, I think it eliminates any
justification for making lambda baroque and disgusting. Please, let's
make an honest attempt to standardize on a matching facility first,
and only then decide if their is sufficient justification to corrupt
the jewel of Scheme. Given match, we may even be able to polish our
jewel by relegating the "." rest feature to optional or discarded
status.
To fuel the debate, which I hope will have matured by the time of our
next meeting, here is documentation for a match facility that I've
enjoyed using.
-----------------------------
(match <exp> (<pattern> <body> ...) ...)
<pattern> ::= <variable>
| <number> | <string> | (quote <object>)
| (vector <pattern> ...)
| (? <predicate> <pattern>)
| (<pattern> ...)
| (<pattern> <pattern> ... . <pattern>)
Match is a fairly general pattern matching and destructuring facility. <exp>
is evaluated and its value is matched against the <pattern>s in order until a
matching pattern is found. An error is signaled if no pattern matches. When
a match is found, the value of <exp> is destructured with the variables in
the matching pattern bound to the corresponding components of <exp>'s value.
The <body> expressions of the matching pair are then evaluated in an
environment formed by extending the environment of the match expression with
these new bindings. The value of the last <body> expression is returned as
the value of the match expression.
The symbols QUOTE, VECTOR and ? are reserved in patterns to identify
literals, vectors and predicate tests. Numbers, strings and
quoted literal <object>s must be EQUAL? to corresponding components of
<exp>s value, or the pattern fails. <predicate> expressions should evaluate
to unary functions that are applied to the corresponding component of <exp>s
value when matching of the ? pattern is attempted. If the predicate returns
false, the pattern fails. Otherwise, the value applied to the predicate is
matched against the pattern following the predicate.
(match '(2 . 3) ((a . b) (* a b))) ==> 6
(match '(1 2) ((a) a) ((a b) (+ a b)) (c c)) ==> 3
(match (list 33 "string" (vector 1 2))
((33 "string" (vector a b)) (cons a b))) ==> (1 . 2)
(let ((num 3))
(match (cons 'x 4)
(((? (lambda (v) (or (symbol? v) (and (number? v) (= v num))))
c)
. (? number? d)) (list c d)))) ==> (x 4)
(match '(bar 3 4 5)
(('foo x y) (cons x y))
(('bar x y . z) (list x y z))
(else (error "didn't match: " else))) ==> (3 4 5)
-----------------------------
The most questionable feature of this proposal is the predicate
mechanism. I like it, but some others here don't. I'd like to have
others opinions, and would not mind if this feature were dropped.
A more significant issue is how to distinguish literal symbols from
pattern variables. Scheme84 currently had an experimental match
facility that is similar to that above, but without a predicate
mechanism, with an optional else clause (rather than the ELSE variable
hack used above), and with a required list of pattern variables that
eliminated the need for literal quoting. For example, in the current
version of Scheme84 the last example above would have required the pattern
variable list (x y z):
(match '(bar 3 4 . 5) (x y z)
((foo x y) (cons x y))
((bar x y . z) (list x y z))
(else (error "No match"))) ==> (3 4 5)
We found that remembering to update the list of pattern variables when
patterns were changed is a nuisance. Also, the quote mechanism seems
more natural, simpler and more expressive than the pattern variable
list, so we no longer favor the pattern list approach.
I'd be quite happy if there were no other matching or destructuring
facility. In the absense of a multiple value mechanism, I'd favor a
destructuring option for LET, e.g. (let (((x y) (cons 1 2))) ...);
however multiple values eliminates much of the need for this.
If I were writing a system in which many functions had optional
arguments, I would want to write a macro like Jonathan's OPTIONALS,
but that could be done easily with match. In other situations I might
want
(match-lambda pairs ...) ==> (lambda args (match args pairs ...)))
or versions of lambda and let that destructured, but this sort of
thing probably doesn't belong in the standard.
-- Chris Haynes
Dan
∂13-Apr-87 2114 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU towards an agenda - yeller pages
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 13 Apr 87 21:14:18 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 13 Apr 87 23:50:22 EDT
Date: Mon, 13 Apr 87 23:49:15 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: towards an agenda - yeller pages
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <184057.870413.JAR@AI.AI.MIT.EDU>
[Seems that CSNET had amnesia this weekend, so I'm re-sending this message.
- Jonathan]
Date: Sat, 11 Apr 87 11:15:02 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: towards an agenda - yeller pages
To: bartley%home%ti-csl.csnet@RELAY.CS.NET
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Wed 8 Apr 87 15:39:02 cdt from David Bartley <bartley%home%ti-csl.csnet at RELAY.CS.NET>
Message-ID: <183040.870411.JAR@AI.AI.MIT.EDU>
I nominate the general topic of "yellow pages" for the agenda, with the
following subtopics:
- what the yellow pages are for
- string manipulation
- bitwise logical operators
- byte vectors (or something a little more general)
- hash tables
- I/O extensions (e.g. READ-LINE, READ-STRING, maybe a simple FORMAT)
- sets ?
- arrays ?
Some thoughts:
By yellow pages I mean a collection of facilities that are implementable
(although not necessarily implemented) in terms of things that are
already in the language. A description of a yellow pages facility should
be accompanied by a sample implementation for two reasons: (1) as a
substitute for a formal specification (which are hard to write); (2) as
an existence proof that the facility is implementable. The informal
description should specify what behavior of the sample implementation is
accidental and what's not (e.g. (PAIR? a-hash-table) might be true in a
sample implementation, but not part of the spec).
If we can figure out modules (packages, whatever) then we might even be
able to get away with keeping these things out of the global
namespace.
If we have an official notion of yellow-page, then we should be able to
demote some of the things that are currently in the main part of the
report (MEMQ, EQUAL?, VECTOR-FILL!). In addition, if we can agree on
macros, most of the derived expression types (with the possible
exception of BEGIN and LETREC) can be similary demoted.
I don't think I like the term "yellow page", but that's another story.
- Jonathan
∂13-Apr-87 2343 @MC.LCS.MIT.EDU:dfried@iuvax.cs.indiana.edu meeting dates
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 13 Apr 87 23:43:40 PDT
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 14 Apr 87 02:34:44 EDT
Date: Tue, 14 Apr 87 01:31:05 est
From: Dan Friedman <dfried@iuvax.cs.indiana.edu>
Received: by iuvax.cs.indiana.edu; id AA06378; Tue, 14 Apr 87 01:31:05 est
To: rrrs-authors@mc.lcs.mit.edu
Subject: meeting dates
These letters/dates appeared to have arrived but apparently they did not.
/* Written 12:20 am Mar 30, 1987 by dfried@iuvax.cs.indiana.edu in iuvax:scheme-rrrs */
/* ---------- "meeting" ---------- */
From: Dan Friedman <dfried@iuvax.cs.indiana.edu>
I agree with Will about getting together. Any time before July 1st
will be very difficult for me
Dan
/* End of text from iuvax:scheme-rrrs */
/* Written 8:48 am Apr 10, 1987 by dfried@iuvax.cs.indiana.edu in iuvax:scheme-rrrs */
/* ---------- "travel plans" ---------- */
From: Dan Friedman <dfried@iuvax.cs.indiana.edu>
I need to know the date/dates that we will be meeting asap.
Dan
/* End of text from iuvax:scheme-rrrs */
/* Written 10:22 am Apr 11, 1987 by dfried@iuvax.cs.indiana.edu in iuvax:scheme-rrrs */
/* ---------- "date of meeting" ---------- */
From: Dan Friedman <dfried@iuvax.cs.indiana.edu>
I am unable to make a meeting until July.
The first weekend in July would be fine with me.
Dan
/* End of text from iuvax:scheme-rrrs */
-----
Dan
∂14-Apr-87 0048 @MC.LCS.MIT.EDU:mcvax!inria!crcge1.cge.fr!adams@seismo.CSS.GOV Scheme85 interpreter from Indiana...
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 14 Apr 87 00:48:46 PDT
Received: from seismo.CSS.GOV (TCP 30003106431) by MC.LCS.MIT.EDU 14 Apr 87 03:45:26 EDT
Received: from mcvax.UUCP by seismo.CSS.GOV (5.54/1.14) with UUCP
id AA29142; Tue, 14 Apr 87 03:41:42 EDT
Received: by mcvax.cwi.nl; Tue, 14 Apr 87 09:19:30 +0200 (MET)
Received: by inria.inria.fr; Tue, 14 Apr 87 09:14:01 +0200 (MET)
Date: Tue, 14 Apr 87 09:08:33 -0200
Received: by crcge1.cge.fr, Tue, 14 Apr 87 09:08:33 -0200
From: mcvax!inria!crcge1.cge.fr!adams@seismo.CSS.GOV (Drew Adams)
Message-Id: <8704140708.AA06992@crcge1.cge.fr>
To: BROWNVM.bitnet@mit-multics.arpa, SCHEME@mc.lcs.mit.edu
Subject: Scheme85 interpreter from Indiana...
Voila! Here's some mail. Let me know if you don't receive it :).
∂15-Apr-87 0952 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Pattern matching, not optional arguments
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 15 Apr 87 09:51:56 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 15 Apr 87 12:42:26 EDT
Date: Wed, 15 Apr 87 12:41:00 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Pattern matching, not optional arguments
To: cth@IUCS.CS.INDIANA.EDU
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Mon 13 Apr 87 15:19:27 est from Chris Haynes <cth at iucs.cs.indiana.edu>
Message-ID: <185067.870415.JAR@AI.AI.MIT.EDU>
Date: Mon, 13 Apr 87 15:19:27 est
From: Chris Haynes <cth at iucs.cs.indiana.edu>
<pattern> ::= <variable>
| <number> | <string> | (quote <object>)
| (vector <pattern> ...)
| (? <predicate> <pattern>)
| (<pattern> ...)
| (<pattern> <pattern> ... . <pattern>)
Phil Wadler recently complained in SIGPLAN that Scheme has no built-in
pattern matching like ML and its affiliates do. I think there may be
something to what he says. Matching of the ML variety happens a fair
amount in informal notations (e.g. mathematics, denotational
semantics). What you suggest is almost the same as ML's matching
facility, but not quite as elegant. Yours treats lists and vectors
asymmetrically, and doesn't allow for additional constructors without
redefining the macro. You should consider going even closer to ML,
which you could do by changing the last two alternatives to be
| (list <pattern> ...)
| (list* <pattern> <pattern> ... <pattern>)
(In ML you'd write <pattern>,<pattern>,... instead of
(list <pattern> <pattern> ...), and <pattern>::<pattern> instead of
(cons <pattern> <pattern>).)
This eliminates the reserved word problem; it is possible to take a list
apart and name its car VECTOR, and it is possible to make MATCH
understand new kinds of constructors without causing old code to break
due to name conflicts. In fact, if you changed
(? <predicate> <pattern>)
to
((? <predicate>) <pattern>)
then you could change the syntax to be simply
<pattern> ::= <variable>
| <number> | <string> | (quote <object>)
| (<expression> <pattern> ...)
This would permit you to say things like
(let ((widget list)) ...
(match w
((widget wrench connector) ...)))
to take a widget (implemented as a list) apart into its wrench and
connector components, and we have taken another step closer to being
like ML. Giving a semantics for this in Scheme is harder than in ML
since Scheme is a dynamically-typed language with only one namespace,
and ML is statically typed and has four namespaces. The feat can be
accomplished by making MATCH expand into a call to some procedure, call
it MATCH-INTERNAL:
(match x ((exp pat ...) body ...) clause ...) ==>
(let ((z x))
(match-internal exp number-of-pats-following-exp z
(lambda (val ...) (match val ...) ...)
(lambda () (match z clause ...))))
I.e. MATCH-INTERNAL takes the constructor, the number of arguments to
the constructor (i.e. subpatterns), the thing to be matched, and success
and failure continuations. MATCH-INTERNAL then dispatches on the
constructor:
(define (match-internal constructor nargs obj succeed fail)
(cond ((eq? constructor list)
(if (and (list? obj)
(= (length obj) nargs))
(apply succeed obj)
(fail)))
((eq? constructor list*) ...)
((eq? constructor vector) ...)
((?-constructor? constructor)
(if (and (= nargs 1)
((?-predicate constructor) obj))
(succeed obj)
(fail)))
...
(else (error "unknown constructor" ...))))
(define (? pred)
...something which answers true to the ?-constructor? predicate ...)
This the same kind of mechanism as is used for T's equivalent of Common
Lisp's SETF. Like T's SETF, it could be made user-extensible, and
it could be made efficiently compilable.
If it expanded macro forms, then it could also handle QUASIQUOTE with no
extra work (as long as the expansion conatained only constructors that
MATCH-INTERNAL knew about).
By the way, if numbers and strings can be patterns, then booleans and
characters ought to be patterns too.
Jonathan
∂16-Apr-87 1319 @MC.LCS.MIT.EDU:cth@iucs.cs.indiana.edu Pattern matching, not optional arguments
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 16 Apr 87 13:19:22 PDT
Received: from iucs.cs.indiana.edu (TCP 30003147315) by MC.LCS.MIT.EDU 16 Apr 87 16:21:57 EDT
Date: Thu, 16 Apr 87 15:16:57 est
From: Chris Haynes <cth@iucs.cs.indiana.edu>
To: JAR@AI.AI.MIT.EDU
Cc: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: Jonathan A Rees's message of Wed, 15 Apr 87 12:41:00 EDT <185067.870415.JAR@AI.AI.MIT.EDU>
Subject: Pattern matching, not optional arguments
Date: Wed, 15 Apr 87 12:41:00 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Phil Wadler recently complained in SIGPLAN that Scheme has no built-in
pattern matching like ML and its affiliates do. I think there may be
something to what he says.
Yes indeed. Phil's article was one of my motivations to push for
pattern matching (the other was what I saw happening to lambda). Some
of the ways in which Phil finds Miranda superior to Scheme I disagree
with, feeling they are simply different; for example quote. I'd like
to see strong type checking widely used in Scheme, but that is a very
difficult matter. The one respect in which I feel Miranda is clearly
superior, and that we can address with relatively little effort, is
pattern matching.
Yours treats lists and vectors
asymmetrically, and doesn't allow for additional constructors without
redefining the macro. You should consider going even closer to ML,
which you could do by changing the last two alternatives to be
| (list <pattern> ...)
| (list* <pattern> <pattern> ... <pattern>)
Did you mean | (list* <pattern> <pattern> . <pattern>) ?
(In ML you'd write <pattern>,<pattern>,... instead of
(list <pattern> <pattern> ...), and <pattern>::<pattern> instead of
(cons <pattern> <pattern>).)
So let's also add | (cons <pattern> <pattern>), which is the same as
| (list* <pattern> . <pattern>).
This eliminates the reserved word problem; it is possible to take a list
apart and name its car VECTOR, and it is possible to make MATCH
understand new kinds of constructors without causing old code to break
due to name conflicts.
Another way to eliminate the reserved word VECTOR would be to replace
the vector line with
| #(<pattern> ...)
This is consistant with the rest of the approach I took, which is to
have patterns match the print syntax, rather than the construction
expression syntax, as you would have it. (I recall originally wishing
I could use the vector syntax above, but being forced to the VECTOR
keyword syntax because I was working in Scheme84 at the time and it
does not support the standard vector notation. Sorry I neglected to
correct this damage before making the proposal public.)
The use of construction pattern syntax certainly is an alternative worth
consideration. It also has the big advantage that quote becomes
completely consistent with the pattern style; e.g. (list 'x var) is
more natural than ('x var).
The ability to add new constructors in a smooth way if constructor
syntax is used is potentially a big win. But to do it right
(something like the clarification of your proposal below) complicates
the match mechanism substantially. It also makes it clunkier to use
when only lists and vectors are involved, which I expect will be the
vast majority of the time. It's much like the difference between
making things with list and cons vs. using quasiquote. (Actually,
quasiquote might be used to make constructor syntax patterns. Argh!)
If matching is to be much used for such things as optional arguments
(where only lists are involved), the simplicity of the print syntax is
a real plus. It's a hard choice.
In fact, if you changed
(? <predicate> <pattern>)
to
((? <predicate>) <pattern>)
then you could change the syntax to be simply
<pattern> ::= <variable>
| <number> | <string> | (quote <object>)
| (<expression> <pattern> ...)
Then what would be the meaning of the second and subsequent
subpatterns in a pattern of the form ((? <predicate>) <pattern> ...)?
The predicate should see an arbitrary value that can then be
destructured with a single pattern.
This would permit you to say things like
(let ((widget list)) ...
(match w
((widget wrench connector) ...)))
to take a widget (implemented as a list) apart into its wrench and
connector components, and we have taken another step closer to being
like ML. Giving a semantics for this in Scheme is harder than in ML
since Scheme is a dynamically-typed language with only one namespace,
and ML is statically typed and has four namespaces. The feat can be
accomplished by making MATCH expand into a call to some procedure, call
it MATCH-INTERNAL:
(match x ((exp pat ...) body ...) clause ...) ==>
(let ((z x))
(match-internal exp number-of-pats-following-exp z
(lambda (val ...) (match val ...) ...)
(lambda () (match z clause ...))))
The (lambda (val ...) ...) success continuation above doesn't quite
work. The the success continuation should be passed a fail
continuations (the same as the one passed to match-internal), and body
... should be within the scope of the pattern variables in each of the
subpatterns. Match can also be implemented by expanding the tests
inline, which results in considerable code expansion and slower
compilation, but runs faster. We've used both approaches at Indiana.
To provide for user defined constructors, some mechanism is needed for
associating a predicate and destructuring function with each
constructor. This could be done in several ways, such as a global
(hash?)table or using constructor objects that responded to messages
asking for their associated predicate and destructuring functions. If
constructors are regularly created in dynamic ways, the global table
presents garbage collection problems. But let's not get carried away
with implementation concerns at this stage.
In any event, I suggest that the destructuring functions take two
arguments: a function to receive the component values and the value to
be destructured. Thus APPLY would be the list destructuring function.
(lambda (f v) (apply f (vector->list v)))
could be used for vectors, but some implementations might provide a
more efficient version that didn't cons up a list.
If match is to support user supplied constructors, we had better be
convinced that they will be regularly used and that it is important
for them to be abstract. If abstraction isn't critical, one can
always use lists or vectors that begin with certain flags to
distinguish objects created by new constructors. For example, using
this old trick the widget constructor might be
(define widget
(lambda (wrench connector)
(list 'widget wrench connector)))
A widget pattern (in print syntax) would then be
('widget wrench connector)
and no widget destructuring function is needed. Our biggest use of
match so far has been doing this sort of thing to represent abstract
syntax.
By the way, if numbers and strings can be patterns, then booleans and
characters ought to be patterns too.
Yes. This oversight was also a throwback to the original Scheme84
implementation of match.
Jonathan
Chris
∂16-Apr-87 1329 @MC.LCS.MIT.EDU:cth@iucs.cs.indiana.edu Pattern matching, not optional arguments
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 16 Apr 87 13:28:40 PDT
Received: from iucs.cs.indiana.edu (TCP 30003147315) by MC.LCS.MIT.EDU 16 Apr 87 16:21:57 EDT
Date: Thu, 16 Apr 87 15:16:57 est
From: Chris Haynes <cth@iucs.cs.indiana.edu>
To: JAR@AI.AI.MIT.EDU
Cc: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: Jonathan A Rees's message of Wed, 15 Apr 87 12:41:00 EDT <185067.870415.JAR@AI.AI.MIT.EDU>
Subject: Pattern matching, not optional arguments
Date: Wed, 15 Apr 87 12:41:00 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Phil Wadler recently complained in SIGPLAN that Scheme has no built-in
pattern matching like ML and its affiliates do. I think there may be
something to what he says.
Yes indeed. Phil's article was one of my motivations to push for
pattern matching (the other was what I saw happening to lambda). Some
of the ways in which Phil finds Miranda superior to Scheme I disagree
with, feeling they are simply different; for example quote. I'd like
to see strong type checking widely used in Scheme, but that is a very
difficult matter. The one respect in which I feel Miranda is clearly
superior, and that we can address with relatively little effort, is
pattern matching.
Yours treats lists and vectors
asymmetrically, and doesn't allow for additional constructors without
redefining the macro. You should consider going even closer to ML,
which you could do by changing the last two alternatives to be
| (list <pattern> ...)
| (list* <pattern> <pattern> ... <pattern>)
Did you mean | (list* <pattern> <pattern> . <pattern>) ?
(In ML you'd write <pattern>,<pattern>,... instead of
(list <pattern> <pattern> ...), and <pattern>::<pattern> instead of
(cons <pattern> <pattern>).)
So let's also add | (cons <pattern> <pattern>), which is the same as
| (list* <pattern> . <pattern>).
This eliminates the reserved word problem; it is possible to take a list
apart and name its car VECTOR, and it is possible to make MATCH
understand new kinds of constructors without causing old code to break
due to name conflicts.
Another way to eliminate the reserved word VECTOR would be to replace
the vector line with
| #(<pattern> ...)
This is consistant with the rest of the approach I took, which is to
have patterns match the print syntax, rather than the construction
expression syntax, as you would have it. (I recall originally wishing
I could use the vector syntax above, but being forced to the VECTOR
keyword syntax because I was working in Scheme84 at the time and it
does not support the standard vector notation. Sorry I neglected to
correct this damage before making the proposal public.)
The use of construction pattern syntax certainly is an alternative worth
consideration. It also has the big advantage that quote becomes
completely consistent with the pattern style; e.g. (list 'x var) is
more natural than ('x var).
The ability to add new constructors in a smooth way if constructor
syntax is used is potentially a big win. But to do it right
(something like the clarification of your proposal below) complicates
the match mechanism substantially. It also makes it clunkier to use
when only lists and vectors are involved, which I expect will be the
vast majority of the time. It's much like the difference between
making things with list and cons vs. using quasiquote. (Actually,
quasiquote might be used to make constructor syntax patterns. Argh!)
If matching is to be much used for such things as optional arguments
(where only lists are involved), the simplicity of the print syntax is
a real plus. It's a hard choice.
In fact, if you changed
(? <predicate> <pattern>)
to
((? <predicate>) <pattern>)
then you could change the syntax to be simply
<pattern> ::= <variable>
| <number> | <string> | (quote <object>)
| (<expression> <pattern> ...)
Then what would be the meaning of the second and subsequent
subpatterns in a pattern of the form ((? <predicate>) <pattern> ...)?
The predicate should see an arbitrary value that can then be
destructured with a single pattern.
This would permit you to say things like
(let ((widget list)) ...
(match w
((widget wrench connector) ...)))
to take a widget (implemented as a list) apart into its wrench and
connector components, and we have taken another step closer to being
like ML. Giving a semantics for this in Scheme is harder than in ML
since Scheme is a dynamically-typed language with only one namespace,
and ML is statically typed and has four namespaces. The feat can be
accomplished by making MATCH expand into a call to some procedure, call
it MATCH-INTERNAL:
(match x ((exp pat ...) body ...) clause ...) ==>
(let ((z x))
(match-internal exp number-of-pats-following-exp z
(lambda (val ...) (match val ...) ...)
(lambda () (match z clause ...))))
The (lambda (val ...) ...) success continuation above doesn't quite
work. The the success continuation should be passed a fail
continuations (the same as the one passed to match-internal), and body
... should be within the scope of the pattern variables in each of the
subpatterns. Match can also be implemented by expanding the tests
inline, which results in considerable code expansion and slower
compilation, but runs faster. We've used both approaches at Indiana.
To provide for user defined constructors, some mechanism is needed for
associating a predicate and destructuring function with each
constructor. This could be done in several ways, such as a global
(hash?)table or using constructor objects that responded to messages
asking for their associated predicate and destructuring functions. If
constructors are regularly created in dynamic ways, the global table
presents garbage collection problems. But let's not get carried away
with implementation concerns at this stage.
In any event, I suggest that the destructuring functions take two
arguments: a function to receive the component values and the value to
be destructured. Thus APPLY would be the list destructuring function.
(lambda (f v) (apply f (vector->list v)))
could be used for vectors, but some implementations might provide a
more efficient version that didn't cons up a list.
If match is to support user supplied constructors, we had better be
convinced that they will be regularly used and that it is important
for them to be abstract. If abstraction isn't critical, one can
always use lists or vectors that begin with certain flags to
distinguish objects created by new constructors. For example, using
this old trick the widget constructor might be
(define widget
(lambda (wrench connector)
(list 'widget wrench connector)))
A widget pattern (in print syntax) would then be
('widget wrench connector)
and no widget destructuring function is needed. Our biggest use of
match so far has been doing this sort of thing to represent abstract
syntax.
By the way, if numbers and strings can be patterns, then booleans and
characters ought to be patterns too.
Yes. This oversight was also a throwback to the original Scheme84
implementation of match.
Jonathan
Chris
∂16-Apr-87 1646 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU meeting dates/times
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 16 Apr 87 16:46:29 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 16 Apr 87 19:20:35 EDT
Date: Thu, 16 Apr 87 19:19:38 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: meeting dates/times
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <186340.870416.JAR@AI.AI.MIT.EDU>
I have heard from very few of you. Please let me know if you are planning
to attend and whether you have any conflicts.
Two different possibilities are being considered:
A. Saturday - Sunday, 27-28 June.
B. Thursday - Friday, 2-3 July.
So far, the only person who has reported a definite conflict is Dan
Friedman, who absolutely can't make it before July 1.
Other data:
- Mitch Wand would prefer not to meet on Saturday.
- Kent Pitman would prefer not to meet Monday-Friday, but does not
have a definite conflict.
- Friday the 3rd might be difficult for Norman Adams due to approach
of 4th of July.
- Kent Pitman and Bill Rozas have suggested that the approach of the
4th might present problems for some people; I would encourage such
people to speak up now.
I am inclined now to suggest that we meet Thursday-Friday so that we can
accomodate Mitch and Dan.
Please reply with your preferences if you have not done so already.
If you are mute you will be ignored.
Jonathan
∂20-Apr-87 0906 @MC.LCS.MIT.EDU:bartley%Home%ti-csl.csnet@RELAY.CS.NET Re: meeting dates/times
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 20 Apr 87 09:06:18 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 20 Apr 87 11:48:20 EDT
Received: from relay2.cs.net by RELAY.CS.NET id aa10812; 20 Apr 87 11:40 EDT
Received: from ti-csl by RELAY.CS.NET id ao16289; 20 Apr 87 11:32 AST
Received: from Nero (nero.ARPA) by tilde id AA08324; Mon, 20 Apr 87 10:30:10 cdt
To: Jonathan A Rees <JAR@MC.LCS.MIT.EDU>
Cc: RRRS-Authors@MC.LCS.MIT.EDU
From: David Bartley <bartley%Home%ti-csl.csnet@RELAY.CS.NET>
Subject: Re: meeting dates/times
Date: 20-Apr-87 10:29:18
Sender: BARTLEY%Nero%ti-csl.csnet@RELAY.CS.NET
Message-Id: <BARTLEY.2754923354@Nero>
I'm pretty open to meeting at either end of the week. I hope to attend
the SIGPLAN meeting in St. Paul June 24-26, though, so meeting Saturday
won't work out for me. Although I hesitate to travel on the 4 July
weekend, the Thursday-Friday choice may be best. (I may just plan to
stay in Boston over the weekend!)
--db--
∂22-Apr-87 1357 @MC.LCS.MIT.EDU:unido!gmdzi!LISPM-1.GMD!@lispm-1.gmd.jc Please add ...
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 22 Apr 87 13:57:00 PDT
Received: from seismo.CSS.GOV (TCP 30003106431) by MC.LCS.MIT.EDU 22 Apr 87 15:52:39 EDT
Received: from unido.UUCP by seismo.CSS.GOV (5.54/1.14) with UUCP
id AA22754; Tue, 21 Apr 87 18:29:35 EDT
Received: by unido.uucp with uucp;
Tue, 21 Apr 87 23:48:28 +0100
Received: by gmdzi.UUCP id AA10066; Tue, 21 Apr 87 21:36:19 -0100
Date: Tue, 21 Apr 87 21:35+0100
From: "Juergen Christoffel" <unido!gmdzi!LISPM-1!JC@seismo.CSS.GOV>
Subject: Please add ...
To: scheme@mc.lcs.mit.edu
Fcc: G1:>JC>mail>mail.kbin
Expiration-Date: Tue, 19 May 87 21:35+0100
Message-Id: <870421213507.3.JC@LISPM-1.GMD>
the address "unido!gmdzi!lispm-1!scheme-gmd"@seismo.css.gov to this
mailing list.
Thank you, JC
∂22-Apr-87 1510 @MC.LCS.MIT.EDU:cth@iucs.cs.indiana.edu match questions
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 22 Apr 87 15:09:51 PDT
Received: from iucs.cs.indiana.edu (TCP 30003147315) by MC.LCS.MIT.EDU 22 Apr 87 15:55:31 EDT
Date: Wed, 22 Apr 87 14:53:10 est
From: Chris Haynes <cth@iucs.cs.indiana.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: match questions
Here are some questions that we need to answer before adopting a
matching facility, along with my answers. I hope they generate
debate.
1. Do we want a match facility?
YES, very much so.
2. Given a match facility, do we need optional arguments?
No, but something like OPTIONALS might be in the Yellow Pages.
In fact, we could get demote the '.' rest feature to optional
status, or even eliminate it. (Yeh!)
3. Should patterns be in read format (with quote), e.g. ('x 1 y), or
in construction expression format, e.g. (list 'x 1 y)?
I currently favor read format, but not by much, and if we
can get a satisfactory answer to the next question, I'd
probably favor construction format.
4. Can we define a good way of declaring additional constructors, to
get more of an ML like matching mechanism?
I don't know. Whatever it is, I feel it should simultaniously
define constructor, predicate and destructuring functions.
The obvious approaches I've thought of seem a bit clunky, and
I question whether we want to add that much mechanism to
Scheme. Without this, the matching facility is pretty simple
and does not clutter up the rest of the language. (In fact, it
can eliminate the optional arguments clutter.) Still, it would
be very nice and may well be worth the mechanism. I just
don't want to see resistance to this mechanism nix
agreement on a simpler match facility.
5. Do we want to be able to embed arbitrary predicates in patterns,
and if so, with what syntax?
Yes, but I don't feel strongly about this. The
(? <predicate> <pattern>) syntax I proposed isn't wonderful,
but it does the job. Note that ? (and quote) may still be
used as literals, e.g. ('? 'quote foo). It is only their use
as pattern variables that is prohibited.
6. Should the match facility be an abstraction (lambda) or local
binding (let) form, or should it provide both?
Local binding. A MATCH-LAMBDA form might be optional (I could
certainly imagine wanting it), but it's probably better to
have only one abstraction form, and keep it as simple as
possible. If anyone wants MATCH-LAMBDA badly enough, it is
easy to define given MATCH and any syntactic extension
mechanism.
7. Should MATCH be required, optional, or "Yellow Pages".
Optional, since it is not very hard to implement with required
facilities, we want to keep the required base language
simple, and we want to avoid changes to the base if possible so
existing implementations are not invalidated. "Yellow Pages"
status would be better than nothing, but quite dissapointing.
I think it's a feature that should be widely available and
much used.
It seems hard to come up with definitive answers to some of these
questions. However, I don't see any indication that the issues
here are deep, so we should be able to agree on something satisfactory
without a whole lot of research. So let's try to do it in time for
the July (?) meeting.
Chris
∂22-Apr-87 1746 @MC.LCS.MIT.EDU:jinx@GENEVA.AI.MIT.EDU match questions
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 22 Apr 87 17:45:59 PDT
Received: from geneva (TCP 2206400372) by MC.LCS.MIT.EDU 22 Apr 87 19:20:15 EDT
Received: by GENEVA.AI.MIT.EDU; Wed, 22 Apr 87 17:39:43 est
Date: Wed, 22 Apr 87 17:39:43 est
From: jinx@GENEVA.AI.MIT.EDU (Guillermo J. Rozas)
Message-Id: <8704222239.AA05975@geneva>
To: cth@iucs.cs.indiana.edu
Cc: rrrs-authors@mc.lcs.mit.edu
In-Reply-To: Chris Haynes's message of Wed, 22 Apr 87 14:53:10 est <8704222223.AA05964@geneva>
Subject: match questions
Reply-To: jinx@zurich.ai.mit.edu
1. Do we want a match facility?
No. Unless it involves adding no new special forms. I won't
object to a couple of utility procedures in the Yellow pages
for the people who use this sort of thing.
2. Given a match facility, do we need optional arguments?
We don't need them as it is. I'd much rather agree on
something for optional arguments (which I use regularly), than
on some facility I find no use for.
3. Should patterns be in read format (with quote), e.g. ('x 1 y), or
in construction expression format, e.g. (list 'x 1 y)?
I could not care less.
4. Can we define a good way of declaring additional constructors, to
get more of an ML like matching mechanism?
I don't know. Whatever it is, I feel it should simultaniously
define constructor, predicate and destructuring functions.
The obvious approaches I've thought of seem a bit clunky, and
I question whether we want to add that much mechanism to
Scheme.
Adding a match facility is adding too much mechanism as it is.
5. Do we want to be able to embed arbitrary predicates in patterns,
and if so, with what syntax?
I could not care less.
6. Should the match facility be an abstraction (lambda) or local
binding (let) form, or should it provide both?
The only way I'll be happy with it is if it involves no
special forms. Then users can write their own syntactic
extensions to make it convenient if they need it.
7. Should MATCH be required, optional, or "Yellow Pages".
Definitely Yellow Pages if at all.
It seems hard to come up with definitive answers to some of these
questions. However, I don't see any indication that the issues
here are deep, so we should be able to agree on something satisfactory
without a whole lot of research. So let's try to do it in time for
the July (?) meeting.
I'm sorry, but I fail to see the point of a MATCH extension to the
language. Every time I've wanted pattern matching, I've built my own,
because the constraints and requirements were different, so a fixed
utility would do me no good. We might as well try to agree on a UNIFY
facility. It would probably be more useful.
∂23-Apr-87 0957 @MC.LCS.MIT.EDU:CPH@AI.AI.MIT.EDU match questions
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Apr 87 09:57:39 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 23 Apr 87 12:23:04 EDT
Date: Thu, 23 Apr 87 12:24:52 EDT
From: Chris Hanson <CPH@AI.AI.MIT.EDU>
Subject: match questions
To: cth@IUCS.CS.INDIANA.EDU
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Wed 22 Apr 87 14:53:10 est from Chris Haynes <cth at iucs.cs.indiana.edu>
Message-ID: <189657.870423.CPH@AI.AI.MIT.EDU>
I agree with Jinx. A match facility is neither needed nor is it a
desirable addition to the core language. I find optional arguments
useful but unnecessary.
∂23-Apr-87 1143 @MC.LCS.MIT.EDU:andy%hobbes@ads.ARPA Re: match questions
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Apr 87 11:39:51 PDT
Received: from grape.ads.ARPA (TCP 1200400070) by MC.LCS.MIT.EDU 23 Apr 87 14:06:57 EDT
Received: by hobbes.ads.arpa (3.2/SMI-3.2)
id AA29550; Thu, 23 Apr 87 11:23:04 PDT
Date: Thu, 23 Apr 87 11:23:04 PDT
From: andy%hobbes@ads.ARPA (Andy Cromarty)
Message-Id: <8704231823.AA29550@hobbes.ads.arpa>
To: rrrs-authors@MC.LCS.MIT.EDU
Subject: Re: match questions
I agree with Jinx and CPH. Matching, special handling of optionals, etc.
can be convenient when they happen to provide what you want, but let's get
more experience with matching facilities within Scheme, and more reports
of such experience from more people, before we commit to a specific
construct (if any is needed at all).
If we have a standard macro definition capability, and especially if
we allow any token at all to be redefinable (including, e.g., LET),
then there's no need to build matching facilities into the language
definition. Advocates of alternative matching and destructuring
techniques can build the macro packages and distribute them informally
to entice the rest of us to adopt their view of the importance of
such constructs as a part of the language.
asc
∂23-Apr-87 1324 @MC.LCS.MIT.EDU:willc%tekchips.tek.com@RELAY.CS.NET Re: match questions
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Apr 87 13:24:35 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 23 Apr 87 15:50:55 EDT
Received: from relay2.cs.net by RELAY.CS.NET id ad20226; 23 Apr 87 15:53 EDT
Received: from tektronix.tek.com by RELAY.CS.NET id bb08194; 23 Apr 87 15:45 AST
Received: by tektronix.TEK.COM (5.51/6.20)
id AA13695; Thu, 23 Apr 87 11:28:07 PDT
Received: by tekchips.TEK.COM (5.31/6.19)
id AA13316; Thu, 23 Apr 87 11:28:52 PDT
Message-Id: <8704231828.AA13316@tekchips.TEK.COM>
To: cth%indiana.csnet@RELAY.CS.NET
Cc: rrrs-authors@MC.LCS.MIT.EDU, willc%tekchips.tek.com@RELAY.CS.NET
Subject: Re: match questions
In-Reply-To: Your message of Wed, 22 Apr 87 14:53:10 est.
<8704230115.AA05069@tekchips.TEK.COM>
Date: 23 Apr 87 11:28:50 PDT (Thu)
From: willc%tekchips.tek.com@RELAY.CS.NET
Chris's questions give me a welcome chance to express my personal
views on this matter.
1. Do we want a match facility?
No.
2. Given a match facility, do we need optional arguments?
Yes. Optional arguments are in the standard library already,
and that example encourages people to write new procedures
with optional arguments. The problem is that optional arguments
must now be implemented either by rest arguments, which leads
to poor error-checking because few people take the trouble to
check for excess arguments, or by implementation-specific and
therefore non-portable hacks.
Using rest arguments to implement optional arguments is also
inefficient. The worst of it is that the inefficiency biases
people toward omitting optional arguments, when people should
be encouraged to write them explicitly: WRITE-CHAR with two
arguments conses, but WRITE-CHAR with one argument doesn't. If
you don't think that a single cons per character matters, then
the implementation you've been using isn't fast enough.
I would not be opposed to demoting the "." rest flag to optional
or nonexistent status if it were replaced with #!optional and
#!rest, or equivalent.
3. Should patterns be in read format (with quote), e.g. ('x 1 y), or
in construction expression format, e.g. (list 'x 1 y)?
Read format would be `(X 1 ,Y). The above "read format"
corresponds to no existing syntax. It would be a new sublanguage,
like Common Lisp's FORMAT though less silly.
"Construction expression format" is sensible only if you have a
meaningful notion of static type. Without static types,
patterns based on construction expression format offer all the
embarrassments of Common Lisp's SETF. For example, what would the
pattern (LIST 'X 1 Y) mean inside (LET ((LIST VECTOR)) ...)?
Even if you have static types, construction expression format
generalizes only to free constructors, as even Philip Wadler
observed in the SIGPLAN Notices article that seems to have given
impetus to this particular crusade.
4. Can we define a good way of declaring additional constructors, to
get more of an ML like matching mechanism?
Sure, but first you have to turn Scheme into a statically typed
language. Even then it would only work for free constructors
like CONS, and would not work for constructors like ADJOIN.
An ML-like matcher is far too much machinery when you consider
that it does't generalize beyond a small set of rudimentary data
types.
5. Do we want to be able to embed arbitrary predicates in patterns,
and if so, with what syntax?
No. To paraphrase Marie Antoinette, let them use COND.
6. Should the match facility be an abstraction (lambda) or local
binding (let) form, or should it provide both?
Neither. It would be ok as a library procedure.
7. Should MATCH be required, optional, or "Yellow Pages".
Yellow pages, if at all. Unlike optional arguments, it can
be implemented in terms of what we already have at no cost in
efficiency or reliability. It is not a thing I need, and if
I ever find myself wanting it I'd be happy to include it from
a source library. By the way, I have written perhaps half a
dozen specialized matchers for my own programs, some of them
fairly powerful, but I don't believe the proposed facility would
have saved me from writing any of them. My matchers have generally
been written to simplify the construction of mini-compilers for
application-specific languages.
Thank you for requesting my opinions.
Peace, Will
∂23-Apr-87 1343 @MC.LCS.MIT.EDU:cth@iucs.cs.indiana.edu Scheme pattern matcher
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Apr 87 13:43:26 PDT
Received: from iucs.cs.indiana.edu (TCP 30003147315) by MC.LCS.MIT.EDU 23 Apr 87 16:25:00 EDT
Date: Thu, 23 Apr 87 15:29:04 est
From: Chris Haynes <cth@iucs.cs.indiana.edu>
To: philbin-jim@YALE.ARPA
Cc: rrrs-authors@mc.lcs.mit.edu
In-Reply-To: James F Philbin's message of Thu, 16 Apr 87 17:31:11 EDT <8704162131.AA11569@yale-celray.arpa>
Subject: Scheme pattern matcher
For those who would like to look at and perhaps try out a simple
match facility, here's mine.
The Scheme84 MATCH has a bit different syntax and a very different
implementation, due to Bruce Duba. He uses Eugene's extend-syntax
in clever ways to compile MATCH expressions to conditional expressions
(rather than the interpretive approach I use). It is available via
anonymous ftp as part of pub/scheme84/synstd.s on cs.indiana.edu.
;; match: Chez Scheme pattern matching and destructuring facility.
;;
;; Author: Chris Haynes (haynes@cs.indiana.edu)
;;
;;
;; (match <exp> (<pattern> <body> ...) ...)
;;
;; <pattern> ::= <variable>
;; | <number> | <string> | <character> | <boolean> | (quote <datum>)
;; | #(<pattern> ...)
;; | #&<pattern> ; Chez Scheme box (reference)
;; | (? <predicate> <pattern>)
;; | (<pattern> ...)
;; | (<pattern> <pattern> ... . <pattern>)
;;
;; MATCH is a fairly general pattern matching and destructuring
;; facility. <exp> is evaluated and its value is matched against the
;; <pattern>s in order until a matching pattern is found. An error is
;; signaled if no pattern matches. When a match is found, the value
;; of <exp> is destructured with the variables in the matching pattern
;; bound to the corresponding components of <exp>'s value. The <body>
;; expressions of the matching pair are then evaluated in an
;; environment formed by extending the environment of the MATCH
;; expression with these new bindings. The value of the last <body>
;; expression is returned as the value of the MATCH expression.
;;
;; The symbols QUOTE and ? are used in patterns to identify literals
;; and predicate tests, so they may not be used as pattern variables.
;; Number, string, boolean, character and quoted literal <datum>s must
;; be EQUAL? to corresponding components of <exp>s value, or the
;; pattern fails. <predicate> expressions should evaluate (in the
;; environment of the MATCH expression) to unary functions that are
;; applied to the corresponding component of <exp>s value when
;; matching of the ? pattern is attempted. If the predicate returns
;; false, the pattern fails. Otherwise, the value applied to the
;; predicate is matched against the pattern following the predicate.
;;
;;
;; (match '(2 . 3) ((a . b) (* a b))) ==> 6
;;
;; (match '(1 2) ((a) a) ((a b) (+ a b)) (c c)) ==> 3
;;
;; (match (list 33 "string" #\c (not #t) #(1 2))
;; ((33 "string" #\c #f #(a b)) (cons a b))) ==> (1 . 2)
;;
;; (let ((num 3))
;; (match (cons 'x 4)
;; (((? (lambda (v) (or (symbol? v) (and (number? v) (= v num))))
;; c)
;; . (? number? d)) (list c d)))) ==> (x 4)
;;
;; (match '(bar 3 4 5)
;; (('foo x y) (cons x y))
;; (('bar x y . z) (list x y z))
;; (else (error "didn't match: " else))) ==> (3 4 (5))
;;
(define matcher
(lambda (exp pairs-info)
(if (null? pairs-info)
(error 'match "no pattern for: ~s" exp)
(let ((pat (caar pairs-info))
(fn (cadar pairs-info))
(preds (cddar pairs-info))
(fail (lambda () (matcher exp (cdr pairs-info)))))
(let loop ((exp exp)
(pat pat)
(succeed (lambda (args) (apply fn args))))
(cond
((or (null? pat) (number? pat) (char? pat)
(string? pat) (boolean? pat))
(if (equal? pat exp) (succeed '()) (fail)))
((symbol? pat) (succeed (list exp)))
((box? pat)
(if (box? exp)
(loop (unbox exp) (unbox pat) succeed)
(fail)))
((vector? pat)
(if (vector? exp)
(let ((len (vector-length pat)))
(if (= len (vector-length exp))
(let inner ((n 0) (args '()))
(if (= n len)
(succeed args)
(loop (vector-ref exp n)
(vector-ref pat n)
(lambda (car-args)
(inner (+ 1 n)
(append! args car-args))))))
(fail)))
(fail)))
((eq? (car pat) 'quote)
(if (equal? (cadr pat) exp) (succeed '()) (fail)))
((eq? (car pat) '?)
(if ((car preds) exp)
(begin (set! preds (cdr preds))
(loop exp (caddr pat) succeed))
(fail)))
((pair? exp)
(loop (car exp) (car pat)
(lambda (car-args)
(loop (cdr exp)
(cdr pat)
(lambda (cdr-args)
(succeed (append! car-args
cdr-args)))))))
(else (fail))))))))
(define-macro! match (exp . pairs)
(let ((ids&preds-of
(lambda (pat)
(let* ((preds '())
(ids (let loop ((pat pat))
(cond
((or (null? pat) (number? pat) (char? pat)
(string? pat) (boolean? pat))
'())
((symbol? pat) (list pat))
((box? pat) (loop (unbox pat)))
((vector? pat) (loop (vector->list pat)))
((eq? (car pat) 'quote) '())
((eq? (car pat) '?)
(set! preds (cons (cadr pat) preds))
(loop (caddr pat)))
(else
(let ((cdrids (loop (cdr pat))))
(append! (loop (car pat)) cdrids)))))))
(cons ids preds)))))
`(matcher
,exp
(list . ,(map (lambda (pair)
(let ((pattern (car pair))
(body (cdr pair)))
(let ((ids&preds (ids&preds-of pattern)))
`(cons ',pattern
(cons (lambda ,(car ids&preds) . ,body)
(list . ,(cdr ids&preds)))))))
pairs)))))
∂23-Apr-87 1433 @MC.LCS.MIT.EDU:cth@iucs.cs.indiana.edu match questions
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Apr 87 14:33:12 PDT
Received: from iucs.cs.indiana.edu (TCP 30003147315) by MC.LCS.MIT.EDU 23 Apr 87 17:02:54 EDT
Date: Thu, 23 Apr 87 16:20:27 est
From: Chris Haynes <cth@iucs.cs.indiana.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: match questions
From: "Guillermo J. Rozas" <jinx@geneva.ai.mit.edu>
I'm sorry, but I fail to see the point of a MATCH extension to the
language. Every time I've wanted pattern matching, I've built my own,
because the constraints and requirements were different, so a fixed
utility would do me no good.
My experience, which reflects what I've done with Scheme (I've never
written an emacs), is simply different. I've seldom felt the need for
optional arguments, and never a pressing need for more than the '.'
rest feature we already have. Thus my don't care attitude toward the
optional argument proposals, except for a general desire that all that
mechanism not be added to the language when I don't expect to use it.
But I respect the desires of the many who do use optional arguments,
at least as long as the facility is optional.
What I don't understand is why more people don't find use for MATCH
(or maybe they do, and we just haven't heard from them). I find a
constant need for destructuring (I hate car/cdr chains), and frequent
need for matching. Many a COND expression would look better if it
were a MATCH expression. I, and others here, have found the simple
sort of match facility I've outlined to be quite adequate for almost
all our needs. And people seldom build their own matches, but instead
use car/cdr chains and COND at every turn. The functional programming
community (broadly speaking, including languages like ML) certainly
goes for matching in a big way (and not optional arguments). Why is
the Lisp community traditionally so different?
We might as well try to agree on a UNIFY
facility. It would probably be more useful.
Not at all. Unification requires logic variables, which are a
significant semantic addition to any language (whereas MATCH is
semantically trivial). Also, it isn't clear how much unification is
worth without backtracking (multiple values, Prolog style), and that
is pretty clearly a step into another language.
Chris
∂23-Apr-87 1726 @MC.LCS.MIT.EDU:ANDY@Sushi.Stanford.EDU Re: match questions
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Apr 87 17:26:29 PDT
Received: from Sushi.Stanford.EDU (TCP 4402000065) by MC.LCS.MIT.EDU 23 Apr 87 20:02:16 EDT
Date: Thu 23 Apr 87 15:36:18-PDT
From: Andy Freeman <ANDY@Sushi.Stanford.EDU>
Subject: Re: match questions
To: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: Message from "Chris Haynes <cth@iucs.cs.indiana.edu>" of Thu 23 Apr 87 14:33:37-PDT
Message-ID: <12296897659.45.ANDY@Sushi.Stanford.EDU>
I think that all of the scheme match proposals I've seen during the
last two weeks, as well as Miranda and other languages favored by the
functional programming community and logic programming languages (any
other oxen to gore?), confuse some things that I work very hard to
keep separate. Unfortunately, I don't have a word for them, but I can
illustrate my point with one of Wadler's examples.
He wrote:
treenum ::= Leaf num | Branch treenum treenum
sumtree :: treenum -> num
sumtree (Leaf x) = x
sumtree (Branch xt yt) = sumtree xt + sumtree yt
To my mind, the following commonlispish program is superior. For one
thing, I can change the things that are in a branch without changing
the sumtree program. Note the absense of positional notation/
information.
(defstruct (leaf weight)
(weight number)) ;;; since this is lisp, type decls are optional
(defstruct (branch left right)
(right (or leaf branch))
(left (or leaf branch)))
; This may win the hokiest accessor syntax award but it does
; suggest an obvious extension if multiple values are introduced....
(define (sumtree tree)
(cond ((leaf? tree) (leaf tree weight))
((branch? tree) (+ (sumtree (branch tree left))
(sumtree (branch tree right))))
(else <halt and catch fire>)))
(Yes, some people want to push the cond into the function calling
mechanism but since I usually have procedures with multiple arguments,
I don't like to go that far.)
One "feature" of this idea is that it doesn't support "generic"
information, ie things that are common to a number of different
"type", such as printer, since the accessors specify the "type." This
suggests that T's limited object-oriented style is a big win because
it allows (left tree) to do the right thing even though lots of
"types" have a "left." On the other hand, perhaps common/inherited
components are rare enough that they should be handled via a separate
mechanism.
I agree that T's destructure, and match-like generalizations of it,
are great, but they're for different problems. I'd rather use a
different hammer for compound-object problems.
-andy
-------
∂23-Apr-87 2014 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU The verdict: 27-28 June
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Apr 87 20:14:17 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 23 Apr 87 22:54:52 EDT
Date: Thu, 23 Apr 87 23:12:36 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: The verdict: 27-28 June
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <190062.870423.JAR@AI.AI.MIT.EDU>
Many more people seem to dislike 2-3 July than dislike 27-28 June.
Therefore, since no one else seems to be stepping forward to take
responsibility, I have reserved the MIT EECS Dept.'s Grier Room for
9 am to 5 pm on Saturday 27 and Sunday 28 June.
My apologies to those of you who can't make it then. You should feel
free to try to work out a different date with the group if you want; I
certainly have no more claim to authority than anyone else on this
matter, nor do I want it....
Jonathan
∂24-Apr-87 1720 @MC.LCS.MIT.EDU:wand%corwin.ccs.northeastern.edu@RELAY.CS.NET match questions
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 24 Apr 87 17:20:37 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 24 Apr 87 19:53:45 EDT
Received: from relay2.cs.net by RELAY.CS.NET id aa00914; 24 Apr 87 20:05 EDT
Received: from northeastern.edu by RELAY.CS.NET id ab03143; 24 Apr 87 20:00 AST
Received: from corwin.ccs.northeastern.edu by
nuhub.acs.northeastern.edu; Fri, 24 Apr 87 16:37 EST
Received: by corwin.CCS.Northeastern.EDU (5.51/5.17)
id AA04605; Fri, 24 Apr 87 10:31:40 AST
Date: Fri, 24 Apr 87 10:31:40 AST
From: wand%corwin.ccs.northeastern.edu@RELAY.CS.NET
To: ANDY@SUSHI.STANFORD.EDU
Cc: rrrs-authors@MC.LCS.MIT.EDU, cth%indiana.csnet@RELAY.CS.NET
In-Reply-To: "Andy Freeman"'s message of Thu 23 Apr 87 15:36:18-PDT
Subject: match questions
Much as I like pattern matching as proposed by Chris, I think Andy may be on
to something, though I don't completely understand it.
treenum ::= Leaf num | Branch treenum treenum
sumtree :: treenum -> num
sumtree (Leaf x) = x
sumtree (Branch xt yt) = sumtree xt + sumtree yt
To my mind, the following commonlispish program is superior. For one
thing, I can change the things that are in a branch without changing
the sumtree program. Note the absense of positional notation/
information.
(defstruct (leaf weight)
(weight number)) ;;; since this is lisp, type decls are optional
(defstruct (branch left right)
(right (or leaf branch))
(left (or leaf branch)))
; This may win the hokiest accessor syntax award but it does
; suggest an obvious extension if multiple values are introduced....
(define (sumtree tree)
(cond ((leaf? tree) (leaf tree weight))
((branch? tree) (+ (sumtree (branch tree left))
(sumtree (branch tree right))))
(else <halt and catch fire>)))
I guess I don't completely understand this. If I understand it, the second
defstruct exports the following global definitions:
[Let's not argue about the word "global" and what happens if the defstruct
appears in an interior scope, OK?]
branch?
branch
left
right
I guess I don't understand why there is both "branch" and "left/right" here.
If I understand it correctly, I couldn't have another defstruct that had a
different "left". Is that right?
What Chris and I most commonly use matching for is as a rough-and-ready
device for decomposing variant record structures. In general, one needs an
interface between the design of the record structure and the code that uses
that design. There are a number of conflicting design goals:
1. Locality of reference. The code that uses the record should be readable
without reference to a textually-distant definition of the record structure.
2. Control of the namespace. The interface should garbage as little of the
global namespace as possible.
Pattern-matching scores heavily on both these counts; in particular, it
uses no globally named access functions. Andy's proposal seems deficient,
though again I'm not sure I understand it.
3. Modifiability. Changes in the record definition should not require
rewriting the code that uses that definition.
This is where pattern-matching loses: user code must be rewritten whenever
fields are reordered or added. This is where defstruct's (eg Common Lisp's)
are on the right track. Reordering or adding fields does not require recoding
of user functions.
Common Lisp defstruct (and Chez Scheme define-structure) also do pretty well
on the side of not garbaging the global namespace: the names of the access
functions form a distinguished sublanguage (identifiers of the form
structname-fieldname, though I'd probably prefer structname->fieldname), so
the only "really global" identifiers established are structname (and
structname?).
I think it is possible to get something at a higher level than defstruct that
still has the right properties, while increasing locality of reference, but I
haven't figured it out well enough to share it quite yet.
--Mitch
∂24-Apr-87 1854 @MC.LCS.MIT.EDU:ANDY@Sushi.Stanford.EDU Re: match questions
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 24 Apr 87 18:54:12 PDT
Received: from Sushi.Stanford.EDU (TCP 4402000065) by MC.LCS.MIT.EDU 24 Apr 87 21:18:56 EDT
Date: Fri 24 Apr 87 18:22:11-PDT
From: Andy Freeman <ANDY@Sushi.Stanford.EDU>
Subject: Re: match questions
To: wand%corwin.ccs.northeastern.edu@RELAY.CS.NET
cc: rrrs-authors@MC.LCS.MIT.EDU, cth%indiana.csnet@RELAY.CS.NET
In-Reply-To: Message from "wand%corwin.ccs.northeastern.edu@RELAY.CS.NET" of Fri 24 Apr 87 17:07:43-PDT
Message-ID: <12297190001.12.ANDY@Sushi.Stanford.EDU>
Before I forget. I don't think structures are a counter-proposal to
matchers. They're for problems that matchers aren't the right tool
for and are completely inappropriate for the things that matchers do
best.
Actually, I was serious about the hokey accessor syntax award. I
don't like it, there are lots of better syntaxes, but it does
illustrate my point. The following defstruct only defines a predicate
function and accessor syntax.
(defstruct (branch left right)
(left (or leaf branch))
(right (or leaf branch)))
The predicate is branch? and the accessor syntax "verb" is branch.
(branch tree left) is syntax for accessing the left of tree's value
(which is a branch), but left isn't evaluated. (This order obviously
has problems.) Left is recognized as a field name in that position by
the branch accessor syntax. Other structs can have a left and left
can be used for other purposes without confusion.
Yes, each instance of a struct in my proposal does add three names to
the namespace, but that's independent of the number of fields. (I
didn't mention creators.) On the other hand, one could define a
create syntax, (create branch left x right y), so that no creator name
is added to the namespace. This create would be global syntax that
recognizes struct names and fields. Similar games can be played with
accessor syntax and predicates so that no names are added to the
namespace by a definition. (I think they'd be silly, but ....)
I don't understand the less-local objection. Either you know what you
want out of the struct or you don't. Matchers rely on positional
notation, structures rely on names.
The real bug with my proposal is that any user of a structure can see
everything in it; matchers have this problem too. "private" fields
and the like are the solution, but I don't have a syntax.
-andy
-------
∂26-Apr-87 1256 @MC.LCS.MIT.EDU:KMP@STONY-BROOK.SCRC.Symbolics.COM match questions
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 26 Apr 87 12:56:38 PDT
Received: from STONY-BROOK.SCRC.Symbolics.COM (TCP 30002424620) by MC.LCS.MIT.EDU 26 Apr 87 15:56:53 EDT
Received: from RIO-DE-JANEIRO.SCRC.Symbolics.COM by STONY-BROOK.SCRC.Symbolics.COM via CHAOS with CHAOS-MAIL id 124764; Sun 26-Apr-87 15:55:20 EDT
Date: Sun, 26 Apr 87 15:54 EDT
From: Kent M Pitman <KMP@STONY-BROOK.SCRC.Symbolics.COM>
Subject: match questions
To: cth@iucs.cs.indiana.edu
cc: rrrs-authors@mc.lcs.mit.edu
In-Reply-To: The message of 22 Apr 87 15:53 EDT from Chris Haynes <cth@iucs.cs.indiana.edu>
Message-ID: <870426155448.6.KMP@RIO-DE-JANEIRO.SCRC.Symbolics.COM>
When you say you think we want a matcher, does the "we" refer to Scheme
designers or to Scheme users?
In my experience, users want virtually anything that will save them
work. So any user who's got a matching problem would want a matcher.
Of course, users get to wipe clean their assumptions every time they
start over on a new project so they tend to have a more short-sighted
view of things.
On the other hand, a language designer is pretty much stuck with
anything he puts in his language forever after. For that reason, he must
be more particular.
If you're thinking of adding a match facility to Scheme, you must first
decide at what level you were going to add it.
If you add it as linguistic glue (as, for example, in Prolog), you have
a lot of work ahead of you figuring out how to weave it into the fabric
of the language so that it doesn't end up feeling hastily tacked on.
If you just want to add a tool that isn't integrated at the glue level,
you should be ready to justify why you chose to add that tool and not
the myriad of other possible tools that Common Lisp and company have
adopted while Scheme has steadfastly shunned as contrary to the goals of
a simple and elegant language.
By the way, Jonathan has convinced me that a graceful matcher is
possible so I'm not trying to talk you completely out of it. I just
think there's no good argument for it being anywhere but in the Yellow
Pages unless you're willing to go the extra mile and make the language
really use it at a very low level... and I don't see anyone going that
extra mile (nor do I expect that if they did the others would accept it).
∂27-Apr-87 1241 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU match questions
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 27 Apr 87 12:40:55 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 27 Apr 87 15:09:04 EDT
Date: Mon, 27 Apr 87 14:58:50 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: match questions
To: cth@IUCS.CS.INDIANA.EDU
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Wed 22 Apr 87 14:53:10 est from Chris Haynes <cth at iucs.cs.indiana.edu>
Message-ID: <191716.870427.JAR@AI.AI.MIT.EDU>
Date: Wed, 22 Apr 87 14:53:10 est
From: Chris Haynes <cth at iucs.cs.indiana.edu>
7. Should MATCH be required, optional, or "Yellow Pages".
Yellow pages. Let's get macros into the language so that this is
possible!
∂28-Apr-87 0645 @MC.LCS.MIT.EDU,@MIT-MULTICS.ARPA:MDEBAR@BNANDP11.BITNET Scoops
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 28 Apr 87 06:45:40 PDT
Received: from MIT-MULTICS.ARPA (TCP 1200000006) by MC.LCS.MIT.EDU 28 Apr 87 09:43:13 EDT
Received: from BNANDP11(MAILER) by MITVMA (Mailer X1.23) id 9049;
Tue, 28 Apr 87 07:19:43 EDT
Received: by BNANDP11 (Mailer X1.23b) id 6570; Tue, 28 Apr 87 13:18:28 SET
Date: Tue, 28 Apr 87 13:17:20 SET
From: michel debar <MDEBAR@BNANDP11>
Subject: Scoops
To: Scheme <SCHEME@MC.LCS.MIT.EDU>
I would like to get a copy of the doc of Scoops. Could someone send me
a copy ?
Michel Debar
fndp computing centre - rue grandgagnage 21 - 5000 namur - belgium
phone +32 81 220631 telex 59222 facnam b earn:mdebar@bnandp11
∂29-Apr-87 1108 @MC.LCS.MIT.EDU:cth@iucs.cs.indiana.edu Engine operating system (long msg)
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 29 Apr 87 11:08:05 PDT
Received: from iucs.cs.indiana.edu (TCP 30003147315) by MC.LCS.MIT.EDU 29 Apr 87 14:04:41 EDT
Date: Wed, 29 Apr 87 12:59:28 est
From: Chris Haynes <cth@iucs.cs.indiana.edu>
To: veracsd.ck@a.isi.edu
Cc: scheme@mc.lcs.mit.edu
Subject: Engine operating system (long msg)
/* ---------- "Concurrency in Scheme" ---------- */
From: VERACSD@a.isi.edu
I am in the process of writing a metacircular Lisp interpreter which
accommodates concurrent programming constructs (e.g. parbegin/parend's
and semaphores) and have recently come across *engines* in PC Scheme.
Engines seem like they offer much potential for this sort of thing,
however, they seem somewhat tricky. It is especially unclear to me
how to elegantly handle waits & signals for semaphores.
(There must be a better way than Ben-Ari's Pascal concurreny simulator.)
Any advice, pointers to sources, or code would be much appreciated.
Cris Kobryn
VERACSD.CK@A.ISI.EDU
I also felt their must be a better way thay the Pascal Concurrency
simulator to expose my operating systems classes to concurrency
problems in a high level language. This helped motivate the design of
engines. Here is a simple engine operating system (dispatcher with
semaphores and a few other primitive process operations) that I give
my class, along with some primitive documentation. I hope you enjoy
them.
Chris Haynes
haynes@iuvax.cs.indiana.edu
-----------------------------------------------------------------------------
SCHEME ENGINE OPERATING SYSTEM
Preliminary Documentation
(Spring, 1987)
Christopher T. Haynes
The engine mechanism is documented in the paper "An abstraction of
timed preemption" by C. T. Haynes and D. P. Friedman, to appear in
Computer Languages and also available as Indiana University Computer
Science Department Technical Report No. 178. This paper outlines a
simple dispatcher, similar to that used in this operating system. The
operating system (actually, it is just a dispatcher with trap handler)
documented here is intended to be as simple as possible, yet still be
useful for solving synchronization problems.
No attempt has been made to make this operating system secure. For
example, only the semaphore implementation should be allowed to issue
a WAIT or SIGNAL trap, but this restriction is not enforced. A more
elaborate operating system with a secure semaphore implementation is
described in an earlier paper by Haynes and Friedman, entitled
"Engines build process abstractions," which appeared in the Conference
Record of the 1984 ACM Symposium on LISP and Functional Programming,
pages 18-24.
This operating system is supplied in its Chez Scheme version, but it
may be easily ported to PC Scheme or Scheme84, the other two Scheme
implementations that provide engines.
To run the operating system (after loading it), use
(boot)
This starts the operating system with a single process that runs the
procedure bound to BOOT-THUNK, which is initially defined to be a
read-eval-print loop with the "os>" prompt. To exit from the
operating system, simply (RESET) or make an error!
Whenever any process reads input, time stops! For example, when the
read-eval-print process reads, all computation stops until an
expression has been read.
(spin <n>)
simply loops <n> times. This is a good way for the read-eval-print
process to kill time and let other processes run.
There are two ways to create additional processes.
(parbegin <exp1> ... <expn>)
creates n processes which evaluate <exp1> ... <expn> in parallel while
the parent process (the one that evaluated the PARBEGIN expression) is
blocked, and remains blocked until all the new processes finish
evaluating their expressions and terminate.
(trap 'fork <thunk>)
creates a new process that thaws <thunk>. The thunk should never
return; if it does you get the error message "process tried to
return". The fork operation returns a process object.
(trap 'block <p>)
and
(trap 'unblock <p>)
respectively block and unblock the process associated with process
object <p>.
(trap 'self)
returns the process object of the current proces.
(trap 'pause)
causes the current process to relinquish the rest of its time slice.
Semaphores are the synchronization mechanism of this operating system.
(make-semaphore <n>)
returns a new (general) semaphore with initial value <n>. Semaphores are
objects that respond to the messages WAIT and SIGNAL. That is, if <s>
is a semaphore, then
(<s> 'signal)
and
(<s> 'wait)
are the usual semaphore operations.
The time slice size (in engine ticks) is determined with each
dispatch by thawing the thunk bound to TIME-SLICE. Decreasing the
time slice trades off efficiency for a higher probability of finding
synchronization bugs. Randomness in the time slice increases the
chance of finding bugs by repeating the same test programs, but means
that bugs may not repeatable. Initially, TIME-SLICE is defined to be
(lambda () (+ 5 (random 10))))
The variable DISPATCH-COUNT is incremented with each dispatch. This
provides processes with a crude measure of time.
Assume the file "demo.ss", which follows, has been loaded.
(define time-slice
(lambda () (+ 1 (random 2))))
(define inc-count
(lambda (n)
(recur loop ((n n))
(when (positive? n)
(set!! count (1+ count))
(loop (- n 1))))))
(define count 0)
(define demo
(lambda ()
(set! count 0)
(parbegin (inc-count 100) (inc-count 100))
count))
(define grind
(lambda (x n)
(trap 'fork
(lambda ()
(recur loop ()
(display x)
(flush-output *standard-output*)
(spin n)
(loop))))))
(define a nil)
(define b nil)
(define c nil)
(define s nil)
(define abc
(lambda ()
(set! a (grind 'a 10))
(set! b (grind 'b 20))
(set! c (grind 'c 30))
(set! s (trap 'self))))
We then obtain the following transcript:
> (boot)
os> (demo)
121
os> (demo)
115
os> (abc)
abc#<closure>
os> (spin 50)
aabacaba()
os> (trap 'block a)
*
os> (spin 50)
bcb()
cos> (trap 'block b)
*
os> (spin 100)
ccc()
os> (trap 'unblock b)
b*
os> (spin 100)
cbcbcbb()
os> (reset)
>
When programming in this system using Chez Scheme, use the mutation
operators SET!!, SET-CAR!!, SET-CDR!!, SWAP-BOX!!, SET-BOX!! and
SET-VECTOR!! (instead of the single bang versions) in order to have
more opportunity of discovering synchronization bugs.
Ready processes are maintained in a ring data structure, and processes
blocked on semaphores are kept in queues that are also made of rings.
Processes are ring objects created by MAKE-RING.
MAKE-RING takes a single argument and returns a ring element whose
initial value is the argument value. A ring is a doubly linked
circular list, which may be referenced by any one of its elements. A
ring element, r, respond to messages as follows:
value Returns the current value of r.
set-value! Returns a function that takes a value and makes it the
new value of r.
singleton? Returns true if r is a singleton--a single element ring,
and false otherwise.
left Returns the element to the left of r in the ring.
right Returns the element to the right of r in the ring.
delete! Deletes r, which must not be a singleton, from the ring.
r then becomes a singleton.
insert-left! Returns a function that takes a ring element, which must be
a singleton, and inserts it in the ring to the left of r.
insert-right! Returns a function that takes a ring element, which must be
a singleton, and inserts it in the ring to the left of r.
MAKE-QUEUE is a function of no arguments that returns a new queue
object. Queues are implemented as rings with a distinguished
element, the mark, that separates the head and tail of the queue. A
queue object, q, responds to the following messages as follows:
enq! Returns a functions that takes a ring element and inserts
it at the tail of the queue.
deq! Removes a ring element from the head of the queue and
returns it.
empty? Returns true if the queue is empty, and false otherwise.
-----------------------------------------------------------------------------
;;; Engine Operting System
;;;
;;; Chez Scheme Verion, Spring 1987.
;;;
;;; Author: Chris Haynes (haynes@iuvax.cs.indiana.edu)
;;;
(define-macro! set!! (name value) `(set! ,name (I ,value)))
(define-macro! parbegin exps
`(parbegin-thunks (list . ,(map (lambda (exp) `(lambda () ,exp))
exps))))
(define set-car!! (lambda (pair obj) (set-car! pair obj)))
(define set-cdr!! (lambda (pair obj) (set-cdr! pair obj)))
(define swap-box!! (lambda (box obj) (swap-box! box obj)))
(define set-box!! (lambda (box obj) (set-box! box obj)))
(define vector-set!! (lambda (vector n obj) (vector-set! vector n obj)))
(define I (lambda (x) x))
(define make-ring
(let ((singleton? (lambda (elt) (eq? (cadr elt) elt)))
(key (box 'unique)))
(lambda (value)
(let* ((elt (cons '* '*))
(cdr-elt (cons elt elt)))
(set-cdr!! elt cdr-elt)
(set-car!! elt
(lambda (msg)
(if (eq? msg key)
elt
(case msg
(value value)
(set-value! (lambda (x) (set!! value x)))
(singleton? (singleton? elt))
(left (caar cdr-elt))
(right (cadr cdr-elt))
(delete!
(if (singleton? elt)
(error 'make-ring
"can't delete singleton ring")
(begin
(set-cdr!! (cdar cdr-elt) (cdr cdr-elt))
(set-car!! (cddr cdr-elt) (car cdr-elt))
(set-cdr!! cdr-elt elt)
(set-car!! cdr-elt elt)
'*)))
(insert-left!
(lambda (ring)
(if (ring 'singleton?)
(let ((elt2 (ring key)))
(set-car!! (cdr elt2) (car cdr-elt))
(set-cdr!! (cdr elt2) elt)
(set-cdr!! (cdar cdr-elt) elt2)
(set-car!! cdr-elt elt2)
'*)
(error 'make-ring
"can't insert non-singleton"))))
(insert-right!
(lambda (ring)
(if (ring 'singleton?)
(let ((elt2 (ring key)))
(set-car!! (cdr elt2) elt)
(set-cdr!! (cdr elt2) (cdr cdr-elt))
(set-car!! (cddr cdr-elt) elt2)
(set-cdr!! cdr-elt elt2)
'*)
(error 'make-ring
"can't insert non-singleton"))))
(else (ferror 'make-ring
"bad message to ring: ~a" msg))))))
(car elt)))))
(define make-queue
(lambda ()
(let ((mark (make-ring '())))
(lambda (msg)
(case msg
(enq! (mark 'insert-left!))
(deq! (if (mark 'singleton?)
(error 'make-queue "can't dequeue from empty queue")
(let ((r (mark 'right)))
(r 'delete!)
r)))
(empty? (mark 'singleton?))
(else (ferror 'make-queue "bad message to queue: ~a" msg)))))))
(define running #f)
(define dispatch-count 0)
(define dispatch
(letrec ((k-pt car)
(args-pt cdr)
(fail (lambda (eng) eng))
(success (lambda (trap-val ticks-remaining)
(let* ((ans (apply trap-handler (args-pt trap-val)))
(new-engine (make-engine
(lambda ()
((k-pt trap-val) ans)))))
(if pause
(begin (set! pause #!false)
new-engine)
(new-engine ticks-remaining success fail))))))
(lambda ()
(set! dispatch-count (+ 1 dispatch-count))
(set! running (running 'right))
(let ((set-engine! (running 'set-value!)))
(set-engine! ((running 'value) (time-slice) success fail))
(dispatch)))))
(define pause #!false)
(define time-slice
(lambda ()
(+ 5 (random 10))))
(define os-read
(lambda ()
(let loop ()
(let ((value (read)))
(if (eof-object? value)
(begin (trap 'pause) (loop))
value)))))
(define read-eval-print
(lambda (prompt)
(let loop ()
(display prompt)
(display " ")
(write (eval (read)))
(newline)
(loop))))
(define boot-thunk
(lambda ()
(read-eval-print "os>")))
(define boot
(lambda ()
(set! dispatch-count 0)
(set! running (make-ring (make-engine boot-thunk)))
(dispatch)))
(define spin
(lambda (n)
(when (not (zero? n))
(spin (- n 1)))))
(define trap
(lambda args
(call/cc
(lambda (k)
(engine-return (cons k args))))))
(define trap-handler
(rec trap
(lambda args
(let ((trap-type (car args))
(arg1 (when (not (null? (cdr args))) (cadr args))))
(case trap-type
(unblock ((running 'insert-left!) arg1) '*)
(block (when (eq? running arg1)
(if (running 'singleton?)
(begin (error 'trap-handler "DEADLOCK")
(boot))
(begin (set! running (running 'left))
(set! pause #!true))))
(arg1 'delete!)
'*)
(fork (let ((pcb (make-ring
(make-engine
(lambda ()
(arg1)
(error 'trap-handler
"process tried to return"))))))
((running 'insert-left!) pcb)
pcb))
(pause (set! pause #!true))
(self running)
(wait (let ((↑value arg1) (queue (caddr args)))
(set-box! ↑value (- (unbox ↑value) 1))
(when (negative? (unbox ↑value))
(let ((self (trap 'self)))
(trap 'block self)
((queue 'enq!) self)))
'*))
(signal (let ((↑value arg1) (queue (caddr args)))
(set-box! ↑value (+ 1 (unbox ↑value)))
(when (not (positive? (unbox ↑value)))
(trap 'unblock (queue 'deq!)))))
(else (ferror 'trap-handler "bad trap arguments: ~a" args)
(reset)))))))
(define make-semaphore
(lambda (count)
(let ((↑value (box count))
(queue (make-queue)))
(lambda (msg)
(case msg
(wait (trap 'wait ↑value queue))
(signal (trap 'signal ↑value queue))
(empty? (queue 'empty?)))))))
(define parbegin-thunks
(lambda (thunks)
(let ((n (length thunks))
(mutex (make-semaphore 1))
(done (make-semaphore 0)))
(for-each (lambda (thunk)
(trap 'fork
(lambda ()
(thunk)
(mutex 'wait)
(set!! n (- n 1))
(when (zero? n) (done 'signal))
(mutex 'signal)
(trap 'block (trap 'self)))))
thunks)
(done 'wait))))
∂30-Apr-87 1603 @MC.LCS.MIT.EDU:willc%tekchips.tek.com@RELAY.CS.NET another set of primitives for concurrency
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 30 Apr 87 16:03:31 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 30 Apr 87 18:51:54 EDT
Received: from relay2.cs.net by RELAY.CS.NET id aa12445; 30 Apr 87 18:44 EDT
Received: from tektronix.tek.com by RELAY.CS.NET id ab16539; 30 Apr 87 18:39 EDT
Received: by tektronix.TEK.COM (5.51/6.20)
id AA25359; Thu, 30 Apr 87 13:16:32 PDT
Received: by tekchips.TEK.COM (5.31/6.19)
id AA15776; Thu, 30 Apr 87 13:17:27 PDT
Message-Id: <8704302017.AA15776@tekchips.TEK.COM>
To: Scheme@MC.LCS.MIT.EDU
Subject: another set of primitives for concurrency
Date: 30 Apr 87 13:17:25 PDT (Thu)
From: willc%tekchips.tek.com@RELAY.CS.NET
For comparison with Chris Haynes's posting of the Scheme engine
operating system, here is a quick description of the concurrency
primitives used in MacScheme+Toolsmith. They aren't as useful
as engines for writing a metacircular interpreter, however.
To use the concurrency features, you have to say
(begin-tasking)
You can say
(end-tasking)
to disable scheduling. The END-TASKING procedure doesn't kill any
tasks, so you can resume scheduling by calling BEGIN-TASKING again.
A RESET will kill all tasks and disable tasking. If an error occurs,
tasking continues while you're in the debugger, but if you quit out
of the debugger (instead of fixing the error and resuming) then a
RESET will be performed.
If a task reads from the keyboard when no characters are available,
a task switch occurs so another task can run while the one is waiting
for input. Tasks with time on their hands, such as a background task
that is monitoring the position of the mouse, can call
(surrender-timeslice)
to let some other task do something productive in the meantime. The
approximate size of a time slice is determined by a global variable.
Tasks are created and run by
(start-task <thunk>)
The <thunk> is called with no arguments and runs as a concurrent task.
The value returned by START-TASK is a task object. The task object
dies when <thunk> returns, or when someone calls KILL-TASKS on it:
(kill-tasks <task1> ...)
or when the task calls KILL-CURRENT-TASK. If all tasks die, then a
RESET is performed.
There is no hierarchy of tasks. Thus killing a task does not kill
tasks created by that task.
Synchronization is performed using side effects and
(call-without-interrupts <thunk>)
which calls <thunk> as an atomic action. The atomic action ends when
<thunk> returns.
Interrupts are also executed uninterruptibly (with certain exceptions,
such as when the debugger is called as the result of an error). The
interrupt system is programmable, with dynamically installed handlers
written in Scheme, but that's another discussion. The main use of
interrupts is to implement interactive objects such as windows as part
of the Macintosh user interface.
Scheme source for the task scheduler and interrupt system is supplied
with MacScheme+Toolsmith.
Peace, William Clinger
∂30-Apr-87 1928 @MC.LCS.MIT.EDU:sherin@linc.cis.upenn.edu environment networks
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 30 Apr 87 19:28:31 PDT
Received: from linc.cis.upenn.edu (TCP 1201000140) by MC.LCS.MIT.EDU 30 Apr 87 22:25:25 EDT
Received: by linc.cis.upenn.edu
id AA00580; Thu, 30 Apr 87 22:23:34 EDT
Date: Thu, 30 Apr 87 22:23:34 EDT
From: sherin@linc.cis.upenn.edu (Steve Sherin)
Posted-Date: Thu, 30 Apr 87 22:23:34 EDT
Message-Id: <8705010223.AA00580@linc.cis.upenn.edu>
To: scheme@mc.lcs.mit.edu
Subject: environment networks
I need to know how I might sandwich an arbitrary environment
between two another environments dynamically. I am presently
finishing up the translation of TI's SCOOPS object oriented
programming system, and I want to eliminate code walk-throughs
entirely. Being able to let a class environment point to
the instance variables in another environment is desirable.
I think the cleanest way to do that is by changing the parent
of the class environment during the run of the program.
Please send any suggestions/solutions to
sherin@linc.cis.upenn.edu.arpa
Thanks.
∂09-May-87 1206 @MC.LCS.MIT.EDU:VERACSD@A.ISI.EDU Re: Engine operating system (long msg)
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 May 87 12:06:17 PDT
Received: from A.ISI.EDU (TCP 3200600147) by MC.LCS.MIT.EDU 9 May 87 14:52:03 EDT
Date: 9 May 1987 14:50-EDT
Sender: VERACSD@A.ISI.EDU
Subject: Re: Engine operating system (long msg)
From: VERACSD@A.ISI.EDU
To: cth@IUCS.CS.INDIANA.EDU
Cc: scheme@MC.LCS.MIT.EDU
Message-ID: <[A.ISI.EDU] 9-May-87 14:50:30.VERACSD>
In-Reply-To: The message of Wed, 29 Apr 87 12:59:28 est from Chris Haynes <cth@iucs.cs.indiana.edu>
Chris,
Thanks very much for sharing your Scheme code to simulate concurrency.
This is very useful to me. (Your operating systems classes are extremely
fortunate. )
Cris Kobryn
VERACSD.CK@A.ISI.EDU
∂14-May-87 1244 @MC.LCS.MIT.EDU:MKATZ@A.ISI.EDU Scheme for lisp machines
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 14 May 87 12:44:20 PDT
Received: from A.ISI.EDU (TCP 3200600147) by MC.LCS.MIT.EDU 14 May 87 15:18:11 EDT
Date: 14 May 1987 15:13:37 EDT
Subject: Scheme for lisp machines
From: Morris Katz <MKATZ@A.ISI.EDU>
To: scheme@MC.LCS.MIT.EDU
Does anyone know of any versions of scheme for either Symbolics or TI
Lisp machines. Any info would be greatly appreciated.
Morry Katz
mkatz@a.isi.edu
-------
∂18-May-87 1745 @MC.LCS.MIT.EDU,@RELAY.CS.NET:bartley%home@TI-CSL.CSNET Should ":" be an extended alphabetic character?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 18 May 87 17:45:43 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 18 May 87 20:25:42 EDT
Received: from relay2.cs.net by RELAY.CS.NET id aa09388; 18 May 87 20:18 EDT
Received: from ti-csl by RELAY.CS.NET id aa12336; 18 May 87 20:15 EDT
Received: by tilde id AA03760; Mon, 18 May 87 17:38:55 CDT
Received: by home id AA17077; Mon, 18 May 87 17:38:47 cdt
Date: Mon, 18 May 87 17:38:47 cdt
From: David Bartley <bartley%home%ti-csl.csnet@RELAY.CS.NET>
Message-Id: <8705182238.AA17077@home>
To: RRRS-Authors@mc.lcs.mit.edu
Subject: Should ":" be an extended alphabetic character?
This has come up before, but not in the context of the current
standardization cycle.
The ":" character is defined in 2.1 of R3RS to be one of the extended
alphabetic characters and thus a valid constituent of a Scheme
identifier. This is a minor inconvenience to those of us who would
like to carry over the C*mm*n Lisp notation for package qualifiers
into Scheme implementations that are either based on C*mm*n Lisp or
otherwise coresident with C*mm*n Lisp.
What to do?
(1) Convince everyone that ":" should not be an extended alphabetic
character.
(2) Allow users to declare which meaning of ":" is to be used (e.g.,
on a file by file basis).
(3) Leave ":" alone and use a different notation for package qualifiers.
Is there any hope for #1? Is #2 acceptable? Any suggestions for #3?
Has anyone else faced this problem?
[Note: I am not advocating packages. I hate them. I'm merely
concerned that I find a reasonable way to live with them when
procedures in the two languages need to talk to each other.]
--db--
∂18-May-87 1910 @MC.LCS.MIT.EDU:dyb@iuvax.cs.indiana.edu Re: Should ":" be an extended alphabetic character?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 18 May 87 19:10:15 PDT
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 18 May 87 22:05:32 EDT
Date: Mon, 18 May 87 21:04:26 est
From: R. Kent Dybvig <dyb@iuvax.cs.indiana.edu>
Received: by iuvax.cs.indiana.edu; id AA10631; Mon, 18 May 87 21:04:26 est
To: RRRS-Authors@mc.lcs.mit.edu, bartley%home%ti-csl.csnet@RELAY.CS.NET
Subject: Re: Should ":" be an extended alphabetic character?
I remember resolving to remove ":" from the set of extended alphabetic
characters, but apparently I was wrong...the report does indeed say that
":" is an extended alphabetic character. I would (again) vote that it
be removed from this set. One of our stated goals (which we of course
fall short of in other cases) is to avoid gratuitous incompatibilities
with Common Lisp. Removing it means only that portable programs should
not use it, not that we are planning to standardize on packages!
∂18-May-87 1929 @MC.LCS.MIT.EDU:andy%hobbes@ads.ARPA Re: Should ":" be an extended alphabetic character?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 18 May 87 19:29:40 PDT
Received: from grape.ads.ARPA (TCP 1200400070) by MC.LCS.MIT.EDU 18 May 87 22:12:41 EDT
Received: from ads.ARPA (ads.arpa.ARPA) by grape.ads.ARPA (4.12/4.7)
id AA14446; Mon, 18 May 87 18:30:22 pdt
Received: by hobbes.ads.arpa (3.2/SMI-3.2)
id AA04880; Mon, 18 May 87 18:31:21 PDT
Date: Mon, 18 May 87 18:31:21 PDT
From: andy%hobbes@ads.ARPA (Andy Cromarty)
Message-Id: <8705190131.AA04880@hobbes.ads.arpa>
To: RRRS-Authors@mc.lcs.mit.edu
Subject: Re: Should ":" be an extended alphabetic character?
Cc: bartley%home%ti-csl.csnet@RELAY.CS.NET
Reply-To: andy@ADS.arpa
We have experienced little difficulty with Common LISP -> R3RS
code ports, precisely because ":" is an extended alphabetic character.
I advocate leaving it this way.
That is, (cons foo:x (list 3)) is meaningful and well-defined as an
operation on the unique variable named "foo:x" in both Scheme and
Common LISP, for the obvious reasons, and in nearly all cases we've
encountered, it ports cleanly without any additional attention or concern.
The cleanliness of this porting task is a function of the uniqueness of
colon-qualified symbols in Scheme, which in turn is in a sense guaranteed
by the very property of ":" being extended-alphabetic.
We have implemented a macro packages, using our local definition of
"macro", to map just enough of the Common LISP package system's
constructs into Scheme so as to permit CL code to run, without making
it desirable to use this pseudo-package kludge when writing new code.
(In my view, discouraging package use in this manner is an important
design feature of this approach.)
asc
p.s. If you want to worry about ":" and Common LISP code ports, worry
about keywords. The only simple way to get your CL code to work
in Scheme (as far as we've been able to see so far) is to quote
all CL keywords -- which, fortuitously, happens to work, since (1)
':foo = :foo in CL and (2) R3RS doesn't contain (SYM)EVAL. But
it does require either alteration of the CL source or preprocessing
of the source before/during loading into the Scheme environment.
∂19-May-87 0654 @MC.LCS.MIT.EDU:jinx@GENEVA.AI.MIT.EDU Should ":" be an extended alphabetic character?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 19 May 87 06:54:11 PDT
Received: from geneva (TCP 2206400372) by MC.LCS.MIT.EDU 19 May 87 09:52:57 EDT
Received: by GENEVA.AI.MIT.EDU; Tue, 19 May 87 08:25:28 edt
Date: Tue, 19 May 87 08:25:28 edt
From: jinx@GENEVA.AI.MIT.EDU (Guillermo J. Rozas)
Message-Id: <8705191225.AA07690@geneva>
To: andy@ADS.arpa
Cc: RRRS-Authors@mc.lcs.mit.edu, bartley%home%ti-csl.csnet@RELAY.CS.NET
In-Reply-To: Andy Cromarty's message of Mon, 18 May 87 18:31:21 PDT <8705190131.AA04880@hobbes.ads.arpa>
Subject: Should ":" be an extended alphabetic character?
Reply-To: jinx@zurich.ai.mit.edu
I don't think the issue here is porting code from one language to
another, but rather to have implementations of both languages coexist
in a single Lisp environment, so that procedures written in one or the
other are mutually "callable".
I suspect the problem arises when Scheme symbols reside in a Common
Lisp package (called scheme ?) which is part of the startup set of
packages. Then Scheme code would have a hard time referencing
variables (or invoking procedures) whose names belong to packages
which are not in the "current" inheritance chain. CL code would also
have a hard time referencing Scheme variables (or invoking Scheme
procedures) whose name had a ':' character. Note that the
interpretation of ':' at read time is not really an issue, since the
reader could be conditionalized according to the language being read.
If the above is a correct statement of the problem, there are two
possibilities:
1) Remove ':' from Scheme. The Scheme reader could then treat ':' the
same way as the CL reader, and intern the symbol in the right place.
What it would do with the function/value distinction in that package
is quite a different matter.
2) Add some non-standard reader-syntax which allows mutual references.
For example, assuming that #: is not a predefined reader macro in CL
(there are so many, I don't know which mean anything and which do not),
#:foo in CL would specify scheme:foo, and #:foo:bar in CL would be the
symbol in the scheme package whose print name is foo:bar. Similarly
#:foo in Scheme would represent the CL symbol foo (in user ?), while
#:foo:bar in Scheme would be the way to type the CL symbol bar in
package foo.
Although I like to use ':' in my identifiers, I really don't care much
either way. I'm just worried about gratuituous compatibilities with
CL caused by features of CL which I consider distasteful.
∂19-May-87 0818 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Should ":" be an extended alphabetic character?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 19 May 87 08:18:37 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 19 May 87 11:17:03 EDT
Date: Tue, 19 May 87 11:17:01 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Should ":" be an extended alphabetic character?
To: bartley%home%ti-csl.csnet@RELAY.CS.NET
cc: RRRS-Authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Mon 18 May 87 17:38:47 cdt from David Bartley <bartley%home%ti-csl.csnet at RELAY.CS.NET>
Message-ID: <202163.870519.JAR@AI.AI.MIT.EDU>
Date: Mon, 18 May 87 17:38:47 cdt
From: David Bartley <bartley%home%ti-csl.csnet at RELAY.CS.NET>
To: RRRS-Authors at mc.lcs.mit.edu
Re: Should ":" be an extended alphabetic character?
I have no opinion on this. When it came up before, there were some
objections to removing : from the list of extended alphabetics, and as
editor I took the "conservative" stance of making minimal changes to the
report.
I have no strong opinion on this question. I wouldn't be sad to see :
classified with / | [ ] { }. In fact such a change would reduce
by one the number of bugs in my implementation (pseudoscheme).
∂19-May-87 0918 @MC.LCS.MIT.EDU,@RELAY.CS.NET:bartley%home@TI-CSL.CSNET Should ":" be an extended alphabetic character?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 19 May 87 09:18:41 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 19 May 87 12:16:22 EDT
Received: from relay2.cs.net by RELAY.CS.NET id aa16101; 19 May 87 12:07 EDT
Received: from ti-csl by RELAY.CS.NET id ab17227; 19 May 87 12:02 EDT
Received: by tilde id AA16633; Tue, 19 May 87 09:33:05 CDT
Received: by home id AA26570; Tue, 19 May 87 09:33:02 cdt
Date: Tue, 19 May 87 09:33:02 cdt
From: David Bartley <bartley%home%ti-csl.csnet@RELAY.CS.NET>
Message-Id: <8705191433.AA26570@home>
To: andy@ADS.ARPA
Cc: RRRS-Authors@mc.lcs.mit.edu, Bartley%home%ti-csl.csnet@RELAY.CS.NET
In-Reply-To: Andy Cromarty's message of Mon, 18 May 87 18:31:21 PDT <8705190131.AA04880@hobbes.ads.arpa>
Subject: Should ":" be an extended alphabetic character?
> We have experienced little difficulty with Common LISP -> R3RS
> code ports, precisely because ":" is an extended alphabetic character.
> I advocate leaving it this way.
My problem is not porting code written in Common Lisp over to Scheme.
Leaving ":" as a constituent certainly works well for that purpose.
My problem is implementing the two languages in a single shared
namespace. Procedures written in either language will be exposed to
symbols read by the other's reader.
--db--
∂19-May-87 1645 @MC.LCS.MIT.EDU,@RELAY.CS.NET:willc@tekchips.tek.com Re: Should ":" be an extended alphabetic character?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 19 May 87 16:45:37 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 19 May 87 19:09:13 EDT
Received: from relay2.cs.net by RELAY.CS.NET id ab20747; 19 May 87 18:47 EDT
Received: from tektronix.tek.com by RELAY.CS.NET id ad19307; 19 May 87 18:41 EDT
Received: by tektronix.TEK.COM (5.51/6.21)
id AA01520; Tue, 19 May 87 13:20:35 PDT
Received: by tekchips.TEK.COM (5.51/6.19)
id AA22634; Tue, 19 May 87 13:02:51 PDT
Message-Id: <8705192002.AA22634@tekchips.TEK.COM>
To: bartley%home%ti-csl.csnet@RELAY.CS.NET
Cc: RRRS-Authors@mc.lcs.mit.edu, willc%tekchips.tek.com@RELAY.CS.NET
Subject: Re: Should ":" be an extended alphabetic character?
In-Reply-To: Your message of Mon, 18 May 87 17:38:47 cdt.
<8705182238.AA17077@home>
Date: 19 May 87 13:02:47 PDT (Tue)
From: willc%tekchips.tek.com@RELAY.CS.NET
I'm willing to be convinced otherwise, but right now I'm in favor of
leaving ":" as an extended alphabetic character. Maybe somebody should
explain to me how banning ":" would help. Here's how I see it:
When porting Scheme code to Common Lisp (a thing few of us really want
to do), you can pretty much get away with replacing all occurrences of
":" by a character that's illegal in Scheme but a constituent in Common
Lisp, such as "[".
When porting Common Lisp code to Scheme, there are several problems
you can have with symbols and packages:
1. Symbols in the keyword package. You can pretty much get by
with making ":" into a non-terminating macro character so that
:FOO turns into (QUOTE FOO). My apologies for not having the
customizable reader proposal out yet; you can do fairly well
without a customizable reader by replacing all occurrences of
" :" by " '".
2. Qualified symbols that are not in the USER package. Since ":"
is an extended alphabetic character in Scheme, you can just
leave these alone.
3. Qualified symbols that are in the USER package. Here you
lose, unless the symbol is qualified wherever it appears.
I would think, though, that even the Common Lisp community
considers it poor style to intermix USER:FOO and FOO within
the same file.
4. Unqualified symbols that are in the USER package. You can
leave these alone.
5. Unqualified symbols that are not in the USER package. Here
you lose big, but there's no way to avoid losing big without
adding a package system to Scheme. I know you can use
environments to fake some things, but a silk purse is a
poor substitute for the sow's ear.
The most severe problems come from unqualified symbols (5), so I don't
see how banning ":" from Scheme identifiers would help. To the contrary,
banning ":" would definitely cause new problems with qualified symbols (2).
On the other hand, I've never converted any Common Lisp code that made
significant use of packages so I don't know what I'm talking about.
Peace, Will
∂19-May-87 2117 @MC.LCS.MIT.EDU:ALAN@AI.AI.MIT.EDU Should ":" be an extended alphabetic character?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 19 May 87 21:17:14 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 20 May 87 00:15:36 EDT
Date: Wed, 20 May 87 00:15:53 EDT
From: Alan Bawden <ALAN@AI.AI.MIT.EDU>
Subject: Should ":" be an extended alphabetic character?
To: RRRS-Authors@MC.LCS.MIT.EDU
Message-ID: <202573.870520.ALAN@AI.AI.MIT.EDU>
By my reading of the Thrice Revised Report, in implementations that truely
support ":" as an extended alphabetic character it should be the case
that:
(eq? 'user:cons 'lisp:cons) => #F
Yet in implementations where ":" provides access to a Common Lisp style
package system it will be the case that this returns #T.
Thus it seems to me that the two are incompatible. If you wish to permit
Scheme implementations to access a package system using ":", while
continuing to conform to the definition of the language, then you have to
give ":" some status other than extended alphabetic.
∂20-May-87 1001 June meeting
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 20 May 87 10:00:59 PDT
Received: from STAR.STANFORD.EDU (TCP 4402400005) by MC.LCS.MIT.EDU 20 May 87 12:56:57 EDT
Received: from ECL1 by STAR.STANFORD.EDU via MAIL-11 with DECnet; Wed,
20 May 87 09:55:45-PST
From: CSC2::EEK%ECL1.SPAN@STAR.STANFORD.EDU
Subject: June meeting
To: ECL1::STAR::"rrrs-authors@mc.lcs.mit.edu"@ECL1.SPAN
Have any local arrangements for a hotel been made? I called the
Marriott reservation number this morning and found out that they don't
have many rooms available at the Cambridge Marriott.
--Eugene
∂20-May-87 1949 @MC.LCS.MIT.EDU:sherin@linc.cis.upenn.edu
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 20 May 87 19:49:35 PDT
Received: from linc.cis.upenn.edu (TCP 1201000140) by MC.LCS.MIT.EDU 20 May 87 22:44:28 EDT
Received: by linc.cis.upenn.edu
id AA04490; Wed, 20 May 87 22:43:59 EDT
Date: Wed, 20 May 87 22:43:59 EDT
From: sherin@linc.cis.upenn.edu (Steve Sherin)
Posted-Date: Wed, 20 May 87 22:43:59 EDT
Message-Id: <8705210243.AA04490@linc.cis.upenn.edu>
To: scheme@mc.lcs.mit.edu
*************************************************************************
Just when you thought you could sleep at night...
Just when you thought you were some from unidentified flyin' objects...
SCOOPS arives.
YEAH!! HOORAY!!
*************************************************************************
SCOOPS is an object-oriented system developed for TI Scheme.
It has been fully ported (as far as I can tell) to cscheme, and
it runs under the new cscheme5 beta release. I have written
a small doc file (not very stylish, but hopefully of assistance).
All the files are available by ftp'ing to linc.cis.upenn.edu
and going to /usr/users/sherin/scoops . The originals
are also there in a subdirectory. The file scoops.scm is the fully
functional file--just a copy of the individual files needed
for SCOOPS. Please help yourselves. Anyone with difficulty
getting the data should send me e-mail.
Enjoy it,
Steve
=============================================================================
sherin@linc.cis.upenn.edu
∂21-May-87 0900 @MC.LCS.MIT.EDU:sherin@linc.cis.upenn.edu
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 21 May 87 09:00:25 PDT
Received: from linc.cis.upenn.edu (TCP 1201000140) by MC.LCS.MIT.EDU 21 May 87 11:51:12 EDT
Received: by linc.cis.upenn.edu
id AA09027; Thu, 21 May 87 11:50:39 EDT
Date: Thu, 21 May 87 11:50:39 EDT
From: sherin@linc.cis.upenn.edu (Steve Sherin)
Posted-Date: Thu, 21 May 87 11:50:39 EDT
Message-Id: <8705211550.AA09027@linc.cis.upenn.edu>
To: scheme@mc.lcs.mit.edu
My apologees to those who couldn't access SCOOPS. It
has been copied to ~ftp/pub/scoops (pub/scoops when ftp'ing
anonymously).
Happy hunting!
PS Please let me know about software developed with SCOOPS.
Steve
sherin@linc.cis.upenn.edu
============================================================================
"Every passing hour brings the Solar System forty-three miles closer
to Globular Cluster M13 in Hercules--and still there are some misfits
who insist that there is no such thing as progress."
--Ransom K. Ferm
preface to Vonnegut's _Sirens of Titan
I received requests from seismo and netnorth. I was unable to
send mail to those places. If you need the SCOOPS files mailedλ
to you, please indicate exactly how to mail them from this arpanet
site.
You can use wiscvm.wisc.edu as my site extension.
Thanks,
Steve
sherin@linc.cis.upenn.edu
∂21-May-87 1027 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU June meeting -- accommodations
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 21 May 87 10:27:00 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 21 May 87 13:12:57 EDT
Date: Thu, 21 May 87 13:13:15 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: June meeting -- accommodations
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <203556.870521.JAR@AI.AI.MIT.EDU>
From: CSC2::EEK%ECL1.SPAN at STAR.STANFORD.EDU
To: ECL1::STAR::"rrrs-authors@mc.lcs.mit.edu" at ECL1.SPAN
Re: June meeting
Have any local arrangements for a hotel been made? I called the
Marriott reservation number this morning and found out that they don't
have many rooms available at the Cambridge Marriott.
I have as yet made no arrangements. Given that there are so few people
it's probably best if everyone fended for themselves. But here is some
information.
All the big hotels seem to have special rates for official MIT visits.
I'm not sure how anal the hotels are about this; I don't believe MIT has
to be directly involved in order for you to get the rate, and one person
I talked to said that the rate is available to people who just come to
MIT for, say, a lecture. So by all means ask to get the MIT rate. If
for some reason this doesn't work give me a call and I'll see what I can
do.
Here are some nearby hotel possibilities:
name phone 617- approx distance MIT's rate regular rates
from meeting per room single/double
Marriott 494-6600 0.4 mile 99 (I forgot to ask)
Royal Sonesta 491-3600 1 mile 95 130/145
Hyatt Regency 492-1234 1.1 mile 89 155 and up
Howard Johnson 492-7777 1.4 miles 78/84 85/95
All of them said they had rooms available for 26-28 June.
Note that the rate is usually per room, so if you double up you'll save
a lot of money. If you'd like help finding a roommate let me know.
The brand new Cambridge Marriott is extremely convenient to MIT and the
T. All the heavy construction is over, so I don't think noise will be a
problem. I recommend it, although I've never stayed there myself. But
you should act soon if what Eugene says is true.
If these prices are too steep, there are many inns and guest houses
around with rates as low as $15 (as of last year), but few are close to
MIT, and I have no experience with them. I have a list of these,
prepared by MIT, which I can send (US mail) to anyone who wants it.
- Jonathan
∂21-May-87 1112 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU who will be there
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 21 May 87 11:11:04 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 21 May 87 14:08:08 EDT
Date: Thu, 21 May 87 14:08:26 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: who will be there
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <203585.870521.JAR@AI.AI.MIT.EDU>
This group has no policy on either membership or voting; should it?
Membership on rrrs-authors currently depends on being nominated by
someone already on the list. Is being on rrrs-authors the same as being
invited to the June meeting?
The meeting is apparently not open to the public -- we haven't announced
it on the scheme@mc list. In fact, the membership of scheme@mc isn't
even aware of the existence of rrrs-authors or the imminence of the
meeting. It seems like a good idea to restrict attendance somewhat, but
are we going overboard in being so exclusive? I don't necessarily want
to answer yes, I just want to say that I can't remember these questions
ever having been discussed.
I would like to encourage Julian Padget or any of the other Eulisp
designers to come.
----
Here is my current list of people who have told me they plan to
attend.
Norman Adams
David Bartley (will probably miss Saturday)
Michael Blair
Matthias Felleisen
Bert Halstead
Chris Hanson
Chris Haynes
Eugene Kohlbecker
David Kranz
Jim Miller
Jim Philbin
John Ramsdell
Jonathan Rees
Bill Rozas
G J Sussman
I assume that the following people will be there, although I can't
recall having received definite word from them (I forget such things):
Will Clinger
Richard Kelsey
Mitch Wand
The following people participated in the debate over the date, although
they haven't confirmed that they'll attend:
Kent Dybvig
Dick Gabriel
Kent Pitman
Dan Friedman won't be able to attend.
Among the authors of the R↑nRS's (n = 0,1,2,3) this leaves the
following people unaccounted for:
Hal Abelson
Gary Brooks
Guy Steele
I don't think there's any burning need at this point to inform me of
your plans one way or the other, since the dates have been set and the
room has been reserved. If you show up you show up.
What time should we start in the morning? I have reserved the room for
9 to 5, but most of us are either night people or will be jet-lagging,
so would 10 be better?
- Jonathan
∂21-May-87 1300 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU correction
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 21 May 87 13:00:26 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 21 May 87 15:58:45 EDT
Date: Thu, 21 May 87 15:59:03 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: correction
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <203657.870521.JAR@AI.AI.MIT.EDU>
In my previous message I inadvertantly omitted Don Oxley from the list
of authors whose plans are unknown.
∂21-May-87 2155 @MC.LCS.MIT.EDU:sherin@linc.cis.upenn.edu
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 21 May 87 21:55:03 PDT
Received: from linc.cis.upenn.edu (TCP 1201000140) by MC.LCS.MIT.EDU 22 May 87 00:47:58 EDT
Received: by linc.cis.upenn.edu
id AA15207; Fri, 22 May 87 00:47:15 EDT
Date: Fri, 22 May 87 00:47:15 EDT
From: sherin@linc.cis.upenn.edu (Steve Sherin)
Posted-Date: Fri, 22 May 87 00:47:15 EDT
Message-Id: <8705220447.AA15207@linc.cis.upenn.edu>
To: scheme@mc.lcs.mit.edu
I am having trouble reaching wu and
munnari!cidam.oz!mg@seismo.css.gov
Please send your ARPA addresses so I can send you scoops.
Also, indicate whether or not you'd like the Texas Instruments
originals in addition.
Any suggestions are welcomed. If you don't get a reply,
keep psending mail. I'll try to be quick about it as I want
SCOOPS to be distributed to everyone that wants it. There
is a slight conversion to run if using an older version
of cscheme, but that should be minor (and is in the README!
file).
Steve
sherin@linc.cis.upenn.edu
∂21-May-87 2314 @MC.LCS.MIT.EDU:sherin@linc.cis.upenn.edu Getting scoops... (Please give arpa pathway back.)
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 21 May 87 23:13:59 PDT
Received: from linc.cis.upenn.edu (TCP 1201000140) by MC.LCS.MIT.EDU 22 May 87 02:08:02 EDT
Received: by linc.cis.upenn.edu
id AA15633; Fri, 22 May 87 02:07:26 EDT
Date: Fri, 22 May 87 02:07:26 EDT
From: sherin@linc.cis.upenn.edu (Steve Sherin)
Posted-Date: Fri, 22 May 87 02:07:26 EDT
Message-Id: <8705220607.AA15633@linc.cis.upenn.edu>
To: scheme@mc.lcs.mit.edu
Subject: Getting scoops... (Please give arpa pathway back.)
I am having trouble reaching wu and
munnari!cidam.oz!mg@seismo.css.gov
Please send your ARPA addresses so I can send you scoops.
Also, indicate whether or not you'd like the Texas Instruments
originals in addition.
Any suggestions are welcomed. If you don't get a reply,
keep psending mail. I'll try to be quick about it as I want
SCOOPS to be distributed to everyone that wants it. There
is a slight conversion to run if using an older version
of cscheme, but that should be minor (and is in the README!
file).
Steve
sherin@linc.cis.upenn.edu
∂22-May-87 0732 @MC.LCS.MIT.EDU,@MIT-Multics.ARPA:NETWORK@FRSAC11.BITNET CScheme Rel 5
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 22 May 87 07:31:56 PDT
Received: from MIT-Multics.ARPA (TCP 1200000006) by MC.LCS.MIT.EDU 22 May 87 10:22:40 EDT
Received: from FRSAC11(NETWORK) by MITVMA (Mailer X1.23) id 0285;
Fri, 22 May 87 10:17:43 EDT
Date: Fri, 22 May 87 16:05:28 GMT
To: scheme@mc.lcs.MIT.EDU
From: NETWORK@FRSAC11.BITNET
Subject: CScheme Rel 5
Date: 22 May 1987, 15:56:41 GMT
From: NETWORK at FRSAC11
To: SCHEME at MC.LCS
MIT Scheme Rel 5 is available only by FTP, and I suppose it is a big file.
A suggestion: send it to SIMTEL20.ARPA, they have the previous version
as PD:<unix.gnu>scheme.tar, a file of over 3 megabytes, but being on this
server, anybody from ARPA or BITNET etc... can get it.
If some kind soul want to do it, talk to Tom Harrison
UNIX-SW-REQUEST@SIMTEL20 .
A lot easier than making tapes!!!
P.S. I can FTP the thing, to bring it to my computer would cost me several
hundred dollars in communication cost...
Sincerly,
Jean-Pierre H. Dumas
network@frsac11 (bitnet)
network%frsac11.bitnet@wiscvm.wisc.edu (arpanet)
..!ihnp4!frsac11.bitnet!network (usenet ?)
dumas@sumex-aim.stanford.edu (arpanet)
∂22-May-87 1043 @MC.LCS.MIT.EDU:CPH@AI.AI.MIT.EDU CScheme Rel 5
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 22 May 87 10:43:29 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 22 May 87 12:31:46 EDT
Date: Fri, 22 May 87 12:16:58 EDT
From: Chris Hanson <CPH@AI.AI.MIT.EDU>
Subject: CScheme Rel 5
To: "NETWORK@FRSAC11.BITNET"@AI.AI.MIT.EDU
cc: scheme@MC.LCS.MIT.EDU, info-cscheme%oz@MC.LCS.MIT.EDU
In-reply-to: Msg of Fri 22 May 87 16:05:28 GMT from NETWORK at FRSAC11.BITNET
Message-ID: <204092.870522.CPH@AI.AI.MIT.EDU>
Date: Fri, 22 May 87 16:05:28 GMT
From: NETWORK at FRSAC11.BITNET
To: scheme at mc.lcs.MIT.EDU
Re: CScheme Rel 5
MIT Scheme Rel 5 is available only by FTP, and I suppose it is a big file.
A suggestion: send it to SIMTEL20.ARPA, they have the previous version
as PD:<unix.gnu>scheme.tar, a file of over 3 megabytes, but being on this
server, anybody from ARPA or BITNET etc... can get it.
Please don't send mail regarding MIT C Scheme to this list. Send it
to info-cscheme%oz@mc instead. If you or anyone else wants to be on
this list, send a request to info-cscheme-request%oz@mc.
This is not a good time to move a copy of Rel 5 since it is in beta
test and we are about to release it for real. Keep posted on the
info-cscheme list for details.
∂23-May-87 2256 @MC.LCS.MIT.EDU:sherin@linc.cis.upenn.edu Scoops bug fix
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 May 87 22:56:22 PDT
Received: from linc.cis.upenn.edu (TCP 1201000140) by MC.LCS.MIT.EDU 24 May 87 01:52:22 EDT
Received: by linc.cis.upenn.edu
id AA13233; Sun, 24 May 87 01:51:22 EDT
Date: Sun, 24 May 87 01:51:22 EDT
From: sherin@linc.cis.upenn.edu (Steve Sherin)
Posted-Date: Sun, 24 May 87 01:51:22 EDT
Message-Id: <8705240551.AA13233@linc.cis.upenn.edu>
To: scheme@mc.lcs.mit.edu
Subject: Scoops bug fix
5/24/87--METHODS.SCM:
In the define-methods macro
> ,formal-list <
was changed to > ',formal-list <
to enable methods with parameters.
>>Steve Sherin
;;Here's a little test file:
;;; Stacks with Scoops--Steve Sherin
(define-class stack (instvars the-stack) (options inittable-variables
gettable-variables settable-variables))
(define-method (stack push) (value) (set! the-stack (cons value the-stack)))
(define-method (stack tos) () (if the-stack (car the-stack)))
(define-method (stack pop) () (if the-stack
(let ((top (tos)))
(set! the-stack (cdr the-stack))
top)))
;;Steve
;; sherin@linc.cis.upenn.edu
∂25-May-87 0853 @MC.LCS.MIT.EDU:sherin@linc.cis.upenn.edu scoops bug found
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 25 May 87 08:53:36 PDT
Received: from linc.cis.upenn.edu (TCP 1201000140) by MC.LCS.MIT.EDU 25 May 87 11:48:39 EDT
Received: by linc.cis.upenn.edu
id AA18602; Mon, 25 May 87 02:09:13 EDT
Date: Mon, 25 May 87 02:09:13 EDT
From: sherin@linc.cis.upenn.edu (Steve Sherin)
Posted-Date: Mon, 25 May 87 02:09:13 EDT
Message-Id: <8705250609.AA18602@linc.cis.upenn.edu>
To: scheme@mc.lcs.mit.edu
Subject: scoops bug found
5/24/87--METHODS.SCM:
In the define-methods macro
> ,formal-list <
was changed to > ',formal-list <
to enable methods with parameters.
>>Steve Sherin
5/25/87
In the file INSTANCE.SCM:
(define-macro (%sc-compile-class class) ... )
has been changed to
(define (%sc-compile-class class)
(begin
(%inherit-method-vars class)
(eval (%make-template (%sc-name class) class)
user-initial-environment)))
This made sure classes always compile in the user-initial-environment.
>>Steve Sherin
I will continue to post bug fixes as they are found and
maintain a list in ~ftp/pub/scoops on linc@cis.upenn.edu.
Steve
∂26-May-87 1413 @MC.LCS.MIT.EDU,@RELAY.CS.NET:janeta@albatross.uss.tek.com Forwarded Mail
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 26 May 87 14:13:03 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 26 May 87 16:41:53 EDT
Received: from relay2.cs.net by RELAY.CS.NET id aa23017; 26 May 87 16:07 EDT
Received: from tektronix.tek.com by RELAY.CS.NET id au03093; 26 May 87 16:02 EDT
Received: by tektronix.TEK.COM (5.51/6.21)
id AA07988; Tue, 26 May 87 10:54:47 PDT
Received: by albatross.USS.TEK.COM (3.2/6.19)
id AA05828; Tue, 26 May 87 10:54:38 PDT
Message-Id: <8705261754.AA05828@albatross.USS.TEK.COM>
To: scheme@mc.lcs.mit.edu
From: postmaster <@RELAY.CS.NET,@tektronix.tek.com:postmaster@tektronix.tek.com>
Subject: Forwarded Mail
Date: 26 May 87 10:54:36 PDT (Tue)
Sender: janeta%albatross.uss.tek.com@RELAY.CS.NET
You message was interrupted at tektronix, due to a temporary problem.
Sorry, for the inconvenience,
Jan Acker
------- Forwarded Message
From: MAILER-DAEMON@tektronix.TEK.COM (Mail Delivery Subsystem)
Date: Fri, 22 May 87 09:11:51 PDT
To: mmdf@tektronix
Subject: Returned mail: Unable to deliver mail
----- Transcript of session follows -----
554 mmdf... Recipient names must be specified
----- Unsent message follows -----
Received: by tektronix.TEK.COM (5.51/6.21)
id AA17113; Fri, 22 May 87 09:11:51 PDT
Message-Id: <8705221611.AA17113@tektronix.TEK.COM>
Received: from csnet-relay by .TEK.COM id af16738; 22 May 87 8:53 PDT
Received: from relay.cs.net by RELAY.CS.NET id am07904; 22 May 87 10:42 EDT
Received: from mc.lcs.mit.edu by RELAY.CS.NET id aa20788; 22 May 87 10:42 EDT
Received: from MIT-Multics.ARPA (TCP 1200000006) by MC.LCS.MIT.EDU 22 May 87 10
:22:40 EDT
Received: from FRSAC11(NETWORK) by MITVMA (Mailer X1.23) id 0285;
Fri, 22 May 87 10:17:43 EDT
Date: Fri, 22 May 87 16:05:28 GMT
To: scheme@mc.lcs.mit.edu
From: NETWORK@frsac11.bitnet
Subject: CScheme Rel 5
Date: 22 May 1987, 15:56:41 GMT
From: NETWORK at FRSAC11
To: SCHEME at MC.LCS
MIT Scheme Rel 5 is available only by FTP, and I suppose it is a big file.
A suggestion: send it to SIMTEL20.ARPA, they have the previous version
as PD:<unix.gnu>scheme.tar, a file of over 3 megabytes, but being on this
server, anybody from ARPA or BITNET etc... can get it.
If some kind soul want to do it, talk to Tom Harrison
UNIX-SW-REQUEST@SIMTEL20 .
A lot easier than making tapes!!!
P.S. I can FTP the thing, to bring it to my computer would cost me several
hundred dollars in communication cost...
Sincerly,
Jean-Pierre H. Dumas
network@frsac11 (bitnet)
network%frsac11.bitnet@wiscvm.wisc.edu (arpanet)
..!ihnp4!frsac11.bitnet!network (usenet ?)
dumas@sumex-aim.stanford.edu (arpanet)
------- End of Forwarded Message
∂01-Jun-87 1824 @MC.LCS.MIT.EDU,@RELAY.CS.NET:willc@tekchips.tek.com customizable reader
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 1 Jun 87 18:24:24 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 1 Jun 87 21:23:52 EDT
Received: from relay2.cs.net by RELAY.CS.NET id aa08552; 1 Jun 87 21:02 EDT
Received: from tektronix.tek.com by RELAY.CS.NET id ak19626; 1 Jun 87 20:55 EDT
Received: by tektronix.TEK.COM (5.51/6.22)
id AA07280; Mon, 1 Jun 87 16:11:52 PDT
Received: by tekchips.TEK.COM (5.51/6.19)
id AA08602; Mon, 1 Jun 87 16:14:00 PDT
Message-Id: <8706012314.AA08602@tekchips.TEK.COM>
To: rrrs-authors@mc.lcs.mit.edu
Cc: willc%tekchips.tek.com@RELAY.CS.NET
Subject: customizable reader
Date: 01 Jun 87 16:13:58 PDT (Mon)
From: willc%tekchips.tek.com@RELAY.CS.NET
Here's a proposal for the yellow pages: a customizable reader patterned
after Guy Steele's in CLtL. It adds yet another optional argument to
read, but at least it doesn't have any global state. If you like global
state you can, of course, redefine the READ and READ-DELIMITED-LIST
procedures to use a different default readtable.
The proposal does not support the following Common Lisp features:
non-preservation of whitespace, eof-error-p, eof-value, recursive-p,
zero return values, packages.
Since the status of #\| and #\\ is not specified, it is not specified
whether there are any single or multiple escape characters in the
standard readtable. Et cetera. I haven't bothered to specify the token
parser used by the standard readtable because the number syntax is still
a topic of discussion.
The description assumes two new types: the readtable and syntax types.
These types do not have to be distinct from existing types. In my
prototype implementation I use vectors. If we had structures, they
would undoubtedly be structures.
================================================================
(read) --> object
(read port) --> object
(read port readtable) --> object
The readtable argument defaults to the standard readtable.
By specifying an explicit readtable you can inflict your own
crazy syntax on the characters read from the port.
(read-delimited-list char) --> object
(read-delimited-list char port) --> object
(read-delimited-list char port readtable) --> object
Following CLtL. This packages up most of the hair involved with
handling comments. I observe that CLtL does not quite give enough
information for a user to write the #\( and #\) macro procedures,
which must deal with the dotted pair syntax in addition to comments.
Neither does this proposal: I think #\(, #\), and #\; have to be
magic, which makes it hard for a user to make #\[ and #\] behave
exactly like #\( and #\).
(copy-readtable)
(copy-readtable readtable) --> readtable
The argument defaults to the standard readtable. Returns a copy of
its argument. Calls to set-token-parser!, set-character-syntax!,
and set-dispatch-character! on the copy do not affect the original.
(get-token-parser readtable) --> parser
Returns the readtable's token parser. The token parser is a procedure
of three arguments s, i, and j. The token parser must return a token
parsed from (substring s i j) or else signal an error. The token
parser used by the standard readtable always returns a symbol or
number if it doesn't signal an error. The token parser is bypassed
for tokens that contain single or multiple escape characters, since
these always indicate a symbol. Neither is the token parser called
for whitespace, illegal, macro, or dispatch characters.
Passing a string and indexes instead of just a string is an efficiency
hack suggested by David Bartley. To prevent the token parser from
depending on the contents of its string argument outside of
(substring s i j), I propose that every token parser foo be equivalent
to
(lambda (s i j) (foo (substring s i j) 0 (- j i)))
This also implies that the token parser is not allowed to side effect
its string argument.
(set-token-parser! readtable parser) --> #!unspecified
This changes the token parser of the first argument to be the second
argument. By changing the token parser and changing all characters
to be either constituent or whitespace, you can have complete control
over the parser. More realistically, this hook lets you experiment
with weird number syntaxes et cetera.
(get-character-syntax readtable char) --> syntax
Returns the character syntax associated with the given character
in the given readtable.
(set-character-syntax! readtable char syntax) --> #!unspecified
Changes the character syntax of the given character in the given
readtable.
(make-character-syntax 'constituent) --> syntax
(make-character-syntax 'whitespace) --> syntax
(make-character-syntax 'illegal) --> syntax
(make-character-syntax 'single-escape) --> syntax
(make-character-syntax 'multiple-escape) --> syntax
(make-character-syntax 'non-terminating-macro proc) --> syntax
(make-character-syntax 'terminating-macro proc) --> syntax
(make-character-syntax 'macro proc) --> syntax
Manufactures syntax objects. The 'macro option is an alias for
the 'terminating-macro option. The proc is a procedure of three
arguments: the macro character that has just been consumed (this
is so you can use one proc for several related macro characters),
a port, and a readtable. (It would gross me out if any of these
arguments were optional.) See CLtL for explanation of what the
options mean.
(get-dispatch-character readtable char) --> proc
Returns the proc associated with octathorpe macro characters. The
proc takes three arguments: the macro character just consumed, a
port, and a readtable.
(set-dispatch-character! readtable char proc) --> #!unspecified
Defines new octathorpe macro characters.
∂03-Jun-87 0832 @MC.LCS.MIT.EDU:RPG@SAIL.STANFORD.EDU OOPSLA Lisp and Object-Oriented Programming Workshop
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 3 Jun 87 08:32:23 PDT
Received: from SAIL.STANFORD.EDU (TCP 1200000013) by MC.LCS.MIT.EDU 3 Jun 87 11:07:54 EDT
Date: 03 Jun 87 0805 PDT
From: Dick Gabriel <RPG@SAIL.STANFORD.EDU>
Subject: OOPSLA Lisp and Object-Oriented Programming Workshop
To: rrrs-authors@MC.LCS.MIT.EDU
There will be a workshop on Lisp and Object-Oriented Programming on Monday
October 5 from 9am until noon at OOPSLA. The Common Lisp Object System
(CLOS) will be the highlight of the workshop, with presentations about
CLOS by the designers along with critiques, analyses, and responses to the
Object System, the latter selected based on contributed position papers.
Attendance will be limited to people who know Lisp and are familiar with
existing object-oriented languages.
If you would like to attend, please send me a 1-2 page description of your
position regarding either the Common Lisp Object System or
Lisp/object-oriented programming before August 1; netmail is acceptable.
Invitations will be sent on September 1. Attendance is limited to 35
people.
Richard P. Gabriel
Lucid, Inc
707 Laurel Street
Menlo Park, CA 94025
(415)329-8400
rpg@sail.stanford.edu
∂03-Jun-87 1121 @MC.LCS.MIT.EDU:RMACHUCA@SIMTEL20.ARPA Edwin source
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 3 Jun 87 11:20:54 PDT
Received: from SIMTEL20.ARPA (TCP 3200000112) by MC.LCS.MIT.EDU 3 Jun 87 13:50:42 EDT
Date: Wed, 3 Jun 87 11:39:22 MDT
From: Raul Machuca <RMACHUCA@SIMTEL20.ARPA>
Subject: Edwin source
To: scheme@MC.LCS.MIT.EDU
Message-ID: <12307591509.21.RMACHUCA@SIMTEL20.ARPA>
Is the Scheme source code for
Edwin available from any one on this list
or any other source.
-------
∂03-Jun-87 1622 @MC.LCS.MIT.EDU:CPH@AI.AI.MIT.EDU Edwin source
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 3 Jun 87 16:22:46 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 3 Jun 87 19:18:39 EDT
Date: Wed, 3 Jun 87 19:19:09 EDT
From: Chris Hanson <CPH@AI.AI.MIT.EDU>
Subject: Edwin source
To: RMACHUCA@SIMTEL20.ARPA
cc: scheme@MC.LCS.MIT.EDU
In-reply-to: Msg of Wed 3 Jun 87 11:39:22 MDT from Raul Machuca <RMACHUCA at SIMTEL20.ARPA>
Message-ID: <209337.870603.CPH@AI.AI.MIT.EDU>
Date: Wed, 3 Jun 87 11:39:22 MDT
From: Raul Machuca <RMACHUCA at SIMTEL20.ARPA>
Is the Scheme source code for
Edwin available from any one on this list
or any other source.
There are two versions of Edwin, the one running in TI PC Scheme, and
the one running in MIT 68000 Scheme. The former is available by FTP
from host prep.ai.mit.edu as one of the following files:
/u2/cph/tiedwin.tar tar format file of source code
/u2/cph/tiedwin.tar.Z compressed version of above
/u2/cph/tiedwin.lst `pr' style listing of source code
The MIT Scheme version of Edwin can be obtained by special arrangement
with me. Sometime in early fall this version will have been ported to
MIT C Scheme and will be a part of the normal distribution.
∂04-Jun-87 2032 @MC.LCS.MIT.EDU:sherin@linc.cis.upenn.edu error-handler
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 4 Jun 87 20:32:41 PDT
Received: from linc.cis.upenn.edu (TCP 1201000140) by MC.LCS.MIT.EDU 4 Jun 87 23:28:45 EDT
Received: by linc.cis.upenn.edu
id AA15206; Thu, 4 Jun 87 23:26:27 EDT
Date: Thu, 4 Jun 87 23:26:27 EDT
From: sherin@linc.cis.upenn.edu (Steve Sherin)
Posted-Date: Thu, 4 Jun 87 23:26:27 EDT
Message-Id: <8706050326.AA15206@linc.cis.upenn.edu>
To: scheme@mc.lcs.mit.edu
Subject: error-handler
I want to know how to interface to the error-handler
so that I can fix/sneak past certain errors sometimes.
The chief use for the technique is to protect the
interpreter from hanging while manipulating environment
parents with scoops system code. Currently, an unbound
variable error during a call to send can be very messy.
THANKS,
Steve Sherin
U of P
Philadelphia, PA
ARPA: sherin@linc.cis.upenn.edu
∂05-Jun-87 0703 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU message passing
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 5 Jun 87 07:02:57 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 5 Jun 87 10:00:14 EDT
Date: Fri, 5 Jun 87 10:00:55 EDT
From: "Jonathan A. Rees" <JAR@AI.AI.MIT.EDU>
Subject: message passing
To: sherin@LINC.CIS.UPENN.EDU
cc: scheme@MC.LCS.MIT.EDU
In-reply-to: Msg of Thu 4 Jun 87 23:26:27 EDT from sherin at linc.cis.upenn.edu (Steve Sherin)
Message-ID: <210298.870605.JAR@AI.AI.MIT.EDU>
Your question about error handlers is apparently specific to PC Scheme
(it's hard to tell), since Scheme per se has no standard error handling
system (yet). I would like to remind everyone on this list that
discussion that is specific to one implementation (there are at least
six different implementations) should, if possible, be conducted on an
appropriate forum, not here.
However, I don't know what mailing lists (if any) exist for most of the
implementations, including PC Scheme, MacScheme, or chez scheme. If
there are such mailing lists, could someone please announce them? If
not, then for the time being, I suppose this list is as good a place as
any for discussion -- I don't mean to restrict information flow, just to
make it more efficient -- but could someone out there consider creating
such lists?
At the very least, if your message *does* concern a particular
implementation, please state which one at the very beginning of the
message, so that users of other implementations can determine quickly
that your message does not concern them.
The particular lists I do know about are:
info-cscheme%oz@mc.lcs.mit.edu
(send mail to info-cscheme-request%oz@mc.lcs.mit.edu to be added)
t-discussion@yale.arpa
(send mail to t-discussion-request@mc.lcs.mit.edu to be added)
Thanks
-- the management
∂05-Jun-87 1612 @MC.LCS.MIT.EDU:sherin@linc.cis.upenn.edu error handler for cscheme (MIT)
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 5 Jun 87 16:12:11 PDT
Received: from linc.cis.upenn.edu (TCP 1201000140) by MC.LCS.MIT.EDU 5 Jun 87 19:08:02 EDT
Received: by linc.cis.upenn.edu
id AA21524; Fri, 5 Jun 87 19:05:31 EDT
Date: Fri, 5 Jun 87 19:05:31 EDT
From: sherin@linc.cis.upenn.edu (Steve Sherin)
Posted-Date: Fri, 5 Jun 87 19:05:31 EDT
Message-Id: <8706052305.AA21524@linc.cis.upenn.edu>
To: scheme@mc.lcs.mit.edu
Subject: error handler for cscheme (MIT)
My preceding message was wrt Cscheme from MIT. I'm running
a beta version of #5.
Thanks,
Steve
sherin@linc.cis.upenn.edu
∂06-Jun-87 2108 @MC.LCS.MIT.EDU:sherin@linc.cis.upenn.edu scoops--bug fixes 6/6
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 6 Jun 87 21:08:10 PDT
Received: from linc.cis.upenn.edu (TCP 1201000140) by MC.LCS.MIT.EDU 7 Jun 87 00:04:58 EDT
Received: by linc.cis.upenn.edu
id AA26642; Sun, 7 Jun 87 00:02:28 EDT
Date: Sun, 7 Jun 87 00:02:28 EDT
From: sherin@linc.cis.upenn.edu (Steve Sherin)
Posted-Date: Sun, 7 Jun 87 00:02:28 EDT
Message-Id: <8706070402.AA26642@linc.cis.upenn.edu>
To: scheme@mc.lcs.mit.edu
Subject: scoops--bug fixes 6/6
5/24/87--METHODS.SCM:
In the define-methods macro
> ,formal-list <
was changed to > ',formal-list <
to enable methods with parameters.
>>Steve Sherin
5/25/87
In the file INSTANCE.SCM:
(define-macro (%sc-compile-class class) ... )
has been changed to
(define (%sc-compile-class class)
(begin
(%inherit-method-vars class)
(eval (%make-template (%sc-name class) class)
user-initial-environment)))
This made sure classes always compile in the user-initial-environment.
>>Steve Sherin
5/25/87
=======
In methods.scm:
(syntax-table-define ... 'define-macro ...)
was modified to
(syntax-table-define system-global-syntax-table 'define-method (macro e
(let ((class-name (caar e))
(method-name (cadar e))
(formal-list (cadr e))
(body (cddr e)))
`(%sc-class-add-method
',class-name
',method-name
',class-name
',class-name
(append (list 'lambda ',formal-list) ',body)
(lambda (env quoted-val)
(let* ((method-name ',method-name)
(temp `(in-package ,env (define ,method-name
,quoted-val))))
(eval temp (the-environment)))
)))))
Change enabled methods with multiple expressions within the main
lambda.
>>Steve Sherin
6/6/87
In INTERF.SCM:
changed
(empty-slot?
(lambda (form)
(not (eval form (the-environment)))))
to
(empty-slot?
(lambda (form)
(cond
((symbol? form) #f)
((eq? form #f) #t)
(else #f))))
Hence, "no more functions" for an active-value set- or get-
method is specified by a CONSTANT value for the false value.
The change provides the ability to use forward references
to methods as yet undefined when active values are declared.
(Thanks Eric.)
NB This code does NOT check for the symbol >> false <<
as it is not used in r3rs and can be modified as any other
variable.
>> Steve Sherin
∂08-Jun-87 1920 @MC.LCS.MIT.EDU,@RELAY.CS.NET:bartley%home@TI-CSL.CSNET number syntax and exactness
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Jun 87 19:18:09 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 8 Jun 87 21:45:47 EDT
Received: from relay2.cs.net by RELAY.CS.NET id aa28306; 8 Jun 87 17:32 EDT
Received: from ti-csl by RELAY.CS.NET id eb24079; 8 Jun 87 17:25 EDT
Received: by tilde id AA07226; Fri, 5 Jun 87 17:17:09 CDT
Received: by home id AA18999; Fri, 5 Jun 87 17:16:04 cdt
Date: Fri, 5 Jun 87 17:16:04 cdt
From: David Bartley <bartley%home%ti-csl.csnet@RELAY.CS.NET>
Message-Id: <8706052216.AA18999@home>
To: RRRS-Authors@mc.lcs.mit.edu
Cc: Bartley%home%ti-csl.csnet@RELAY.CS.NET
Subject: number syntax and exactness
I have been moderately concerned for some time that Scheme's external
representation for numbers was "gratuitously incompatible" with that
of Common Lisp. My worry was that people attempting to use both
languages would trip over minor differences. This might be a small
annoyance when interacting directly with the user at the keyboard but
possibly a major problem when trying to share files containing numeric
data.
In retrospect, I have decided that the problem is probably not as bad
as I feared. Many incompatibilities, like the representation of
complex numbers, can be handled by suitably extending the reader for
each language to understand the other's syntax. And I'm persuaded
that 3+4i is a worthwhile improvement over #c(3 4).
I still feel that we should talk through the differences between the
two, however, and see if we can iron out some of them. Rather than
make a specific proposal, this message outlines the differences I'm
aware of and suggests possible actions we could take. I'll plan to
make a proposal for discussion at the meeting, but first I want to
hear your reactions to these thoughts.
(1) Complex numbers in Scheme look like 3+4i; in Common Lisp they
look like #c(3 4).
Neither notation causes an ambiguity in the standard reader for either
language, so I'm amenable to leaving it as an optional extension in
each language to support the syntax of the other.
(2) The + or - sign in Scheme precedes everything else in a real
number; in Common Lisp the sign may be preceded by a radix indicator.
Common Lisp does not have the #D (decimal) indicator but has a
general purpose #nnR indicator.
Allowing the radix indicator and sign to appear in either order seems
to be a reasonable extension for both languages.
#D and #nnR do not cause ambiguities, so each could be considered an
extension to the language of the other.
(3) Scheme separates the concept of exactness from type; Common
Lisp does not.
This is an advantage for Scheme, although the full ramifications
haven't been felt yet. I don't understand how to make exactness
orthogonal to precision, however (see point 4). What does
#e#s123456789 mean if an implementation can't represent the value
123456789 exactly in a short FLONUM?
(4) Scheme specifies the precision of a real number using #S
(short) or #L (long); Common Lisp specifies the precision of a
floating point number with an <exponent-marker> of S, F, D, or
L (for Short, Single, Double, and Long). The Scheme syntax in
7.1.1 allows a precision specification for rational numbers;
Common Lisp does not.
In Common Lisp, precision is an attribute of (inexact) FLONUMs only.
The last paragraph of 6.5.3 of R3RS says essentially the same thing,
clarifying the syntax in 7.1.1. This seems inconsistent to me,
though, since it relates "precision" to the FLONUM representation type
whereas I see "precision" as an attribute of "inexactness." If we can
speak of inexact integers, then we should perhaps be able to speak of
short or long ones without requiring that they be implemented as
FLONUMs.
What might be meant in Scheme by a "short integer" like #s123456789?
Surely we don't mean that the number is to be arbitrarily truncated to
a machine-specific fixnum, since that may produce a result which loses
all significance in the number. The only interpretation that makes
sense to me is that #S and #L specify that the number is inexact and
may be stored in a fixed number of bits in a way that preserves the
significant digits as well as it can. Floating point is one such
representation but others exist and may be more suitable for those
implementations not blessed (?) by good FLONUM support.
I see two alternatives. We could tie the specification of precision
to FLONUMs only, as we do now, or we could relate precision to exactness.
I prefer the latter.
One way would be to merge the productions for <precision> and <exactness> in
7.1.1 to give
<precision> --> <empty> | #E | #S | #L | #I
where #E specifies an exact number, #I an inexact number of default
precision, #S and #L inexact numbers of (possibly) differing
precision, and <empty> leaving the exactness to the discretion of the
implementation, except that integers expressed without decimal points
or exponent notation are assumed exact.
This is an upwardly compatible liberalization of R3RS.
Another way, which I prefer, is to kill three birds with one stone and
use the exponent marker to indicate exactness and precision as well as
scale. Suppose we took Common Lisp's S (short), F (single), D
(double) and L (long) exponent markers and interpreted them
essentially as Common Lisp does. That is, all denote inexactness as
well as specifying precision. However, Scheme does not require
numbers written with exponent notation to be FLONUMs as Common Lisp
does, so we are free to represent 7.5s3 as the inexact integer 7500 if
we want.
Common Lisp uses the E exponent marker for the default FLONUM
precision. We could do the same but it would be incompatible with
R3RS for E to imply inexactness. We could instead use E to specify
exact numbers, at the expense of compatibility with Common Lisp.
(5) #S denotes a short precision number in Scheme and a structure
object in Common Lisp.
This can be lived with. However, it is the only conflict I can think
of between the two languages in the use of dispatching macro characters.
If we were to choose to allow precision to be specified via exponent
markers, the #S notation would no longer be needed in Scheme.
(6) Scheme specifies that `#' is printed rather than a digit when
the format calls for more digits than are internally represented.
Common Lisp does not address this issue, although some
implementations use the digit `0' in this case.
This seems to be a relatively harmless discrepancy, although I can
imagine a Common Lisp reader choking up a bit.
(7) Scheme allows ratios to have exponents; Common Lisp does not.
It's their loss, I guess.
----
Summary: Let's clean up the exactness/precision problem and try to
free up #S.
--db--
∂09-Jun-87 0226 @MC.LCS.MIT.EDU:ALAN@AI.AI.MIT.EDU Better late than never
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Jun 87 02:26:34 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 9 Jun 87 05:23:15 EDT
Date: Tue, 9 Jun 87 05:20:50 EDT
From: Alan Bawden <ALAN@AI.AI.MIT.EDU>
Subject: Better late than never
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <211811.870609.ALAN@AI.AI.MIT.EDU>
Here, as promised at the Macro Summit Meeting, is a "Modified Macro
Proposal". Apologies for not mailing this out sooner, Jonathan and I will
share the blame for not being prompt about this.
This is not a complete proposal any more than Jonathan's previous macro
proposal was. There are many issues of left unaddressed. There is no
simple interface for ordinary users to use, that must wait for a separate
proposal. There are many minor details left unspecified. The only real
difference between this proposal and the last, is that it includes a
mechanism that addresses the various variable capture problems.
I will assume that the reader is already familiar with Jonathan's previous
proposal. (If you care about this stuff, you probably still have a copy.)
I will only describe the differences between the two.
The basic idea is that the thing we usually call an "environment" (a map
from identifiers to locations), can be viewed as the composition of two
separate maps: First, a map from identifiers to "variables", followed by a
second map from variables to locations. The first map is statically
determined by the program text. It is the mapping that compiler writers
normally call "alpha conversion". The second map is dynamically determined
at runtime. It is the mapping that is actually stored in closures.
In other words, consider:
(LAMBDA (X)
(F X
(LAMBDA (X)
(F X))))
Although there is one identifier named "X" here, occurring in four places,
we all recognize that there are really two separate variables named "X",
each occurring just twice. The mapping that tells you which variable named
"X" is meant by a particular occurrence of the identifier named "X", varies
from place to place in the source code, as determined by the scoping rules
of the language.
Now the idea is to make this static mapping from identifiers to variables
part of syntax tables. This has a nice appeal to it since it makes syntax
tables contain -all- of the static, contextual information necessary for
interpreting the meaning of a particular piece of code. In one package you
get both the mapping from keywords to their current meanings, as well as
the mapping from identifiers to their current meanings.
To see how this deals with the various capture problems, here is how one
might define a vanilla PUSH macro:
(DEFINE PUSH-SYNTAX-TABLE
(ADD-KEYWORD SCHEME-SYNTAX-TABLE 'PUSH
(LAMBDA (SYNTAX-TABLE EXPR) ; (PUSH val var)
(LET ((VAL (PREPROCESS SYNTAX-TABLE '() (CADR EXPR)))
(VAR (PREPROCESS SYNTAX-TABLE '() (CADDR EXPR))))
(PREPROCESS SCHEME-SYNTAX-TABLE '()
`(SET! ,VAR (CONS ,VAL ,VAR)))))))
(There are some minor incompatibilities in argument-order here with
Jonathan's original, but they should mostly be obvious. The only real
difference is the second argument to PREPROCESS, which is new, and will be
explained shortly. For the moment, just ignore the '()s.)
As in Jonathan's original modest proposal, the writer need not be concerned
that the definition of the keyword SET! might be locally redefined in the
location where the PUSH-expression was used, because he uses a known syntax
table to preprocess the SET! expression he constructs. In this modified
proposal, he needn't worry about any local rebindings of CAR either,
because the mapping from the identifier named "CAR" found in
SCHEME-SYNTAX-TABLE will be the global variable named "CAR", rather than
any local variables that happen to have the same name.
Thus we don't need to introduce a new ABSOLUTE special form to allow macro
writers to make references to known variables. Syntax tables can be used
to resolve identifiers into the particular variables whose values are to be
accessed. (There might, of course, be -other- reasons for wanting ABSOLUTE.)
To illustrate how another kind of capture is avoided, here is a definition
of a simple two-operand version of OR:
(DEFINE OR2-SYNTAX-TABLE
(ADD-KEYWORD SCHEME-SYNTAX-TABLE 'OR2
(LAMBDA (SYNTAX-TABLE EXPR) ; (OR2 op1 op2)
(LET ((OP1 (PREPROCESS SYNTAX-TABLE '() (CADR EXPR)))
(OP2 (PREPROCESS SYNTAX-TABLE '() (CADDR EXPR))))
(PREPROCESS SCHEME-SYNTAX-TABLE '()
`((LAMBDA (TEMP)
(IF TEMP TEMP ,OP2))
,OP1))))))
As usual the writer doesn't need to worry about local redefinitions of the
keywords LAMBDA and IF, but notice that he doesn't have to worry that his
use of a variable named "TEMP" will accidentally capture any variables of
the same name in the second operand. This is because the second operand is
first preprocessed in the syntax table that was current where the
OR2-expression occurred, and thus any identifiers it may have contained
named "TEMP" have already been resolved to the correct variable named
"TEMP".
Thus there is no need to introduce "Gensyms" into macroexpansions in order
to avoid inadvertent capture.
Finally, there are situations where the programmer -wants- a capture to
occur. For example it writing the LET macro, he wants certain variables in
the body of the LET-expression to be captured. Here is where the new
argument to PREPROCESS comes in; it gives the user control over the context
sensitivity of preprocessed expressions. Specifically, it is a list of
identifiers (and keywords) which are to be left syntactically free in the
resulting preprocessed expression.
To illustrate, here is a simple single variable version of LET:
(DEFINE LET1-SYNTAX-TABLE
(ADD-KEYWORD SCHEME-SYNTAX-TABLE 'LET1
(LAMBDA (SYNTAX-TABLE EXPR) ; (LET1 <id> <val> <expr>)
(LET ((ID (CADR EXPR))
(VAL (PREPROCESS SYNTAX-TABLE '() (CADDR EXPR))))
(PREPROCESS SCHEME-SYNTAX-TABLE '()
`((LAMBDA (,ID)
,(PREPROCESS SYNTAX-TABLE (LIST ID) (CADDDR EXPR)))
,VAL))))))
Here the expression in the body of a LET1 is preprocessed using the syntax
table current where the LET1-expression occurred, with the
identifier-to-be-bound excepted. Thus the static meaning of all the
identifiers and keywords in the expression will be correctly determined,
while the identifier in question will be left free to be captured by the
LAMBDA-expression it is embedded in.
Now the way this new argument to PREPROCESS works may strike you as a
little odd at first. I used to agree with you. However, the more I work
with it, the better I like it.
Perhaps the reason it works so well can been seen by thinking of the thing
returned by PREPROCESS as a "syntactic closure", similar in nature to the
closures returned by LAMBDA-expressions. In both cases you have an
environment of some kind, a list of identifiers, and an expression. In
both cases all identifiers in the expression are to be taken relative to
the environment, -except- those in the given list. The identifiers in the
list are to have their meanings determined later. In both cases it is a
way of "parameterizing" the expression.
The difference is that the LAMBDA-expression closure is invoked with
positional arguments, while the syntactic closure is invoked in a kind of
"call-by-context" fashion. But even that seems natural in a situation
where you are constructing expressions out of other expressions; such
context-dependence is just the normal way expressions are combigned!
[ I can't resist pointing out that John Lamping is working on something
that looks very much like this call-by-context stuff, except for ordinary
closures. Anyone who doesn't know about his ideas should look into
it, its definitely interesting. ]
An implementation of all of this follows.
!
; A grammar for the core language used as the target of our simple little
; compiler.
;
; core-exp ::= core-var
; | (QUOTE datum)
; | (IF core-exp core-exp core-exp)
; | (SET! core-var core-exp)
; | (CALL core-exp core-exp ...)
; | (BEGIN core-exp core-exp ...)
; | (LAMBDA (bound-var ...) core-exp)
;
; core-var ::= bound-var
; | (FREE name)
; | (ABSOLUTE -path-)
;
; bound-var ::= (VARIABLE name counter)
;
; The bound-vars are all unique, and none are ultimately free.
!
; Preprocessed expressions
; Calling PREPROCESS just makes a "syntactic closure". ST is a syntax
; table, SYMS is a list of identifiers and keywords that are to remain
; syntactically free in the resulting preprocessed expression.
(define (preprocess st syms exp)
(vector 'preprocessed st syms exp))
(define (ppexp->st ppexp) (vector-ref (check-ppexp ppexp) 1))
(define (ppexp->syms ppexp) (vector-ref (check-ppexp ppexp) 2))
(define (ppexp->exp ppexp) (vector-ref (check-ppexp ppexp) 3))
(define (preprocessed? obj)
(and (vector? obj)
(= (vector-length obj) 4)
(eq? (vector-ref obj 0) 'preprocessed)))
(define (check-ppexp ppexp)
(if (preprocessed? ppexp)
ppexp
(error "not a preprocessed expression" ppexp)))
!
; Primitive Syntax table manipulation
; ->CORE is used to compile an expression into the core language.
; Syntax tables are just procedures. Note that a syntax table now returns
; a core language expression. (Previously, a preprocessed expression was
; returned.)
(define (->core st exp)
(st st exp))
; Keywords
(define (add-keyword st0 keyword proc)
(lambda (st exp)
(if (and (pair? exp) (eq? (car exp) keyword))
;; Macros must return context-insensitive expressions:
;; (We -could- decide that it would be convenient to use
;; scheme-syntax-table here; as long as it is a documented
;; context.)
(->core empty-syntax-table (proc st exp))
(st0 st exp))))
; Identifiers
(define *counter* 0)
(define (add-identifier st0 id)
(set! *counter* (+ *counter* 1))
(let ((var `(variable ,id ,*counter*)))
(lambda (st exp)
(if (eq? id exp)
var
(st0 st exp)))))
(define (add-identifiers st ids)
(if (null? ids)
st
(add-identifier (add-identifiers st (cdr ids))
(car ids))))
; Make a new syntax table in which the identifiers and keywords in SYMS are
; found in SYMS-ST, and all others are found in ELSE-ST.
(define (filter-syntax-table syms syms-st else-st)
(lambda (st exp)
(if (if (pair? exp)
(memq (car exp) syms)
(memq exp syms))
(syms-st st exp)
(else-st st exp))))
!
; Syntax tables
; An empty syntax table; defines no keywords or identifiers.
(define (empty-syntax-table st exp)
(cond ((preprocessed? exp)
(->core (filter-syntax-table (ppexp->syms exp) st (ppexp->st exp))
(ppexp->exp exp)))
((or (boolean? exp) (number? exp) (char? exp) (string? exp))
`(quote ,exp))
((pair? exp)
`(call ,@(map (lambda (arg) (->core st arg)) exp)))
(else
(error "not a syntactically valid expression" exp))))
; Core syntax table. Understands the primitive expression types, but
; not the derived ones.
(define (core-syntax-table st exp)
(if (symbol? exp)
`(free ,exp) ; or `(absolute ,exp) ?
(case (and (pair? exp) (car exp))
((quote absolute) exp)
((lambda)
(let ((st (add-identifiers st (cadr exp))))
`(lambda ,(map (lambda (var) (->core st var))
(cadr exp))
,(->core st (caddr exp)))))
((set!)
`(set! ,(->core st (cadr exp))
,(->core st (caddr exp))))
((if)
`(if ,(->core st (cadr exp))
,(->core st (caddr exp))
,(->core st (cadddr exp))))
((begin)
`(begin ,@(map (lambda (exp) (->core st exp)) (cdr exp))))
(else
(empty-syntax-table st exp)))))
!
; The scheme syntax table defines the derived expression types.
(define scheme-syntax-table
(do ((st core-syntax-table
(add-keyword st (caar z) (cadar z)))
(z `((and
,(lambda (st exp)
(let ((forms (cdr exp))
(j (lambda (exp) (preprocess st '() exp))))
(cond ((null? forms) `#t)
((null? (cdr forms)) (j (car forms)))
(else
(preprocess scheme-syntax-table '()
`((lambda (p)
(if p (and ,@(map j (cdr forms))) p))
,(j (car forms)))))))))
;; ...
(lambda
,(lambda (st exp)
(preprocess core-syntax-table '()
`(lambda ,(cadr exp)
,(preprocess-body st (cadr exp) (cddr exp))))))
;; (letrec ,...)
;; ...
;; (quasiquote ,... (absolute scheme-env cons) ...)
)
(cdr z)))
((null? z) st)))
!
; Implements implicit begin and internal defines for lambda bodies.
(define (preprocess-body st ids body)
(let ((definition? (lambda (exp)
(and (pair? exp) (eq? (car exp) 'define))))
(definition-lhs cadr)
(definition-rhs caddr))
(let loop ((l body)
(lhss '())
(rhss '()))
(if (null? l)
(error (if (null? lhss)
"empty body"
"no non-definitions in body")
body)
(let ((exp (car l)))
(if (not (definition? exp))
(let ((all-ids (append lhss ids)))
(let ((body (map (lambda (exp)
(preprocess st all-ids exp))
l)))
(preprocess scheme-syntax-table ids
(if (null? lhss)
`(begin ,@body)
`(letrec ,(map (lambda (lhs rhs)
`(,lhs
,(preprocess st all-ids rhs)))
(reverse lhss)
(reverse rhss))
,@body)))))
(loop (cdr l)
(cons (definition-lhs exp) lhss)
(cons (definition-rhs exp) rhss))))))))
!
(define test-syntax-table
(do ((st scheme-syntax-table
(add-keyword st (caar z) (cadar z)))
(z `((push
,(lambda (st exp)
(let ((var (preprocess st '() (caddr exp)))
(val (preprocess st '() (cadr exp))))
(preprocess test-syntax-table '()
`(set! ,var (cons ,val ,var))))))
;; Your macros here!
)
(cdr z)))
((null? z) st)))
∂09-Jun-87 1603 @MC.LCS.MIT.EDU:ucdavis!iris!windley@ucbvax.Berkeley.EDU Scheme Source
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Jun 87 16:03:20 PDT
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 9 Jun 87 18:43:48 EDT
Received: by ucbvax.Berkeley.EDU (5.57/1.25)
id AA17803; Tue, 9 Jun 87 15:41:23 PDT
Received: by ucdavis.ucdavis.edu (5.51/UCD1.38)
id AA11202; Tue, 9 Jun 87 15:05:01 PDT
Received: by clover.ucdavis.edu.ucdavis.edu (5.51/4.7)
id AA06925; Tue, 9 Jun 87 15:02:22 PDT
Return-Path: <windley@iris>
Received: by iris.ucdavis.edu (4.12/3.14)
id AA29091; Tue, 9 Jun 87 15:04:15 pdt
Date: Tue, 9 Jun 87 15:04:15 pdt
From: ucdavis!iris!windley@ucbvax.Berkeley.EDU (Phil Windley)
Message-Id: <8706092204.AA29091@iris.ucdavis.edu>
Qotw: To iterate is human, to recurse devine.
To: scheme@mc.lcs.mit.edu
Subject: Scheme Source
I'm trying to get ahold of Scheme for a VAX for use at UC Davis.
We want to use Sussman and Abelson in an introductory CS class,
but the version of scheme we have (scheme.84.7) doesn't seem to
be compatible with the examples in the book. How can I get
a tape?
Phillip Windley
Robotic Research Lab
University of California, Davis
∂10-Jun-87 1945 @MC.LCS.MIT.EDU,@RELAY.CS.NET:bartley%home@TI-CSL.CSNET Agenda
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 10 Jun 87 19:45:44 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 10 Jun 87 19:40:51 EDT
Received: from relay2.cs.net by RELAY.CS.NET id ab13143; 10 Jun 87 19:21 EDT
Received: from ti-csl by RELAY.CS.NET id ag09642; 10 Jun 87 19:18 EDT
Received: by tilde id AA16222; Wed, 10 Jun 87 17:54:33 CDT
Received: by home id AA01217; Wed, 10 Jun 87 17:53:41 cdt
Date: Wed, 10 Jun 87 17:53:41 cdt
From: David Bartley <bartley%home%ti-csl.csnet@RELAY.CS.NET>
Message-Id: <8706102253.AA01217@home>
To: RRRS-Authors@mc.lcs.mit.edu
Cc: Bartley%home%ti-csl.csnet@RELAY.CS.NET
Subject: Agenda
Here's my stab at a tentative agenda for the meeting. Jonathan has
arranged for facilities from approximately 9:30am to 5:00pm on both
Saturday and Sunday, June 27 and 28. An early action item will be to
come up with the actual agenda; but don't wait until then to flame
about this one!
I. Amenities
-- introductions, etc.
II. Expectations for the meeting/procedure
-- rules of the game (consensus, majority rule?) (who votes?)
-- selection/assignment of secretary and chairperson
-- discussion of the agenda -- priorities and scope, order, champions
-- discussion of the documentary outcome
III. Meta-language issues
-- formal/informal standardization (IEEE, ACM, ANSI???)
-- yeller pages
-- a standardized way to enforce/ensure conformance with the
standard [Jim Miller]
IV. Language issues
-- multiple returned values [Clinger]
-- customizable reader [Clinger]
-- number syntax and exactness [Bartley]
-- macros [Rees]
-- optional arguments [Bartley]
-- pattern matching [Haynes]
-- structures and opaque objects [ ? ]
-- environments and modules [ ? ]
-- error handling [ ? ]
-- miscellaneous
... `:' in symbols [Bartley]
... `integrable' declarations
I have no experience with the formalities of chairing meetings like
this, but I'm willing to open the meeting, present my agenda, and see
where we go from there.
Jonathan suggests that we allot each group 10 minutes or so at the
beginning for a brief presentation of their R&D efforts and goals,
implementations, user profiles, etc. This might include some
philosophy on how Scheme fits their needs, where Scheme might evolve
to, and so forth. Short presentations like this should serve to
introduce both the players and their philosophies.
This should lead naturally into a session for determining our
expectations for the meeting and the procedures to be followed. It
would help if someone could explain the informal rules we've been
playing by since Brandeis. After establishing ground rules, I think
we should determine the scope of the issues to be debated and their
relative priorities so that we can reorder the agenda as needed. We
also should identify `champions' or proposers for each topic.
I thought we might want to discuss meta-language topics next, since
these may help shape the debate on the language issues themselves.
Two evident meta-issues are the `yellow pages' concept and the
question of formal standardization of the language.
My list of language issues follows Will's. I've spawned `pattern
matching' from `optional arguments,' combined `environments' with
`modules', added `error handling' for Hal, and thrown a couple of
recent topics under the umbrella of `miscellaneous.'
It would help if people would announce in advance whether they are
prepared to make proposals or otherwise lead the discussion on a given
topic, particularly if more than one proposal is to be made on a topic.
I would also appreciate some indication of who plans to attend, and
which groups would like to make introductory presentations. Please
post to this mailing list.
Regards,
David Bartley
∂10-Jun-87 2055 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU attending
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 10 Jun 87 20:55:38 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 10 Jun 87 23:56:30 EDT
Date: Wed, 10 Jun 87 23:54:17 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: attending
To: bartley%home%ti-csl.csnet@RELAY.CS.NET
cc: RRRS-Authors@MC.LCS.MIT.EDU, spols%oz.ai.mit.edu@MC.LCS.MIT.EDU
In-reply-to: Msg of Wed 10 Jun 87 17:53:41 cdt from David Bartley <bartley%home%ti-csl.csnet at RELAY.CS.NET>
Message-ID: <212790.870610.JAR@AI.AI.MIT.EDU>
Here is my current list of attendees. I count 29 so far, although two
or three are dubious. I'm keeping track so that we will know how much
food to order. I will send out a request shortly for money to pay for
lunch and other munchies.
If anyone has special audiovisual requests, let me know. I'll get the
usual projectors, and I'll try to talk GJS into bringing his amazing
projectable PC screen.
Hal Abelson
Norman Adams Tektronix
David Bartley TI (may miss Saturday?)
Alan Bawden
Michael Blair
Will Clinger Tektronix/Semantic Microsystems
Olivier Danvy Copenhagen U.
Kent Dybvig
Bruce Duba Indiana
Matthias Felleisen Indiana
Dick Gabriel Lucid (may miss some)
Ken Haase
Bert Halstead
Chris Hanson
Anne Hartheimer Semantic Microsystems
Chris Haynes Indiana
Bob Hieb Indiana
Richard Kelsey Yale (not verified)
Eugene Kohlbecker URI
David Kranz Yale
Jim Miller
Richard Mlynarik
Jim Philbin Yale
Kent Pitman Symbolics
John Ramsdell MITRE
Jonathan Rees
Bill Rozas
G J Sussman
Mitch Wand Northeastern
(The absence of an indicated affiliation means that the affiliation is
MIT.)
∂11-Jun-87 1013 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU on-campus accommodations
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 11 Jun 87 10:13:10 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 11 Jun 87 13:00:01 EDT
Date: Thu, 11 Jun 87 12:58:07 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: on-campus accommodations
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <212975.870611.JAR@AI.AI.MIT.EDU>
If anyone is interesting in staying in an MIT dorm room (cheap) during
the workshop, please send me mail.
∂11-Jun-87 1755 @MC.LCS.MIT.EDU:ucdavis!iris!windley@ucbvax.Berkeley.EDU Compiling Scheme on a hp200
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 11 Jun 87 17:54:54 PDT
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 11 Jun 87 20:52:32 EDT
Received: by ucbvax.Berkeley.EDU (5.57/1.25)
id AA06798; Thu, 11 Jun 87 17:49:42 PDT
Received: by ucdavis.ucdavis.edu (5.51/UCD1.38)
id AA28247; Thu, 11 Jun 87 17:05:24 PDT
Received: by clover.ucdavis.edu.ucdavis.edu (5.51/4.7)
id AA04759; Thu, 11 Jun 87 17:02:42 PDT
Return-Path: <windley@iris>
Received: by iris.ucdavis.edu (4.12/3.14)
id AA22532; Thu, 11 Jun 87 17:04:49 pdt
Date: Thu, 11 Jun 87 17:04:49 pdt
From: ucdavis!iris!windley@ucbvax.Berkeley.EDU (Phil Windley)
Message-Id: <8706120004.AA22532@iris.ucdavis.edu>
Qotw: To iterate is human, to recurse devine.
To: scheme@mc.lcs.mit.edu
Subject: Compiling Scheme on a hp200
I ftp'd dist.tar yesterday and it compiled fine for a vax, but on the
hp200, it has a few problems. It seems that it wants to assemble a file
called cmp68020.s, the hp200 has a 68010. I changed the switch in the
make file, but it still wants that code. What is it supposed to do?
It chokes when it starts to assemble the 68020 code.
Phillip J. Windley
Robotics Research Laboratory
University of California, Davis
∂11-Jun-87 2347 @MC.LCS.MIT.EDU:GJS%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU Re: number syntax and exactness
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 11 Jun 87 23:46:54 PDT
Received: from OZ.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 12 JUN 87 02:47:24 EDT
Date: Fri 12 Jun 87 02:45:08-EDT
From: "Gerald Jay Sussman" <GJS%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU>
Subject: Re: number syntax and exactness
To: bartley%home%ti-csl.csnet@RELAY.CS.NET
cc: RRRS-Authors@MC.LCS.MIT.EDU
In-Reply-To: <8706052216.AA18999@home>
Message-ID: <12309831704.6.GJS@OZ.AI.MIT.EDU>
Let's look through your points one-by-one.
B: (1) Complex numbers in Scheme look like 3+4i; in Common Lisp they
look like #c(3 4).
And I'm persuaded that 3+4i is a worthwhile improvement over #c(3 4).
Actually, I am no longer so persuaded myself. The problem is that 3+4i
indicates to the reader that we are adding a real 3 to an imaginary 4.
Thus it is not obvious why the syntax will not accept 4i, but requires
0+4i. I still like 5@.927 for polar numbers, but I would rather have
something like 3&4 for the rectangular variety than 3+4i. On the other
hand I think that the #C syntax is quite ugly. I see no reason why we
shouldn't accept it, for compatability reasons, in addition to something
more pretty.
B: (2) The + or - sign in Scheme precedes everything else in a real
number; in Common Lisp the sign may be preceded by a radix indicator.
Common Lisp does not have the #D (decimal) indicator but has a
general purpose #nnR indicator.
Allowing the radix indicator and sign to appear in either order seems
to be a reasonable extension for both languages.
I agree.
B: (3) Scheme separates the concept of exactness from type; Common
Lisp does not.
No... Exactness is intended to be a statement about the mathematical
type of a quantity. Scheme tries to separate the mathematical type from
the implementation representation. This is not a complete separation, but
it is important to make it as separate as possible.
B: I don't understand how to make exactness
orthogonal to precision, however (see point 4). What does
#e#s123456789 mean if an implementation can't represent the value
123456789 exactly in a short FLONUM?
Your problem here is that you have conflated the size of the flonum,
a property of the representation, not the mathematical type, with a
mathematical exactness property. It seems to me that the example you
show is just an error -- to be caught by the reader -- as it would
complain about #d() or 3.4e5.6.
B: (4) Scheme specifies the precision of a real number using #S(short)
or #L (long); Common Lisp specifies the precision of a
floating point number with an <exponent-marker> of S, F, D, or
L (for Short, Single, Double, and Long). The Scheme syntax in
7.1.1 allows a precision specification for rational numbers;
Common Lisp does not.
I see nothing wrong with the Scheme specification. The Common Lisp one
is an extension of an ancient Fortran kludge. I would not be adverse to
accepting the Common Lisp syntax for compatability, in addition to our
(preferred) syntax.
B: In Common Lisp, precision is an attribute of (inexact) FLONUMs only.
The last paragraph of 6.5.3 of R3RS says essentially the same thing,
clarifying the syntax in 7.1.1. This seems inconsistent to me,
though, since it relates "precision" to the FLONUM representation type
whereas I see "precision" as an attribute of "inexactness." If we can
speak of inexact integers, then we should perhaps be able to speak of
short or long ones without requiring that they be implemented as
FLONUMs.
Again, David, I think that you are confusing representation type with
the mathematical status of a quantity. In fact, the shortness or longness
of a flonum says nothing about the precision of a numeric quantity so
represented. For example, 3.14159232145678 is a rather imprecise value
for pi, but it is represented in a medium of potentially large precision.
Exactness is intended to be a property of the precision of a quantity, not a
property of the potential precision of a representation.
I don't think that there is any good reason to mix up such ideas as
SHORT, LONG, FLONUM, FIXNUM, etc. with ideas such as INTEGER, REAL,
EXACT, INEXACT, RATIONAL. It is to be expected that these ideas are
not orthogonal. Surely the mathematical type constrains the
applicable representations -- it is hard to argue for stuffing a
complex number into a FIXNUM.
B: I see two alternatives. We could tie the specification of precision
to FLONUMs only, as we do now, or we could relate precision to exactness.
I prefer the latter.
I do not think that this is a matter of preference... (potential) precision
is indeed only a property of the representation -- FLONUMs -- you may extend
the idea to FIXNUMs/BIGNUMs, if it appears to be useful, but do not confuse
the potential precision of a representation with the actual precision of
a particular number.
-------
∂12-Jun-87 1204 @MC.LCS.MIT.EDU:CPH@AI.AI.MIT.EDU Compiling Scheme on a hp200
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 12 Jun 87 12:04:18 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 12 Jun 87 13:35:43 EDT
Date: Fri, 12 Jun 87 13:32:18 EDT
From: Chris Hanson <CPH@AI.AI.MIT.EDU>
Subject: Compiling Scheme on a hp200
To: ucdavis!iris!windley@UCBVAX.BERKELEY.EDU
cc: scheme@MC.LCS.MIT.EDU, bug-cscheme@OZ.AI.MIT.EDU
In-reply-to: Msg of Thu 11 Jun 87 17:04:49 pdt from ucdavis!iris!windley at ucbvax.Berkeley.EDU (Phil Windley)
Message-ID: <213574.870612.CPH@AI.AI.MIT.EDU>
Date: Thu, 11 Jun 87 17:04:49 pdt
From: ucdavis!iris!windley at ucbvax.Berkeley.EDU (Phil Windley)
I ftp'd dist.tar yesterday and it compiled fine for a vax, but on the
hp200, it has a few problems. It seems that it wants to assemble a file
called cmp68020.s, the hp200 has a 68010. I changed the switch in the
make file, but it still wants that code. What is it supposed to do?
It chokes when it starts to assemble the 68020 code.
Phillip J. Windley
Robotics Research Laboratory
University of California, Davis
Please do not send bug messages about MIT CScheme to this mailing
list. As we specify in the file README in the distribution, such
messages should be sent to "bug-cscheme%oz@mc.lcs.mit.edu". The
"scheme" mailing list is a general discussion list for all issues
about Scheme.
In reply to your bug report, please delete the various "Compiled code
interface files" in "Makefile.200" and replace them with the
commented-out information ("compiler.c", "compiler.oo", etc). This
code is not 68020-specific and should work fine for you.
∂12-Jun-87 1501 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU no free lunch
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 12 Jun 87 15:01:23 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 12 Jun 87 17:56:39 EDT
Date: Fri, 12 Jun 87 17:54:55 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: no free lunch
To: rrrs-authors@MC.LCS.MIT.EDU
cc: spols@OZ.AI.MIT.EDU
Message-ID: <213724.870612.JAR@AI.AI.MIT.EDU>
Lunch and 2 coffee breaks each day of the workshop will be catered by
one of the MIT dining halls and will be adequate but not elaborate:
cold cuts, pasta salad, cake, fruit, etc.
So if you plan to attend the workshop, please send a check for $14,
payable to the Massachusetts Institute of Technology, to
Mary Spollen
MIT Laboratory for Computer Science
545 Technology Square
Cambridge MA 02139
Send only $7 if you'll only be there one of the two days.
If you are vegetarian or have other requirements and the menu doesn't
sound adequate, contact me or Mary and we'll see if anything can be done
for you.
∂12-Jun-87 1513 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU directions
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 12 Jun 87 15:13:43 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 12 Jun 87 18:13:26 EDT
Date: Fri, 12 Jun 87 18:11:50 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: directions
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <213728.870612.JAR@AI.AI.MIT.EDU>
One more item of business from the local-arrangements-coordinator...
(Sorry to dribble them out like this, but I'm not paid to be organized)
If you want to have a map of MIT with directions to the workshop mailed
to you, send me your postal address. Also let me know if you need
directions from the airport.
∂12-Jun-87 2016 @MC.LCS.MIT.EDU:CPH@AI.AI.MIT.EDU no free lunch
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 12 Jun 87 20:16:10 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 12 Jun 87 23:17:37 EDT
Date: Fri, 12 Jun 87 23:15:55 EDT
From: Chris Hanson <CPH@AI.AI.MIT.EDU>
Subject: no free lunch
To: JAR@AI.AI.MIT.EDU
cc: rrrs-authors@MC.LCS.MIT.EDU, spols@OZ.AI.MIT.EDU
In-reply-to: Msg of Fri 12 Jun 87 17:54:55 EDT from Jonathan A Rees <JAR at AI.AI.MIT.EDU>
Message-ID: <213825.870612.CPH@AI.AI.MIT.EDU>
I'm vegetarian. I don't know what is in pasta salad but I think
sometimes it has some meat in it. If it's much trouble it is easy
for me to bring my own food.
∂14-Jun-87 0942 @MC.LCS.MIT.EDU:sherin@linc.cis.upenn.edu SCOOPS bug-fixes
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 14 Jun 87 09:42:22 PDT
Received: from linc.cis.upenn.edu (TCP 1201000140) by MC.LCS.MIT.EDU 14 Jun 87 12:40:30 EDT
Received: by linc.cis.upenn.edu
id AA11801; Sun, 14 Jun 87 12:37:00 EDT
Date: Sun, 14 Jun 87 12:37:00 EDT
From: sherin@linc.cis.upenn.edu (Steve Sherin)
Posted-Date: Sun, 14 Jun 87 12:37:00 EDT
Message-Id: <8706141637.AA11801@linc.cis.upenn.edu>
To: scheme@mc.lcs.mit.edu
Subject: SCOOPS bug-fixes
5/24/87--METHODS.SCM:
In the define-methods macro
> ,formal-list <
was changed to > ',formal-list <
to enable methods with parameters.
>>Steve Sherin
5/25/87
In the file INSTANCE.SCM:
(define-macro (%sc-compile-class class) ... )
has been changed to
(define (%sc-compile-class class)
(begin
(%inherit-method-vars class)
(eval (%make-template (%sc-name class) class)
user-initial-environment)))
This made sure classes always compile in the user-initial-environment.
>>Steve Sherin
5/25/87
=======
In methods.scm:
(syntax-table-define ... 'define-macro ...)
was modified to
(syntax-table-define system-global-syntax-table 'define-method (macro e
(let ((class-name (caar e))
(method-name (cadar e))
(formal-list (cadr e))
(body (cddr e)))
`(%sc-class-add-method
',class-name
',method-name
',class-name
',class-name
(append (list 'lambda ',formal-list) ',body)
(lambda (env quoted-val)
(let* ((method-name ',method-name)
(temp `(in-package ,env (define ,method-name
,quoted-val))))
(eval temp (the-environment)))
)))))
Change enabled methods with multiple expressions within the main
lambda.
>>Steve Sherin
6/6/87
In INTERF.SCM:
changed
(empty-slot?
(lambda (form)
(not (eval form (the-environment)))))
to
(empty-slot?
(lambda (form)
(cond
((symbol? form) #f)
((eq? form #f) #t)
(else #f))))
Hence, "no more functions" for an active-value set- or get-
method is specified by a CONSTANT value for the false value.
The change provides the ability to use forward references
to methods as yet undefined when active values are declared.
(Thanks Eric.)
NB This code does NOT check for the symbol >> false <<
as it is not used in r3rs and can be modified as any other
variable.
>> Steve Sherin
6/13/87
Send.scm was rewritten, correcting the following:
Errors during the use of send, send-if-handles now do not
mess up the interpreter. Circularly sent messages are now
allowed.
>> Steve Sherin
-----------------------------------------------------------------
Here's the new version of send.scm:
----------------Cut here.----------------------------------------
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; ;;;
;;; S c o o p s ;;;
;;; ;;;
;;; ;;;
;;; Rewritten 5/20/87 for cscheme ;;;
;;; by Steve Sherin--U of P ;;;
;;; File : send.scm ;;;
;;; ;;;
;;; Amitabh Srivastava ;;;
;;; ;;;
;;;-----------------------------------------------------------------;;;
;;; One does not have to use the SEND form to invoke methods ;;;
;;; in the same class; they can be invoked as Scheme functions. ;;;
;;; ;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;; send
(syntax-table-define system-global-syntax-table 'send
(macro e
(let ((args (cddr e))
(msg (cadr e))
(obj (car e)))
`(let* ((set-parent! (access system-environment-set-parent!
environment-package))
(ep environment-parent)
(ibot ,obj)
(itop (ep (ep ibot)))
(ipar (ep itop))
(class (access %sc-class ibot))
(ctop (%sc-class-env class))
(cpar (ep ctop))
(cbot (%sc-method-env class))
(instance-safe? (eq? ipar cbot)))
(without-interrupts
(lambda ()
(dynamic-wind
(lambda ()
(set-parent! ctop ibot)
(if instance-safe?
(set-parent! itop cpar)))
(lambda ()
(in-package cbot (,msg ,@args)))
(lambda ()
(set-parent! ctop cpar)
(set-parent! itop cbot))
)))))))
;;; send-if-handles
(syntax-table-define system-global-syntax-table 'send-if-handles (macro e
(let ((obj (car e))
(msg (cadr e))
(args (cddr e)))
`(let
((self ,obj))
(if (assq ',msg (%sc-method-structure (access %sc-class self)))
(send self ,msg ,@args)
#!false)))))
∂15-Jun-87 1132 @MC.LCS.MIT.EDU:NETWORK%FRSAC11.BITNET@MITVMA.MIT.EDU Books on Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 15 Jun 87 11:32:23 PDT
Received: from MITVMA.MIT.EDU (TCP 2227000003) by MC.LCS.MIT.EDU 15 Jun 87 12:52:29 EDT
Received: from FRSAC11(NETWORK) by MITVMA (Mailer X1.23) id 3420;
Mon, 15 Jun 87 12:06:35 EDT
Date: Mon, 15 Jun 87 10:55:03 GMT
To: scheme@mc.lcs.MIT.EDU
From: NETWORK@FRSAC11.BITNET
Subject: Books on Scheme
Date: 15 June 1987, 10:50:42 GMT
From: NETWORK at FRSAC11
To: SCHEME at MC.LCS
I have heard lately about a book by Kent Dybvig, called "The scheme programming
language".
Anybody on the net can give me exact references ? (I need the editor, and may
be the price to order it.)
Any other book on Scheme ?
Jean-Pierre H. Dumas
network@frsac11 (bitnet)
network%frsac11.bitnet@wiscvm.wisc.edu (arpanet)
..!ihnp4!frsac11.bitnet!network (usenet ?)
dumas@sumex-aim.stanford.edu (arpanet)
∂15-Jun-87 1437 @MC.LCS.MIT.EDU,@RELAY.CS.NET:willc@tekchips.tek.com Session chair
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 15 Jun 87 14:37:23 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 15 Jun 87 17:29:31 EDT
Received: from relay2.cs.net by RELAY.CS.NET id ag01996; 15 Jun 87 15:53 EDT
Received: from tektronix.tek.com by RELAY.CS.NET id ar11342; 15 Jun 87 15:47 EDT
Received: by tektronix.TEK.COM (5.51/6.23)
id AA08034; Mon, 15 Jun 87 11:47:20 PDT
Received: by tekchips.TEK.COM (5.51/6.22)
id AA05321; Mon, 15 Jun 87 11:49:50 PDT
Message-Id: <8706151849.AA05321@tekchips.TEK.COM>
To: rrrs-authors@mc.lcs.mit.edu
Subject: Session chair
In-Reply-To: Your message of Fri, 12 Jun 87 17:54:55 EDT.
<213724.870612.JAR@AI.AI.MIT.EDU>
Date: 15 Jun 87 11:49:49 PDT (Mon)
From: willc%tekchips.tek.com@RELAY.CS.NET
Mitch Wand, who moderated the successful meeting at Brandeis in 1984, has
agreed to chair our sessions again in Cambridge. His net mail address is
wand@corwin.ccs.northeastern.edu.
Thanks, Mitch.
Will Clinger
∂18-Jun-87 0452 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu SCOOPS newsgroup? RSVP
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 18 Jun 87 04:52:24 PDT
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 18 Jun 87 07:49:08 EDT
Received: by ucbvax.Berkeley.EDU (5.57/1.26)
id AA13845; Thu, 18 Jun 87 04:23:44 PDT
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 18 Jun 87 03:03:11 GMT
From: super.upenn.edu!linc.cis.upenn.edu!sherin@RUTGERS.EDU (Steve Sherin)
Organization: University of Pennsylvania
Subject: SCOOPS newsgroup? RSVP
Message-Id: <1363@super.upenn.edu.upenn.edu>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
It has been suggested that there is enough interest
(and postings) to have an autonomous SCOOPS newgroup.
I would like to here from those who want sucha b-board.
I'll gladly moderate it and post various fixes/programs
to go along with SCOOPS. I have spoken with the creator
of SCOOPS, and he has said that he also will particpate
in some of the discussions. Please mail directly to
me at sherin@linc.cis.upenn.edu. I apologize to those
of you who have been bothered in any way by these postings,
but I ahd no other reasonable way of reaching everyone
concerned (as requests are still coming in from people
who've just heard about the availability of the sources).
Thank you.
∂18-Jun-87 1908 @MC.LCS.MIT.EDU,@RELAY.CS.NET:bartley%home@TI-CSL.CSNET number syntax and exactness
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 18 Jun 87 19:08:16 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 18 Jun 87 21:58:48 EDT
Received: from relay2.cs.net by RELAY.CS.NET id aa13647; 18 Jun 87 21:20 EDT
Received: from ti-csl by RELAY.CS.NET id aa04204; 18 Jun 87 21:15 EDT
Received: by tilde id AA24906; Thu, 18 Jun 87 19:00:48 CDT
Received: by home id AA09063; Thu, 18 Jun 87 18:59:25 cdt
Date: Thu, 18 Jun 87 18:59:25 cdt
From: David Bartley <bartley%home%ti-csl.csnet@RELAY.CS.NET>
Message-Id: <8706182359.AA09063@home>
To: GJS%OZ.AI.MIT.EDU@XX.LCS.MIT.EDU
Cc: bartley%home%ti-csl.csnet@RELAY.CS.NET, RRRS-Authors@mc.lcs.mit.edu
In-Reply-To: Gerald Jay Sussman's message of Fri 12 Jun 87 02:45:08-EDT <12309831704.6.GJS@OZ.AI.MIT.EDU>
Subject: number syntax and exactness
> Let's look through your points one-by-one. [...]
>
> B: (3) Scheme separates the concept of exactness from type; Common
> Lisp does not.
>
> No... Exactness is intended to be a statement about the mathematical
> type of a quantity. Scheme tries to separate the mathematical type from
> the implementation representation. This is not a complete separation, but
> it is important to make it as separate as possible.
I meant that Scheme separated exactness from type in the sense that
"exactness is independent of the position of the number on the tower
[of numeric types]" (6.5.2). Isn't this also what you are saying?
I agree that it certainly is easy to get confused about whether we're
talking about mathematic types, "types" in the language, or
representational "types."
> B: I don't understand how to make exactness
> orthogonal to precision, however (see point 4). What does
> #e#s123456789 mean if an implementation can't represent the value
> 123456789 exactly in a short FLONUM?
>
> Your problem here is that you have conflated the size of the flonum,
> a property of the representation, not the mathematical type, with a
> mathematical exactness property. It seems to me that the example you
> show is just an error -- to be caught by the reader -- as it would
> complain about #d() or 3.4e5.6.
Although the notation #e3 means that we are talking about exactly the
abstract number 3, our purpose in using the notation is to communicate
that to a program. Thus, we must consider whether our representation
"types" suffice to do so. Of course this is conflating a property of
the representation with a mathematical property---that's what I/O of
numbers has to deal with.
From 6.5.2: "Some operations, such as the square root (of non-square
numbers), must be inexact because of the finite precision of our
representations." I'm saying that another such operation is input,
when obeying a precision specification prevents the reader from
correctly representing an exact number. Is this an error, as you
suggest, or no worse than having (SQRT #e3) return an inexact result?
> B: In Common Lisp, precision is an attribute of (inexact) FLONUMs only.
> The last paragraph of 6.5.3 of R3RS says essentially the same thing,
> clarifying the syntax in 7.1.1. This seems inconsistent to me,
> though, since it relates "precision" to the FLONUM representation type
> whereas I see "precision" as an attribute of "inexactness." If we can
> speak of inexact integers, then we should perhaps be able to speak of
> short or long ones without requiring that they be implemented as
> FLONUMs.
>
> Again, David, I think that you are confusing representation type with
> the mathematical status of a quantity. In fact, the shortness or longness
> of a flonum says nothing about the precision of a numeric quantity so
> represented. For example, 3.14159232145678 is a rather imprecise value
> for pi, but it is represented in a medium of potentially large precision.
> Exactness is intended to be a property of the precision of a quantity, not a
> property of the potential precision of a representation.
I shouldn't have said that I see "precision" as an ++attribute++ of
"inexactness," as that is an overstatement. I'm trying to say that
fixed precision can impair our ability to represent some exact numbers
correctly. The shortness or longness of a flonum DOES say something
about the likelihood of being able to represent an exact value
(consisting of many digits) correctly, because #e1.5 can probably be
represented exactly as either a short or long flonum, but
#e1.000000000000000000000005 may fit correctly only in a long [I'm
assuming a decimal flonum here]. Thus, #e#s1.000000000000000000000005
involves a contradiction.
Part of my discussion following my point (4) was in error because I
didn't notice this sentence in the last paragraph of 6.5.3: "In either
case, we are specifying an explicit way to represent an inexact
number." This tells me that #e#s123456789 is incorrect because the #S
directly contradicts the #E.
However, I still would like some clarification on whether a number
like #e1.000000000000000000000005 (no #S) is an error or is quietly
represented as an inexact number because READ is sometimes an inexact
operation.
----------
I can see that there are enough flaws in my presentation that I need
to start over on it. However, I will be on vacation from this
Saturday until I show up at the Scheme meeting next Saturday, so I'll
just wait and see if there is any interest when I get there.
--db--
∂23-Jun-87 1955 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU sundry
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Jun 87 19:55:19 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 23 Jun 87 22:22:37 EDT
Date: Tue, 23 Jun 87 22:24:48 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: sundry
To: rrrs-authors@MC.LCS.MIT.EDU
cc: spols%oz@MC.LCS.MIT.EDU
Message-ID: <218731.870623.JAR@AI.AI.MIT.EDU>
A recapitulation of the details of the workshop, with some directions for
the minority (!) of you not familiar with the area:
We meet Saturday and Sunday starting at 9:30 a.m. Tentative finishing
time is 5 p.m. but we can stay longer or shorter if we like. The
current head count is 33.
The Grier Room is also known as room 34-401. The entrance to buildings
34, 36, and 38 is on Vassar Street about halfway between Main Street and
Massachusetts Avenue. At the entrance there is a big new glass atrium,
several stories high, that's hard to miss, and a revolving door.
Building 34 nestles in between buildings 36 and 38 and away from the
street, opposite the main entrance. Go to the left (building 36) and
take the stairs or elevator up to the fourth floor. 401 is the only
room on the fourth floor of building 34; it has two halves (A and B) with
separate doors, and we'll be meeting in one half and lunching in the other.
There is a parking lot across the street; if I'm not mistaken, weekend
parking there is unrestricted. Street parking may also be available.
Building 34 is only about 2.5 blocks from the Marriott. Take Main St
away from the river and hang an obtuse left onto Vassar just before the
railroad tracks.
I started writing out directions for how to drive to the Marriott from
the airport; it's easy if you know what you're doing, but a missed exit
can, for example, put you on a toll bridge headed to distant
Charlestown. So I'll take the coward's way out and suggest that it's
probably best to get directions and a map from your car rental agency;
they're probably better at giving directions than I am (I have no car).
Better yet, take the subway (shuttle bus to blue line to green line (or
orange line) to red line to Kendall) -- very easy, you ascend from the
subway directly into the hotel complex. If anyone so requests, however,
I'd be happy to try to write up directions.
If you have questions or get into trouble, my phone number at MIT is
(617) 253-8581, home 423-3953. Mary Spollen's phone number is 253-5855.
If you haven't sent your payment yet then please bring a check ($14,
payable to MIT) on Saturday.
- Jonathan
∂30-Jun-87 1800 @MC.LCS.MIT.EDU:matthias@iucs.cs.indiana.edu Macros
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 30 Jun 87 18:00:05 PDT
Received: from iucs.cs.indiana.edu (TCP 30003147315) by MC.LCS.MIT.EDU 30 Jun 87 20:59:30 EDT
Date: Tue, 30 Jun 87 18:37:18 est
From: Matthias Felleisen <matthias@iucs.cs.indiana.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: Macros
Here is a final attempt to explain my position on macros and related matters.
I perceive two major purposes for macros:
1. extending the set of available syntactic facilities
2. manipulating an s-expression in an arbitrary way and interpreting the
result as program text at compile time.
I shall call the first kind of facility "extend-syntax", the second kind
"sep" (for s-expression processing).
1. When we extend syntax, we manipulate s-expressions that coincide with
abstract syntax trees. Since these are trees, not graphs, there is NO NEED
WHATSOEVER to use any kind of assignment: assignments exist for creating
circularities and for modeling state (in the sense of objects and state
variables). Therefore, a functional specification of these extensions is
sufficient. Furthermore, the extension of language syntax should be as far
as possible separated from ordinary evaluations although this is subject to
research and compromise. This is---in my eyes, perhaps not Eugene's---the
essence of Eugene's dissertation on extend-syntax. His choice of using
pattern-matching for the specification of extensions is---for many people---
convenient, but not inherent.
2. The arbitrary manipulation of s-expressions at compile time can mean two
things:
a: obtaining a value that we cannot write down in Scheme and including it
in expansions, e.g. closures. This is actually
a problem of Scheme and can be fixed in various ways. A weak solution is
Eugene's with-construct in extend-syntax which accomplishes this, but
unfortunately also does other things. (Another solution is to work with a
stronger language.)
b: performing arbitrary and possibly infinite computations. This is the point
of contention and the Indiana school of thought rejects this possibility.
We feel the interaction between compile time and run time (or anytime
computations) is not understood well enough to justify an inclusion
in RRRS. Just as there is a better way for expressing extend-syntax
the community should look for better ways for dealing with these problems.
Old-style macros with no global side-effects can stillbe implemented with
extend-syntax:
(extend-syntax
(define-macro Macro TransForm)
(extend-syntax (Macro exp ...) (eval (Transform '(exp ...))))
[This requires eval and possibly a split of eval into several pahses together with
Dan's favorite (and (in)famous) extend-syntax macro eval-once.]
Because extend-syntax (in whatever form) is simpler and demonstrates to the
world that the Scheme-designers understand the problem and because it can
implement conservative sep-macros, I opt for an extend-syntax-like mechanism
as a primitive tool.
-- Matthias & Bruce.
∂01-Jul-87 0728 @MC.LCS.MIT.EDU:matthias@iucs.cs.indiana.edu Macros
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 1 Jul 87 07:27:58 PDT
Received: from iucs.cs.indiana.edu (TCP 30003147315) by MC.LCS.MIT.EDU 1 Jul 87 09:56:18 EDT
Date: Wed, 1 Jul 87 08:54:27 est
From: Matthias Felleisen <matthias@iucs.cs.indiana.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: Macros
Here is a final attempt to explain my position on macros and related matters.
I perceive two major purposes for macros:
1. extending the set of available syntactic facilities
2. manipulating an s-expression in an arbitrary way and interpreting the
result as program text at compile time.
I shall call the first kind of facility "extend-syntax", the second kind
"sep" (for s-expression processing).
1. When we extend syntax, we manipulate s-expressions that coincide with
abstract syntax trees. Since these are trees, not graphs, there is NO NEED
WHATSOEVER to use any kind of assignment: assignments exist for creating
circularities and for modeling state (in the sense of objects and state
variables). Therefore, a functional specification of these extensions is
sufficient. Furthermore, the extension of language syntax should be as far
as possible separated from ordinary evaluations although this is subject to
research and compromise. This is---in my eyes, perhaps not Eugene's---the
essence of Eugene's dissertation on extend-syntax. His choice of using
pattern-matching for the specification of extensions is---for many people---
convenient, but not inherent.
2. The arbitrary manipulation of s-expressions at compile time can mean two
things:
a: obtaining a value that we cannot write down in Scheme and including it
in expansions, e.g. closures. This is actually
a problem of Scheme and can be fixed in various ways. A weak solution is
Eugene's with-construct in extend-syntax which accomplishes this, but
unfortunately also does other things. (Another solution is to work with a
stronger language.)
b: performing arbitrary and possibly infinite computations. This is the point
of contention and the Indiana school of thought rejects this possibility.
We feel the interaction between compile time and run time (or anytime
computations) is not understood well enough to justify an inclusion
in RRRS. Just as there is a better way for expressing extend-syntax
the community should look for better ways for dealing with these problems.
Old-style macros with no global side-effects can stillbe implemented with
extend-syntax:
(extend-syntax
(define-macro Macro TransForm)
(extend-syntax (Macro exp ...) (eval (Transform '(exp ...))))
[This requires eval and possibly a split of eval into several pahses together with
Dan's favorite (and (in)famous) extend-syntax macro eval-once.]
Because extend-syntax (in whatever form) is simpler and demonstrates to the
world that the Scheme-designers understand the problem and because it can
implement conservative sep-macros, I opt for an extend-syntax-like mechanism
as a primitive tool.
-- Matthias & Bruce.
∂01-Jul-87 0836 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Macros
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 1 Jul 87 08:36:03 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 1 Jul 87 11:36:19 EDT
Date: Wed, 1 Jul 87 11:38:11 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Macros
To: matthias@IUCS.CS.INDIANA.EDU
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Wed 1 Jul 87 08:54:27 est from Matthias Felleisen <matthias at iucs.cs.indiana.edu>
Message-ID: <222081.870701.JAR@AI.AI.MIT.EDU>
Date: Wed, 1 Jul 87 08:54:27 est
From: Matthias Felleisen <matthias at iucs.cs.indiana.edu>
b: performing arbitrary and possibly infinite computations. This is the
point of contention and the Indiana school of thought rejects this
possibility.
Old-style macros with no global side-effects can still be implemented with
extend-syntax: ...
... I opt for an extend-syntax-like mechanism as a primitive tool.
I must be missing something. This sounds like a gross contradiction to
me.
Could you be clearer, perhaps even concrete, about what you mean by
"extend-syntax-like"?
∂01-Jul-87 1046 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU test message, ignore
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 1 Jul 87 10:46:44 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 1 Jul 87 13:25:23 EDT
Date: Wed, 1 Jul 87 13:28:04 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: test message, ignore
To: scheme@MC.LCS.MIT.EDU
Reply-to: scheme-request@mc.lcs.mit.edu
Message-ID: <222143.870701.JAR@AI.AI.MIT.EDU>
I periodically send out a test message to the list, for two purposes:
(a) it verifies to new arrivals that they have been added, (b) it helps
weed out bad addresses, since copies sent to such bounce back to me.
There are about 200 entries on my list, many of which are redistribution
lists, so I'd estimate the readership to be about 400-600 (probably a
low estimate since I think it goes out to uucp netnews, and Allah knows
what happens to it then).
∂03-Jul-87 0737 @MC.LCS.MIT.EDU:matthias@iucs.cs.indiana.edu Macros again: read first
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 3 Jul 87 07:37:33 PDT
Received: from iucs.cs.indiana.edu (TCP 30003147315) by MC.LCS.MIT.EDU 3 Jul 87 10:37:58 EDT
Date: Fri, 3 Jul 87 09:35:49 est
From: Matthias Felleisen <matthias@iucs.cs.indiana.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: Macros again: read first
I have tried to reformulate my original message to answer some of JAR's
questions (there have been several exchanges between the two of us). This is
not a complete counterproposal and I don't have the time to come up with a
complete counterproposal. The purpose of this note (and its predecessor) is
to stimulate the committee to think in different ways about the issue of
macros and related matters.
1. Old-style macros have two purposes. First, they are used to extend
the set of available syntactic facilities. Second, they also have the
power of performing arbitrary computations on their input expressions
and the existing environment at compile time.
2. From my point of view, the extension of syntax is the addition of
syntactic forms to (a possibly extended) RRRS and the definition
of their semantics via an equivalence with already available facilities.
It follows that an extension of syntax is a map from (abstract syntax) trees
to (abstract syntax) trees. These tree domains are only a subset of the
domain of S-expressions and that is the important point.
Because the input/output domains are tree domains, i.e., they neither
posses state nor are they circular (this does not mean that they cannot
contain closures that are circular or have state), there is no need to use
side-effects for the manipulation of the input/output structures.
Assignments exist for the sole purpose of creating circularities and of
modeling state [NOTE: People use assignments for other purposes as well, but
these (first-order) uses can be eliminated without restructuring the entire
program (as in store-passing and continuation-passing style programming for
the general solution].
In the same vein I can argue against call/cc the second, non-functional
computational primitive (the uses for expansion time can be anticipated by
the expander as opposed to the transform function). In short, the
manipulation of abstract syntax trees requires nothing but the purely
functional subset of Scheme and this should be accounted for.
3. According to the preceding explanation, I call "macros" the set of
unrestricted transformation functions, which possibly use side-effects,
jumps (i.e. call/cc) etc.; "extend-syntax" is the facility which implements
functional transform functions.
4. Would Eugene's extend-syntax do it?
No, it is too powerful. It provides a WITH-construct for arbitrary
manipulations. [I believe the facility was added for macro-lovers
but Eugene can answer this better.] The WITH must be restricted so
that it conforms with the functional spirit. For inserting circular closures
or closures with state in the output tree I perceive the need for a more
expressive target language for the expander, i.e. a language where such
things can be written down. [I personally see a need for this and have used
this quite often, but as I said it suffices to extend the target language
or to accept a restricted with.]
The pattern language of Eugene's extend-syntax is not essential. A
restriction of MacroScheme to cons, car, cdr, map etc and and exclusion of
set!, set-car!, set-cdr!, eq?, etc. should do it although I believe that
the pattern language is in most instances more convenient. [Hundreds of
students at Indiana get along with it and encounter very few problems so
I also think that it is not difficult to learn.]
Side-effects for debugging. I have had to debug hundreds of extend-syntax
macros in the past 2 or 3 years (and several of the transformers). I have
practically never used side-effects in the WITH-clauses but always in the
expansion part of the macros. Perhaps the pattern languages has helped,
perhaps I am too optimistic. On the other hand, I could also imagine that
we add debugging aids to the functional MacroScheme language. I can see
that this point deserves discussion.
-- Matthias
[JAR was disturbed by the rhetoric of this note. If there is any, I ask you
to overlook it.]
∂06-Jul-87 0517 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA Tigger on Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 6 Jul 87 05:17:17 PDT
Received: from mitre-bedford.ARPA (TCP 3200600102) by MC.LCS.MIT.EDU 6 Jul 87 08:17:50 EDT
Posted-From: The MITRE Corp., Bedford, MA
Received: from darwin.sun.uucp by linus.research (3.2/4.7)
id AA14560; Mon, 6 Jul 87 08:15:26 EDT
Posted-Date: Mon, 6 Jul 87 08:15:09 EDT
Received: by darwin.sun.uucp (3.2/SMI-3.0DEV3)
id AA06553; Mon, 6 Jul 87 08:15:09 EDT
Date: Mon, 6 Jul 87 08:15:09 EDT
From: ramsdell%linus@mitre-bedford.ARPA
Message-Id: <8707061215.AA06553@darwin.sun.uucp>
To: rrrs-authors@mc.lcs.mit.edu
Subject: Tigger on Scheme
------------ Forwarded from the MilneNet -------------
Posted-Date: Mon, 6 Jul 87 07:46:39 EDT
Date: Mon, 6 Jul 87 07:46:39 EDT
From: Tigger@Hundred-Acre-Woods.Milne
To: ramsdell@linus.uucp
Subject: Scheme
The wonderful thing about Scheme is:
Scheme is a wonderful thing.
Complex procedural ideas
Are expressed via simple strings.
It's clear semantics, and lack of pedantics,
Help make programs run, run, RUN!
But the most wonderful thing about Scheme is:
Programming in it is fun,
Programming in it is FUN!
------------------------------------------------------
Gerry started the last Scheme meeting with a stated desire that it be
fun. I have to observe that laudable goal was lost by the end of the
meeting. I enjoyed most of the meeting, and I am enthusiastic about
the prospect of agreement on the most important issue in my opinion:
the issue of macros. I enjoyed talking with you all. Let's not get
too serious about Scheme.
John
∂06-Jul-87 0530 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA Tigger on Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 6 Jul 87 05:30:44 PDT
Received: from mitre-bedford.ARPA (TCP 3200600102) by MC.LCS.MIT.EDU 6 Jul 87 08:18:34 EDT
Posted-From: The MITRE Corp., Bedford, MA
Received: from darwin.sun.uucp by linus.research (3.2/4.7)
id AA14571; Mon, 6 Jul 87 08:16:05 EDT
Posted-Date: Mon, 6 Jul 87 08:15:48 EDT
Received: by darwin.sun.uucp (3.2/SMI-3.0DEV3)
id AA06559; Mon, 6 Jul 87 08:15:48 EDT
Date: Mon, 6 Jul 87 08:15:48 EDT
From: ramsdell%linus@mitre-bedford.ARPA
Message-Id: <8707061215.AA06559@darwin.sun.uucp>
To: scheme@mc.lcs.mit.edu
Subject: Tigger on Scheme
------------ Forwarded from the MilneNet -------------
Posted-Date: Mon, 6 Jul 87 07:46:39 EDT
Date: Mon, 6 Jul 87 07:46:39 EDT
From: Tigger@Hundred-Acre-Woods.Milne
To: ramsdell@linus.uucp
Subject: Scheme
The wonderful thing about Scheme is:
Scheme is a wonderful thing.
Complex procedural ideas
Are expressed via simple strings.
It's clear semantics, and lack of pedantics,
Help make programs run, run, RUN!
But the most wonderful thing about Scheme is:
Programming in it is fun,
Programming in it is FUN!
∂06-Jul-87 0845 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA Macros again: read first
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 6 Jul 87 08:44:58 PDT
Received: from mitre-bedford.ARPA (TCP 3200600102) by MC.LCS.MIT.EDU 6 Jul 87 11:01:24 EDT
Posted-From: The MITRE Corp., Bedford, MA
Received: from darwin.sun.uucp by linus.research (3.2/4.7)
id AA20362; Mon, 6 Jul 87 10:55:59 EDT
Posted-Date: Mon, 6 Jul 87 09:36:27 EDT
Received: by darwin.sun.uucp (3.2/SMI-3.0DEV3)
id AA06667; Mon, 6 Jul 87 09:36:27 EDT
Date: Mon, 6 Jul 87 09:36:27 EDT
From: ramsdell%linus@mitre-bedford.ARPA
Message-Id: <8707061336.AA06667@darwin.sun.uucp>
To: matthias@iucs.cs.indiana.edu
Cc: rrrs-authors@mc.lcs.mit.edu
In-Reply-To: Matthias Felleisen's message of Fri, 3 Jul 87 09:35:49 est <8707031439.AA00576@mitre-bedford.ARPA>
Subject: Macros again: read first
Please clarify one issue: Is your "counterproposal" at odds with the
PREPROCESS three-quarter macro proposal? That is, are you arguing for
restricting the proceedures given to ADD-KEYWORD, the restriction
being that the procedures are functional? Or are you arguing against
what was decided last weeks Scheme meeting?
Please don't make me take back my words:
..... I enjoyed most of the meeting, and I am enthusiastic about
the prospect of agreement on the most important issue in my opinion:
the issue of macros.
John
∂06-Jul-87 1147 @MC.LCS.MIT.EDU:gjs@ZOHAR.AI.MIT.EDU Tigger on Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 6 Jul 87 11:47:40 PDT
Received: from zohar (TCP 2206400256) by MC.LCS.MIT.EDU 6 Jul 87 14:34:28 EDT
Received: by ZOHAR.AI.MIT.EDU; Mon, 6 Jul 87 14:28:44 edt
Date: Mon, 6 Jul 87 14:28:44 edt
From: gjs@ZOHAR.AI.MIT.EDU (Gerald Jay Sussman)
Message-Id: <8707061828.AA07651@zohar>
To: ramsdell%linus@mitre-bedford.ARPA
Cc: rrrs-authors@mc.lcs.mit.edu
In-Reply-To: ramsdell%linus@mitre-bedford.ARPA's message of Mon, 6 Jul 87 08:15:09 EDT <8707061215.AA06553@darwin.sun.uucp>
Subject: Tigger on Scheme
thank you for the neat poem.
∂08-Jul-87 1607 @MC.LCS.MIT.EDU,@RELAY.CS.NET:adams@tekchips.tek.com structures
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Jul 87 16:07:17 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 8 Jul 87 19:08:20 EDT
Received: from relay2.cs.net by RELAY.CS.NET id aa01544; 8 Jul 87 18:53 EDT
Received: from tektronix.tek.com by RELAY.CS.NET id ak05511; 8 Jul 87 18:43 EDT
Received: by tektronix.TEK.COM (5.51/6.23)
id AA26009; Wed, 8 Jul 87 14:19:52 PDT
Received: by tekchips.TEK.COM (5.51/6.23)
id AA01100; Wed, 8 Jul 87 14:22:40 PDT
Date: Wed, 8 Jul 87 14:22:40 PDT
From: Norman Adams <adams%tekchips.tek.com@RELAY.CS.NET>
Message-Id: <8707082122.AA01100@tekchips.TEK.COM>
Subject: structures
To: rrrs-authors@mc.lcs.mit.edu
The following outlines a facility for defining new record types. Such a
facility could be implemented using whatever we come up with for macros,
and PROJECT/INJECT/IN? as described in Will's minutes from the lunch
meeting at the '86 Lisp conference. I am proposing the functionality
described (and implied), not the particular names.
Related issues are modules, types, and object-oriented programming.
This proposal may be premature if we haven't addressed these,
or it may be a stop-gap until we do.
DEFINE-RECORD-TYPE defines a new disjoint record type which has a fixed set
of named fields. DEFINE-RECORD-TYPE defines procedures for making
instances of the type, and accesssing and assigning the fields of the
instances. DEFINE-RECORD-TYPE also defines a predicate which returns
true only for instances of the type defined.
The simplest syntax for DEFINE-RECORD-TYPE is
(DEFINE-RECORD-TYPE typeName fieldName ...)
This would define the procedures
MAKE-<typeName>
<typeName>?
<typeName>-<fieldName> (for each field)
SET-<typeName>-<fieldName>! (for each field)
---------------- Locality of names
Given that DEFINE-RECORD-TYPE is making definitions, where are these
definitions allowed, and what is the scope of these names?
Here are two possibilities. Sketchy implementations illustrate.
1) Use syntactic extension and internal defines to provide local names.
(define-record-type emp name age) ==
(begin (define make-emp (lambda () ...))
(define emp? (lambda (x) ...))
(define emp-name (lambda (emp) ...))
(define emp-age (lambda (emp) ...))
(define set-emp-name! (lambda (emp name) ...))
(define set-emp-age! (lambda (emp age) ...))
)
DEFINE-RECORD-TYPE form at top level would define the procedures globally;
but at the beginning of a <body> would define the procedures locally. This
assumes that code generated by macros works the same way as "source" code.
2) Provide a procedural interface to make new record types, don't depend
on internal define. DEFINE-RECORD-TYPE is one possible syntactic
extension which uses MAKE-RECORD-TYPE, a procedure. This approach could be
combined with the first.
(define-record-type emp name age) ==
(begin
(define make-emp '#!unspecified)
(define emp? '#!unspecified)
(define emp-name '#!unspecified)
...
(let ((new-record-type-frob (make-record-type 'emp '(name age))))
(set! make-emp (record-type-constructor new-record-type-frob))
(set! emp? (record-type-predicator new-record-type-frob))
(let ((selectors (record-type-selectors new-record-type-frob))
(assigners (record-type-assigners new-record-type-frob)))
(set! emp-name (record-type-selector selectors 0))
(set! emp-age (record-type-selector selectors 1))
(set! set-emp-name! (record-type-assigner assigners 0))
(set! set-emp-age! (record-type-assigner assigners 1))
))))
This approach provides an interface which does not force particular names
on the client.
---------------- Initializers
There are many possible enhancements that can be made to this
simple form of DEFINE-RECORD-TYPE. Record facilities often provide
some way to do some form of initialization.
Some possibilities:
- Fields are initialized to values passed to the constructor.
Either require that a value be passed for each field, or have
some indication for each field in the DEFINE-RECORD-TYPE form
that the constructor will or will not be passed a value with which
to initialize the field.
- An initial value for each or any field may given in the
DEFINE-RECORD-TYPE form. The expression for an initial value might be
evaluated one time, or once per call to the constructor. If not the
latter, when is the expression evaluated?
What is the syntax for any of this?
---------------- Other issues
What is the name? DEFINE-STRUCTURE, DEFINE-STRUCTURE-TYPE, DEFSTRUCT
READ and WRITE syntax.
Unitialized fields - it "is an error" to access an uninitialized field?
Do we want to say anything about redefinition? If you load a file
containing a DEFINE-RECORD-TYPE, say for EMPLOYEE, are existing instances of
EMPLOYEE still going to answer true to EMPLOYEE? after you reload
the file?
Do we want to support variant records in any way?
I think there is a temptation to featurize a record package to compensate
for the lack of strong types.
-- Norman
-------
∂09-Jul-87 0853 @MC.LCS.MIT.EDU:MKATZ@A.ISI.EDU re: structures
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Jul 87 08:51:40 PDT
Received: from A.ISI.EDU (TCP 3200600147) by MC.LCS.MIT.EDU 9 Jul 87 11:52:03 EDT
Date: 9 Jul 1987 11:45:15 EDT
Subject: re: structures
From: Morris Katz <MKATZ@A.ISI.EDU>
To: rrrs-authors@MC.LCS.MIT.EDU
Stewart Clamen built a structures packages for MIT CScheme which is almost
identical to the one proposed by Norman Adams. It however contained a few
additional ideas which I believe are worth considering. These all take the
form of options at strucutre declaration time. The first is an option as to
whether a structure should carry along its type and be runtime type checked
each time an accessor or mutator utilizes it. This allows the user
a trade-off between type security and execution efficiency. The second option
is the ability to specify whether accessors, mutators, etc should be built as
procedures, macros, or both. In order to efficiently manipulate structures
it may be desirable to have accessors and mutators be macros to avaoid the
extra function call overhead.
Morry Katz
-------
∂09-Jul-87 1935 @MC.LCS.MIT.EDU:gjs@ZOHAR.AI.MIT.EDU structures
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Jul 87 19:34:59 PDT
Received: from zohar (TCP 2206400256) by MC.LCS.MIT.EDU 9 Jul 87 22:32:53 EDT
Received: by ZOHAR.AI.MIT.EDU; Thu, 9 Jul 87 22:33:22 edt
Date: Thu, 9 Jul 87 22:33:22 edt
From: gjs@ZOHAR.AI.MIT.EDU (Gerald Jay Sussman)
Message-Id: <8707100233.AA08839@zohar>
To: MKATZ@A.ISI.EDU
Cc: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: Morris Katz's message of 9 Jul 1987 11:45:15 EDT <8707091602.AA08685@zohar>
Subject: structures
Actually, I think that such worrying about function-call overhead is
the problem of a compiler, not of a user. The compiler should be
willing to integrate procedures, when it is advantageous. Such
optimizations may require compiler declarations, but I don't think
that they belong in the language at this point.
∂09-Jul-87 2321 @MC.LCS.MIT.EDU:ANDY@Sushi.Stanford.EDU re: structures
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Jul 87 23:21:26 PDT
Received: from Sushi.Stanford.EDU (TCP 4402000065) by MC.LCS.MIT.EDU 10 Jul 87 02:19:53 EDT
Date: Thu 9 Jul 87 23:13:27-PDT
From: Andy Freeman <ANDY@Sushi.Stanford.EDU>
Subject: re: structures
To: MKATZ@A.ISI.EDU
cc: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: Message from "Morris Katz <MKATZ@A.ISI.EDU>" of Thu 9 Jul 87 11:45:15-PDT
Message-ID: <12317165967.21.ANDY@Sushi.Stanford.EDU>
Morris Katz <MKATZ@A.ISI.EDU> wrote:
[He discussed a structures package written by Steware Clamen that is
similar to Norman Adams' proposal. He mentioned some of its
additional properties.]
The first is an option as to whether a structure should carry along
its type and be runtime type checked each time an accessor or mutator
utilizes it. This allows the user a trade-off between type security
and execution efficiency.
If this trade-off is controlled by options in the structure
definition, I sure hope the sense of the option is "right". The
default should be as type secure as possible.
The context where accessors and mutators are used should determine
whether or not run-time type-checking is performed. If implicit and
explicit type-checking is never used at run-time, the type information
may be optimized away. (That may not be possible for top-level
definitions in an interactive system, but ....) T (and MacLisp) had a
primitive version of this for predefined structures (cons' and vectors
are the ones I remember); if a procedure is compiled with the
appropriate options, the compiled code does not include type-checks.
#include {standard args for incomplete type-inference systems}
I realize that Adams' proposal does not have the hooks for a useful
type-inference system, but that is a good direction to leave open.
-andy
-------
∂10-Jul-87 2311 @MC.LCS.MIT.EDU,@RELAY.CS.NET:willc@tekchips.tek.com Minutes of the Scheme meeting etc.
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 10 Jul 87 23:11:18 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 11 Jul 87 02:08:00 EDT
Received: from relay2.cs.net by RELAY.CS.NET id ae28446; 11 Jul 87 1:54 EDT
Received: from tektronix.tek.com by RELAY.CS.NET id be00569; 11 Jul 87 1:48 EDT
Received: by tektronix.TEK.COM (5.51/6.23)
id AA22718; Fri, 10 Jul 87 17:58:59 PDT
Received: by tekchips.TEK.COM (5.51/6.23)
id AA15349; Fri, 10 Jul 87 17:57:31 PDT
Message-Id: <8707110057.AA15349@tekchips.TEK.COM>
To: rrrs-authors@mc.lcs.mit.edu
Subject: Minutes of the Scheme meeting etc.
Date: 10 Jul 87 17:57:29 PDT (Fri)
From: willc%tekchips.tek.com@RELAY.CS.NET
Minutes of the Scheme meeting at MIT on Saturday, 27 June 1987
Attendees included:
Hal Abelson (MIT)
Norman Adams (Tektronix)
David Bartley (Texas Instruments)
Alan Bawden (MIT)
Gary Brooks (Indiana U)
Terry Caudill (Texas Instruments)
Stewart Clamen (BBN/CMU)
Will Clinger (Tektronix)
Olivier Danvy (Copenhagen U)
Bruce Duba (Indiana U)
Kent Dybvig (Indiana U)
Matthias Felleisen (Indiana U)
Anne Hartheimer (Semantic Microsystems)
Chris Haynes (Indiana U)
Bob Hieb (Indiana U)
Morry Katz (Rockwell/MITRE)
Richard Kelsey (Yale)
David Kranz (Yale)
Eugene Kohlbecker (U Rhode Island)
Jim Miller (MIT/Brandeis)
Jim Philbin (Yale)
Kent Pitman (Symbolics)
Eric Ost (Indiana U)
John Ramsdell (MITRE)
Jonathan Rees (MIT/DEC)
Bill Rozas (MIT)
Gerry Sussman (MIT)
Mitch Wand (Northeastern U)
Peter Williams (U Illinois)
After much rearrangement of chairs and table, Mitch Wand opened the meeting
around nine-thirty. The participants introduced themselves and, if they
wished, explained what they use Scheme for and what they want for and from
Scheme.
ENVIRONMENTS
Then Hal Abelson instigated "a sample foray into content" by asking
whether anyone was so absurd as to think that pattern matching is good
or first class environments are bad. Gerry Sussman said that first class
environments as in MIT Scheme are a disaster but that another kind
was useful. Bill Rozas elaborated by saying that (THE-ENVIRONMENT)
is too powerful; experience at MIT showed that it was primarily used
in situations where
(build-environment <base-environment>
(define ...)
(define ...)
...)
would suffice. The environment resulting from BUILD-ENVIRONMENT could
then be used as an argument to EVAL. The effect of top-level definitions,
as in (EVAL '(DEFINE ...) ENV), is still a thorny question. MIT's view
is that its incremental definition semantics is just a debugging tool.
Gerry suggested that if you don't specify a base environment to
BUILD-ENVIRONMENT then you should get an empty one.
Jonathan Rees pointed out that ML-style modules need to be studied as an
alternative. Norman Adams observed that he saw environments being used
in two different ways: (1) programming in the large (modules); (2) tables
indexed by symbols; he stated that the first was a good use but the second
was bad. Jonathan contrasted environments with modules, saying that the
module problem was to hook files together without having to use a gigantic
LETREC, while environments and EVAL were useful mainly for performing a
kind of reflection in the sense of Brian Smith's thesis.
Gerry explained his derivation of a sine routine without using magic
constants as an example of a legitimate use of EVAL. Against complaints
from Will Clinger that people needed to be discouraged from using EVAL,
he said "Our job is not to protect losers from themselves, but to
provide winners with what they need to win."
Kent Pitman then presented T's original approach of breaking EVAL into
smaller pieces that might reflect the stages of compilation and linking
that are involved in separate compilation.
A committee was formed to think about EVAL and environments and to
report back. It was suggested that the members should be Kent Pitman,
Kent Dybvig, Alan Bawden, Jonathan Rees, and one of Bill Rozas and
Chris Hanson.
YELLOW PAGES (LIBRARY)
Bill Rozas was appointed as the first librarian, or keeper of unsupported,
user-contributed software. Anne Hartheimer will provide some assistance
at first. Contributions to the library should be sent to
scheme-librarian@mc.lcs.mit.edu.
MULTIPLE RETURN VALUES
Multiple return values were tabled after much discussion, little
agreement.
SHOULD COLON REALLY BE AN EXTENDED ALPHABETIC CHARACTER
Yes.
PATTERN MATCHING
No change, to be left to the library.
NUMBER SYNTAX
Students find it confusing that 0+3i works but 3i doesn't. Alternative
syntaxes were discussed briefly.
Questions were raised about the semantics of exactness and inexactness.
Concerning input syntax: Is 12.5 exact? What to make of #e#s12345?
It was suggested that (> #i5 #i4) should cause smoke to come out of the
machine.
This discussion was continued on the afternoon of the second day.
The meeting adjourned about five o'clock.
================================================================
Minutes of the Scheme meeting at MIT on Sunday, 28 June 1987
[Attendance was not noted the second day, but Julian Padget (U Bath) was
one addition to the first day's roster.]
Mitch Wand called the meeting to order around nine o'clock.
Alan Bawden explained the macro proposal that he had posted to RRRS-AUTHORS.
It seemed to be pretty much the right thing, but a number of questions
remain:
What is its relationship to expansion-passing style?
Where do you get the expand-time environment? Can you change it?
Can macros return DEFINE forms?
How do "top level" macro definitions work?
Should free variables in a file be resolved as absolute or as
relative to a LOAD-environment?
Should atomic, e.g. PI, macro forms be supported?
Does anyone have a nice user interface for the macro machinery?
Can a symbol be an identifier (variable) and a macro keyword at
the same time?
Which of EVAL, COMPILE, EXPRESSION->VALUE, etc, takes a syntax
table argument?
Matthias Felleison complained that the proposal was too powerful and/or
concrete. Mitch Wand characterized Matthias's concerns as:
What is the nature of the input language? It was agreed that it
consist of lists and preprocessed expressions.
What is the nature of the output language? It was agreed that it
would be abstract, and didn't matter.
Should there be restrictions on the possible transformations?
This seemed to be the essence of Matthias's objections.
Matthias agreed to post a more formal statement of his concerns to
RRRS-AUTHORS.
A straw poll indicated that nearly all were in favor of moving forward
from Alan's report.
CUSTOMIZABLE READER
Will Clinger solicited comments about a customizable reader he was
proposing for the yellow pages. The proposed reader did not solve
the main problem that people seemed to want customizable readers
for, namely the need to load code that was written with different
lexical conventions.
NUMBER PROPOSAL
Gerry Sussman and Will Clinger then presented a revised number syntax
and semantics they and David Bartley had worked on the previous evening.
Probing questions revealed that the semantics of inexact numbers were
still unclear, and the matter was tabled after much argument.
EuLISP
Julian Padget presented a summary of generic procedures in EuLisp.
EQV?
Bill Rozas requested that the R3RS be changed to permit (EQV? "" "")
to be false, because empty strings are extensible in MIT Scheme. This
was opposed by Will Clinger, on the grounds that extensions were
permissible only insofar as they were not in conflict with the language
specification. Much irrelevant discussion ensued concerning English
descriptions versus formal semantics, the social value of lawyers, and
the lessons of history concerning the decline and fall of programming
languages. When discussion returned to the technical issue, the
participants were in no mood to agree.
OPTIONAL PROCEDURES
It was suggested that optional procedures should either be made essential
or moved to the yellow pages. The general feeling, however, was that
the non-essential procedures helped to define a layered language, which
was good. Bill Rozas suggested that the "yellow pages" library could
contain a supported section containing implementations of the standard
but non-essential procedures.
A committee was appointed to think about language stratification: David
Bartley, Bruce Duba, Jim Miller, Bill Rozas, and Gerry Sussman.
NEXT MEETING
People from Indiana University offered to host the next meeting, in the
fall. [My notes do not show the year; I assume the next meeting would
be in the fall of 1988. Question: Why not have it at the ACM Conference
on Lisp and Functional Programming?]
The meeting adjourned about five o'clock.
================================================================
Feeling that the weekend meeting had not accomplished all that needed
to be accomplished, a small group of implementors met on Tuesday evening
around six o'clock. Present were David Bartley (TI), Will Clinger
(Tektronix), Chris Hanson (MIT), Jonathan Rees (MIT), and Bill Rozas (MIT).
It was noted that Chez Scheme was not represented at all, and that T was
represented only by Jonathan. Agreements made by this small group are
certainly not official or binding on anyone (as indeed is true of decisions
made by the larger group), but they may be of interest as an indication of
the direction certain implementations are going.
[My notes record the topics in the order in which they were proposed for
the agenda, not the order in which they were discussed.]
MACROS
The situation is pretty much ok. It looks like most of the work is going
to have to be done by people at MIT, because that's where the largest
concentration of macrologists seems to lie.
ENVIRONMENTS & MODULES
Let's get some serious discussion going on RRRS-AUTHORS. This is important.
STRUCTURES & OPAQUE OPBJECTS
We didn't even touch on this over the weekend, though Norman Adams had
prepared a list of issues. Norman should post to RRRS-AUTHORS in order
to get something going. This is also important.
OPTIONAL ARGUMENTS
We agreed to use the #!OPTIONAL syntax as in MIT Scheme. For example,
(lambda (x #!optional y z . w) ...)
evaluates to a procedure with one required argument, two optional arguments,
and a rest argument. How do you tell if an optional argument is supplied?
It is not supplied if its value satisfies the DEFAULT-OBJECT? predicate.
For example, the WRITE procedure might be written
(define (write x #!optional p)
(let ((p (if (default-object? p) (current-output-port) p)))
...))
A feature of this approach is that the caller can pass a default object
as an argument, thereby faking an unsupplied argument. This is nice
when you want to supply a value for one optional argument without
supplying for any other optional arguments that precede it in the
argument list.
We did not decide on a syntax for default objects. This may have been
an oversight. You can get a default object by writing
((lambda (#!optional x) x)).
MULTIPLE RETURN VALUES
We agreed on the names VALUES and WITH-VALUES for the procedures that
return and accept multiple values, respectively. VALUES takes any
number of arguments and returns them as multiple values. WITH-VALUES
takes two arguments, of which the first is a thunk that may return
multiple values and the second is a procedure to be called on the
values returned by the thunk.
Since the five or six alternative semantics that people are considering
are linearly ordered by upward compatibility, it doesn't matter too
much what particular implementations do in the short term. Texas
Instruments will probably implement a semantics in which a continuation
that expects a single return value will accept any number of return
values, ignoring extra return values and seeing #F as the return value
if there are actually no return values.
EQUIVALENCE PREDICATES
The section on equivalence predicates in R3RS was a noble try, but it
satisfied neither those who wanted an abstract, portable definition of
EQV? nor those who wanted EQ? to be an thoroughly implementation-dependent
notion of object identity. Will Clinger volunteered to rewrite the
section, basing it on a notion of object identity implemented by EQ?
that is specified partially in an implementation-independent way, allowing
unspecified behavior to vary at the whim of implementations. EQV? would
then be a less implementation-dependent abstraction of EQ?. The description
of EQUAL? also needs to be tightened up.
The behavior of EQV? on empty strings and empty vectors would be left
implementation-dependent. The behavior of EQ? and EQV? on procedures
would be left as in R3RS; that is, EQ? and EQV? would have to return
true of procedures created by the same evaluation of a lambda expression,
would have to return false of procedures that behave differently (for
example because their local state is different), and would be
implementation-dependent on procedures that behave identically even
though they might have been created by different evaluations of a lambda
expression or lambda expressions.
One effect of these changes will be to make EQV? more like Common Lisp's
EQL procedure.
TOP LEVEL DEFINE SYNTAX
We considered whether the change in the 1986 Scheme standard that made
(define (foo ...) ...) equivalent to (define foo (lambda (...) ...))
instead of (define foo (rec foo (lambda (...) ...))) might have been
a mistake because of the efficiency issue. We decided that we liked
the way it was done in the 1986 standard, but that it was ok for
implementations to default to a "benchmark mode" that treats such
definitions as in the 1985 standard, provided there is a way to
disable benchmark mode.
CONDITION HANDLING
We cannot consider a standard condition (exception) handler until we
have a standard list of exceptions, interrupts, i/o errors, and syntax
errors. We also need some way to associate handlers with conditions
dynamically; fluid variables would be one possibility but are more
general than necessary for this use.
INTEGRABLE DECLARATIONS, CONSTANT DECLARATIONS, AND BLOCK COMPILATION
Most of the perceived need for these would go away if we had a good
enough module facility. Implementations can in the meantime experiment
with block compilation, knowing that most of the work should be
salvageable when modules arrive.
Insight: To declare that something is integrable not only declares it
a constant, but also advises the compiler that constant folding is
worth attempting.
INPUT EDITOR
Jonathan Rees proposed a procedure to make it possible to write a
portable reader that supports editing of input in the native style
on machines whose native style is to evaluate expressions immediately
when the closing parenthesis is typed. He was encouraged to submit
implementations to the yellow pages library. This seems to be a case
where non-portable implementations of a portable concept is appropriate
for the library.
PEEK-CHAR
Jonathan pointed out that the standard input procedures documented
in R3RS are not powerful enough to write a portable reader, because
Scheme lacks PEEK-CHAR and equivalents. We know that all major
implementations except possibly Chez Scheme have a PEEK-CHAR
procedure. We'd like to add PEEK-CHAR to the R3RS if there are no
major objections.
FLUID VARIABLES
We felt that MIT has the best semantics for fluid variables. Its
greatest weakness is its possible inefficiency on multi-tasking
and multiprocessor implementations, but the implementors of MIT
Scheme have some ideas that may solve that problem.
The meeting adjourned around midnight.
================================================================
End of minutes.
∂12-Jul-87 1702 @MC.LCS.MIT.EDU:ziggy@VX.LCS.MIT.EDU (DELAYED? <obj>) predicate
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 12 Jul 87 17:01:50 PDT
Received: from VX.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 12 JUL 87 20:00:46 EDT
Received: by VX.LCS.MIT.EDU (4.12/4.8) id AA22868; Sun, 12 Jul 87 20:00:20 edt
Date: Sun, 12 Jul 87 20:00:20 edt
From: Michael R. Blair <ziggy@VX.LCS.MIT.EDU>
To: rrrs-authors@mc
Subject: (DELAYED? <obj>) predicate
∂12-Jul-87 1711 @MC.LCS.MIT.EDU:ziggy@VX.LCS.MIT.EDU DELAYED? predicate
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 12 Jul 87 17:11:23 PDT
Received: from VX.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 12 JUL 87 20:02:23 EDT
Received: by VX.LCS.MIT.EDU (4.12/4.8) id AA22882; Sun, 12 Jul 87 20:01:55 edt
Date: Sun, 12 Jul 87 20:01:55 edt
From: Michael R. Blair <ziggy@VX.LCS.MIT.EDU>
To: rrrs-authors@mc
Subject: DELAYED? predicate
...sorry, the body of my previous message was delayed. It follows:
PROPOSAL FOR A NEW PREDICATE:
----------------------------
(DELAYED? <object>) ==> #T iff <object> is an unforced PROMISE
created via the DELAY procedure.
#F otherwise
RATIONALE:
---------
Insofar as it is possible to create a PROMISE (using DELAY), it
is desireable to detect if an object is in fact an unforced PROMISE.
To point, I find it occasionally desirable to check if a particular
PROMISE has ever been FORCEd soas to glean some information about the
dynamic behavior of a piece of code (such as, ``has this node in a tree
ever been visited (FORCEd)?''). To my knowledge, PROMISEs are the only
instance of a data-type in Scheme that may be created but not detected.
This makes them somewhat less than first-class in my mind.
SAMPLE IMPLEMENTATION: -- based on RRRS p.27
---------------------
(delay <expression>) --> (make-promise (lambda () <expression>))
(define (make-promise
(lambda (proc)
(let ((already-run? #F) (result #F))
(lambda (message) ; Add a message parameter
(case message ; Dispatch on message
((:FORCE) (cond ((not already-run?) ; Old code for FORCE
(set! result (proc))
(set! already-run? #T) ))
result)
((:DELAYED?) (not already-run?)) )))))) ; Expose the toggle
(define (force
(lambda (object) (object ':FORCE)) ))
(define (delayed?
(lambda (object) (object ':DELAYED?)) ))
CONSIDERATIONS:
--------------
Noting that some implementations may chose to make PROMISEs operationally
indistinguishable from their FORCEd value (e.g. implicit forcing), DELAYED?
may have to be a special form soas NOT to implicitly FORCE its argument.
Finally, I was very careful NOT to propose a predicate PROMISE?, noting
that some implementations may opt to make FORCE actually alter its argument
soas to henceforth be replaced (in the store) by the computed value. I
was likewise careful not to request (FORCED? <object>) which in some
implementations would NOT neccessarily be the logical inverse of
DELAYED? (e.g. may always return #F in implementations that modify the
store as noted above).
~Ziggy
∂15-Jul-87 1303 @MC.LCS.MIT.EDU:hieb@iuvax.cs.indiana.edu optional arguments
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 15 Jul 87 13:02:42 PDT
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 15 Jul 87 15:38:14 EDT
Date: Wed, 15 Jul 87 14:36:15 est
From: Robert Hieb <hieb@iuvax.cs.indiana.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: optional arguments
From the minutes of the Scheme implementors meeting:
-------------------------------------------------------------------------------
OPTIONAL ARGUMENTS
We agreed to use the #!OPTIONAL syntax as in MIT Scheme. For example,
(lambda (x #!optional y z . w) ...)
evaluates to a procedure with one required argument, two optional arguments,
and a rest argument. How do you tell if an optional argument is supplied?
It is not supplied if its value satisfies the DEFAULT-OBJECT? predicate.
For example, the WRITE procedure might be written
(define (write x #!optional p)
(let ((p (if (default-object? p) (current-output-port) p)))
...))
A feature of this approach is that the caller can pass a default object
as an argument, thereby faking an unsupplied argument. This is nice
when you want to supply a value for one optional argument without
supplying for any other optional arguments that precede it in the
argument list.
We did not decide on a syntax for default objects. This may have been
an oversight. You can get a default object by writing
((lambda (#!optional x) x)).
-------------------------------------------------------------------------------
This optional feature seems to be useful mainly for efficiency, in that it
makes it possible to avoid the allocation involved in the following:
(define (write x . l)
(let ([p (if (null? l) (current-output-port) (car l))])
...))
where a list would have to be allocated for the optional port.
However not much functionality is gained here, except for the error
checking on the supplied argument count (the second version would swallow
|(write x y z)|, while hopefully the #!opt interface would choke on it),
and a somewhat more convenient access to supplied optional arguments.
The price paid is a more complicated lambda-list interface, and a
rather homely one at that. It is also questionable whether we want to
introduce another special object, the default object. Apparently it is
to be a first class object, which can be referenced and passed around.
I agree that some sort of improved optional argument interface is needed
if Scheme is to continue to support optional arguments to rrrs-specified
procedures. A valid criticism of the present Scheme specification is that
it allows optional arguments without providing a reasonable user interface.
Efficiency is certainly a consideration--many users would like to be able
to write procedures with optional arguments without taking a big efficiency
hit (even worse is the necessity of educating users who need to be concerned
about efficiency of such tradeoffs between functionality and efficiency).
However the issue of usability should also be addressed. The rest-interface
is most useful for procedures that take an indefinite number of arguments,
and its use is strained at best when used to implement restricted optional
arguments. Error checking for excess arguments is messy, and usually
ignored (as in my above example). The process of determining whether
an argument has been supplied, and setting up the correct binding is also
tedious and not very transparent. What is needed is an interface that makes
the whole process safe and transparent, and at the same time allows efficient
implementation. The interface should be attractive enough that users aren't
tempted to use the rest-interface unnecessarily. Of course the usability
problem can be solved by macros, but as long as we are considering moving
something new into the language, it makes sense to provide it at as close
to desired final form as possible, so as to prevent the explosion of
incompatible macro interfaces that try to provide convenient access to an
excessively primitive feature.
Looking at the |#!optional| proposal, it is clear that it solves the problem of
error checking for excessive arguments. It also simplifies checking for the
presence of supplied values and accessing those values for rebinding, since
they may be accessed by name rather than by position in a list. However the
actual checking and rebinding must still be explicitly carried out, and the
process of rebinding is not very transparent, since it is buried inside of
|let|s and |if|s. The introduction of a default value is also questionable,
since its main use is to be looked at and thrown away. The burden of making
sure that it does get checked and replaced is left to the user, and if he fails
to handle it correctly the default value remains to slosh around and cause mysterious errors. (It could get passed along to another procedure with default
arguments!) The cases where the default value is used other than by
|default-object?| are probably (hopefully?) few and arcane, and thus of
questionable significance.
I suspect most users, and systems, would want to build some cleaner interface
on top of the primitive |#!optional| one, so we should investigate such
interfaces with the goal of finding one that can be supported directly by
the Scheme community, keeping optional arguments simple and contained.
One such optional argument interface which has useful features both in terms
of efficient implementation and in terms of a useful user interface is
|case-lambda|, which dispatches on the number of arguments received.
For instance:
(define write
(rec write
(case-lambda
[(x p) ...]
[(x) (write x (current-output-port))])))
Each branch of a |case-lambda| statement is equivalent to a similarly structured
|lambda| statement, except which branch is applied depends upon how many
arguments are supplied. Thus the above is semantically equivalent to:
(define write
(rec write
(lambda l
(apply (case (length l)
[2 (lambda (x p) ...)]
[1 (lambda (x) (write x (current-output-port)))]
[else (error 'write "wrong number of arguments")])
l))))
However in practice the code can be highly optimized, and the list |l| need
never be created. Since the internal |write| has lexical scoping, the call to
it in the second case should be just a jump. The actual dispatching on
the argument count can also optimized by the compiler, probably resulting
in better performance than that provided by checks against a default
value, even if the |default-object?| predicate is recognized by the compiler.
So, provided that one is willing to let the compiler recognize
one more special form, the performance for |case-lambda| should be excellent.
|case-lambda| also provides a simple user interface. The default value
problem goes away. The status and intent of procedure parameters is
signaled immediately--one needn't look at the code body to determine where
the real value is available and where it isn't. If an argument is visible
in a piece of code, it has a 'real' value. The number of new identifiers and
forms is also minimized. While the #!proposal introduces |#!optional|
and |default-object?|, and probably something like |#!optional-default-object|,
|case-lambda| needs only its own name, and for those who like to keep
core special forms to an absolute minimum, |lambda| can clearly be defined
as a special case of |case-lambda|. One argument for the naturalness of the
|case-lambda| specification of procedures that take optional arguments is that
it is very similar to the specification patterns used in the rrrs for
procedures that accept optional arguments. It seems to be a natural way
to think and write about them.
Another useful feature of |case-lambda| is that it makes it simple to
treat any of the arguments to a procedure as optional, not just those
on the tail of the argument list. For instance if one thought the port
should come first (but still be defaulted) in |write|:
(define backwards-write
(case-lambda
[(p x) (write x p)]
[(x) (write x (current-output-port))]))
A more realistic example is |-|, in which it IS the first argument that
is missing when only one is provided:
(define -
(case-lambda
[(x y) (minus x y)]
[(x) (minus 0 y)]
[(x . l) (let loop ([total x] [rest l])
(if (null? l)
total
(loop (minus total (car l)) (cdr l))))]))
This points out a drawback to all the optional argument interfaces
presented so far--none supply a simple way to avoid the allocation
involved when indefinitely many arguments are allowed. Often one ends
up with the above situation, in which the list is used as a stack and
never escapes, but still must be allocated. Note that the following simpler
definition would be incorrect since the list is reallocated on the recursive
calls to |-| in the third case:
(define -
(rec -
(case-lambda
[(x y) (minus x y)]
[(x) (minus 0 y)]
[(x y . l) (apply - (minus x y) l)])))
The problem is that the allocation involved in creating the lists will
be quadratic in relation to the number of arguments, when the algorithm
should of course be linear. (Perhaps this really points out a problem in
the interaction between |apply| and the rest-interface.)
Either the |#!optional| and |case-lambda| technique can be implemented with
macros in systems that don't wish to provide the interface as a primitive.
There is a problem in implementing the |#!optional| interace as a macro
though--what is to be the special optional-default-value? Clearly it
should be unique--not |eq?| to anything else in the system. However it is
also desirable that no primitive type predicates other than |default-value?|
answer yes to it, and it should be atomic--consequently it should not be
just a unique structured object obtained by something like:
(define *optional-default-value* '(*optional-default-value*))
The one feature that |#!optional| provides that |case-lambda| doesn't is the
ability to sneak around the normal interface by providing the optional-
default-value in the middle of an argument list--perhaps as an argument
to something like
(define (substring s #!optional start end)
(let ([start (if (default-object? start) 0 start)]
[end (if (default-object? end) (string-length s) end)])
...)
which could then be called with something like
(substring some-string (default-optional-object) some-end)
instead of
(substring some-string 0 some-end)
which of course is a straw-man argument, but I suspect it might be hard
to come up with many good examples where that feature would be useful.
It would almost have to be a case where one couldn't know or access the
default. And of course once such an object "gets loose" it becomes tempting
to use it in other similar contexts. For instance |(assq x al)| might return
it if |x| isn't found, otherwise it could return the value associated with |x|--
arguably a more useful and natural interface, but as the special optional-
default-value floats around it will become as useful as |#f|, and eventually as
useless. Perhaps |(values)| should return it to a continuation expecting one
value? It is worth considering just why |#f| isn't usable as the special
optional-default-value, and wondering whether a new optional-default-value
would eventually suffer a similar fate. One way to preserve the "odv" for
its original intended use is to forbid its use as a value. Referencing
a defaulted identifier then forces an error similar to referencing an
unbound symbol. But then |default-object?| (which should then be renamed
something like |supplied?|) becomes yet another special form, and the above
trick goes away (as perhaps it should), and of course implementors have yet
another error to trap, users have yet another error to stumble over, and
the optional-interface becomes even more difficult (if not impossible) to
implement correctly as a macro.
Revising the |#!optional| syntax so that default values are specified
overcomes most of its problems, but is still not useful as |case-lambda|
in many common situations. One might have
(lambda (x ... #!optional [y v] ... . z) e ...)
or something similar, in which the |v|s are the default values for the
optional |y|s. For instance:
(define (write x #!optional [p (current-output-port)])) ...))
One new question this raises is the scoping of the |v|s--which of the
identifiers in the parameter list should they be allowed to see?
The simplest answer is none, but that makes it difficult to write
procedures like |substring| from above, where the defaults depend on
the supplied values. So perhaps they should be able to see the
required arguments--or even the supplied optionals--or perhaps all the
identifiers to each value's left, with a |let*| semantics...
Unlike |case-lambda|, the scoping is not obvious. It is also hard
to use it to define certain classes of procedures with optional arguments.
For instance try using this syntax on |-|.
(define -
(let ([flag '(flag)])
(lambda (x #!optional [y flag] . l)
(if (eq? y flag)
(minus 0 x)
(let loop ([total (minus x y)] [rest l])
(if (null? l)
total
(loop (minus total (car l)) (cdr l))))))))
is the best I can do, and I don't much care for the way it looks, nor
does it look like it is going to be easy to optimize.
The comparison procedures like |<| lead to equally murky results using
this version of |#!optional|, but are relatively clean using |case-lambda.|
In conclusion, |case-lambda| provides a pretty and simple high-level
optional interface that can be efficiently implemented without further
overloading of the identifier-list and without requiring the introduction
of new special objects.
∂21-Jul-87 1512 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Recognizing QUOTE deemed harmful to EVAL's laziness
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 21 Jul 87 15:12:36 PDT
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 21 Jul 87 17:44:14 EDT
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA12424; Tue, 21 Jul 87 12:48:01 PDT
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 21 Jul 87 09:45:43 GMT
From: mcvax!inria!crcge1!adams@seismo.css.gov (Drew Adams)
Subject: Recognizing QUOTE deemed harmful to EVAL's laziness
Message-Id: <2698@crcge1.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
WARNING: This is a bit long
In article 444 of comp.lang.misc Robert Firth writes:
... In applicative languages, repeated evaluations of an
expression always yield the same result, so we can replace
delayed evaluation by true lazy evaluation, ie evaluate
once only when first referenced. ...
SUMMARY:
I agree, but argue that this is not true of all applicative
languages; in particular, it's not true of pure LISP, due to its
treatment of quotation.
The meaning of the term "lazy evaluation" is not universally agreed
upon. Some use it to mean "call-by-need", i.e. the one-shot
evaluation referred to above. Others identify it with "call-by-name"
(or "normal order reduction" in the context of the lambda calculus
and combinatory logic.) "True" call-by-need is now more commonly
termed "fully lazy reduction" in functional programming circles.
Henderson & Morris and Friedman & Wise are usually credited with the
introduction of "lazy evaluation". I believe Wadsworth was the first
to speak of "call-by-need" and in any case he was the first to point
out the delicacies of "full laziness", although I believe the latter
term is due to Hughes. The concepts of different evaluation orders
are of course much older than these terms, predating the electronic
computer age [Church, Curry, Rosser].
The simple argument given above by Firth bears repeating and is the
basis for the assertion that "lazy evaluation and side effects don't
mix" (cf. Abelson & Sussman).
I would only add one change to the argument: full laziness lends
itself most naturally not to applicative (functional) languages in
general but, more precisely, to those respecting "*reduction*
semantics". In particular, the purely functional language "pure
LISP" (without side effects but with built-in quotation) does *not*
respect such semantics and is thus not easily made (fully) lazy. The
issue is quotation. Without its built-in recognition of quotation
LISP otherwise has reduction as its operational semantics.
To be "applicative" or "purely" functional a language must be
"referentially transparent", meaning that the same expression, in the
same definitional context, is always evaluated to the same result.
Pure LISP has this property.
"Reduction semantics" refers to the property of always being able to
replace an expression by its result, in the same definitional
context, without altering the result of the overall computation.
Because of this property, an expression and its reduction may thus be
said to "*denote* equivalent values". The property which Mr. Firth
referred to above, of obtaining the same result no matter how many
times an expression is evaluated, is implied by reduction semantics,
but not, I believe, by the semantics of pure LISP.
Of course, due to the possibility of side effects, in *impure* LISP,
re-interpretation of even the *same* code may produce different
results. Here, however, the issue is *repeated* interpretation of
code -- not that original source code is interpreted more than once,
but that the *result* of interpretation is then interpreted and
possibly re-interpreted ....
Once *reduction* of an expression is started we can assume that it
proceeds all the way to some kind of an irreducible (normal) form, so
that further attempts at reduction have no effect. In lazy
functional languages this final form is not usually "*the* normal
form" of the lambda calculus in which no redexes (reducible
subexpressions) appear, but the so-called "weak head", or "lazy"
normal form, in which only the outermost function application need be
irreducible. In reduction-based languages intermediate forms aren't
normally even available to the programmer. This is not a problem
semantically; one never need worry about reduction having "gone too
far", because the intermediate, as well as initial and normal forms,
may all be seen as equivalent.
I don't know what (pure) LISP's operational semantics should be
called. If it weren't already in use we might consider the term
"denotational" to characterise its *operational* semantics, since the
built-in recognition of quotation provides the ability to distinguish
*different levels* of representation of meaning.
The LISP expression (QUOTE FOO) might be said in a sense to denote
the expression (value) FOO to which it evaluates, but the two aren't
equivalent; i.e. there are many contexts in which one can't be
replaced by the other without changing the overall meaning and
result. For example, if the value of FOO is defined to be 2 then
(NUMBERP FOO) is true (T), whereas (NUMBERP (QUOTE FOO)) is false
(NIL). (For simplicity, let's assume denoted values are always
expressions; values of the function represented by the functor QUOTE
are necessarily so.)
In a reduction-based language, if A is defined as B, and B as C,
reducing A gives C, and all three may be said to have equivalent
meaning, as determined, or shown, by the operation of the language's
equality predicate. In LISP on the other hand, if A is defined to
have the value B, and B to have the value C, evaluating A gives B,
not C. This behavior is due to the recognition of QUOTE. The
meaning of A isn't necessarily the same as that of B, let alone that
of C, as determined by LISP predicates such as EQ and EQUAL.
Denotation, unlike reduction, is leveled: A may denote B which
denotes C..., but we need not (indeed had better not) assume this
means, e.g., that A denotes C. Thus, if A (LISP-) evaluates to B,
and (independently) B evaluates to C, we can assume neither that A is
equivalent to C, nor that A denotes C. (In this case, the fact that
evaluation of A stops at B means that (QUOTE B) was necessarily
encountered during the evaluation of A.)
Having such a denotation mechanism available in a language
facilitates a leveled view of things. However, it would seem that
most programmer use of quotation in LISP doesn't really involve
intentional semantic leveling. The most frequent uses of quotation
in LISP would appear to be:
* to prevent the attempted evaluation of something which is
undefined, together with the ensuing error treatment
* to prevent the immediate evaluation of a defined expression
because the moment isn't right.
The first of these is by definition unnecessary in a language
"tolerant of the undefined". By this I mean that undefined
expressions are simply regarded as irreducible (in normal form) and
provoke no error treatment. (By "undefined expression" I mean an
expression matching no definition left hand side.) Most "rewriting
systems" are so tolerant; most functional languages are not, although
many permit the declaration of constructions.
The second common use of LISP quotation may be motivated by concerns
of correctness, as well as efficiency. The correctness concern is
due to the fact that replacing an expression by its value doesn't, in
general, preserve semantic equivalence, as was indicated above.
Besides the special treatment of quotations, this is due to the
non-declarative nature of (impure) LISP. The efficiency concern is
due to the "eager" (non-lazy) nature of LISP. Even if it would not
be incorrect in a given situation to evaluate certain expressions, it
may be advisable on efficiency grounds to postpone their evaluation,
perhaps indefinitely.
Reduction semantics dispense with the first of these concerns, and
lazy interpretation (*normal order* reduction) may be used to
alleviate the second: subexpressions of an interpreted expression
are not necessarily reduced. In LISP, for example, one often places
oneself at a meta-level to construct some code which is passed around
and manipulated, and then at an opportune moment is executed. In a
lazy language such code need not be treated as quotation: as long as
its interpretation isn't needed by the functions which pass it around
it won't be reduced. Even without laziness, as long as the code is
underdefined little or no reduction can take place, so that code may
be constructed directly without it needing to pass through a phase
where it takes on the form of a construction such as a list. (A
function application may be underdefined either because all its
arguments are not yet present ("partial parameterization") or because
no definition for it has yet been interpreted.)
In other words, QUOTE is mainly used by LISP programmers to offset
the eagerness of EVAL. If one weren't afraid of throwing oil on
forscoming lithpian flames (this one can feel the heat already) one
*might* argue that, as all computation in LISP is evaluation (in a
denotational sense), the programmer is obliged to conceptually move
up and down between semantic levels that are essentially artificial
in a purely declarative setting. They don't correspond to her
conception of the meaning of the program but rather function as an ad
hoc mechanism to keep the eagerness of EVAL at bay. She in fact
eventually learns to ignore or abstract from them when mentally
interpreting code. LISP requires programmers to employ quotation
even when it serves no apparent semantic purpose. (Such overuse
would of course be greatly reduced were programmers not obliged to
consider also the side effects and referential opacity of (impure)
LISP.) (Cf. Wadler)
Likewise, it would seem that in our daily reasoning we are rarely
conscious of using more than few semantic levels at once.
Nevertheless, there *are* times when a device for manipulating
programmer-defined levels of denotation is useful. Implementation/
manipulation of languages is a typical example where quotation is
appropriate. As such leveling is a very powerful abstraction
construct, it would be desirable not to have to do without denotation
in opting for reduction semantics. One would like to be able to
define meta-meta-levels, and so on. Fortunately it's easy to have
our cake and eat it too in a reduction-only setting by simply
programming quotation/denotation *explicitly* for use just where we
need it.
Consider the hypothetical question
"What is the denotation of ((3 - 7) + (4 / 2)) * 6 ?".
A reduction interpreter is only in effect able to respond
"It's the denotation of -12, whatever that may be".
But suppose now that for a given application a programmer wants to
consider that the true meaning of -12 is, say, the object represented
by the expression OVERDRAWN. It's straightforward to define a
function MEANING which will perform such an EVALuation. (Function
application is represented here by juxtaposition: Sin 3.14159, not
sin(3.14159)):
Meaning -12 = Overdrawn
Suppose now that OVERDRAWN in turn is defined (though its *meaning*
is not):
Overdrawn = More-debits-than-credits
where the right hand side is simply an undefined term. If this is
the case then the original request is reduced as follows:
Meaning (((3 - 7) + (4 / 2)) * 6)
==> Meaning -12 ==> Overdrawn ==> More-debits-than-credits
Of course, this result has nothing to do, a priori, with the
*meaning* of the expression OVERDRAWN. The latter (which is the same
as the *meaning of the meaning* of the expression -12) might be
defined:
Meaning More-debits-than-credits = Spendthrift
Assuming, again, that the right hand side is undefined, we have:
Meaning Overdrawn
==> Meaning More-debits-than-credits ==> Spendthrift
Such a simple denotational mechanism makes no assumption about the
meanings of constructions (undefined terms) such as, e.g., that they
denote themselves. In this it is a more flexible device than that
provided by LISP's EVAL. If 5 is a construction, then, although 5
*reduces* to itself (i.e. is irreducible), the MEANING of 5 is not 5
(or anything else) by default, nor are we prohibited from defining it
to be 6. This is a good reminder that denotational evaluation need
not be equivalence-preserving. For, while in our own eyes and the
eyes of a function such as MEANING we may identify, say, 2 and 3 by
defining their MEANINGs to both be, say, 7, or RHUBARB, or whatever,
this equivalence is fictive as far as the interpreter is concerned.
Then:
((Meaning 2) = (Meaning 3)) ==> True,
whereas
(2 = 3) ==> False.
More importantly, it is not even operationally possible for us to
assign two expressions which have the same normal form, such as
(2 + 2) and 4, different meanings.
The quotation mechanism itself may of course be provided quite simply
by the general rule:
Meaning (Quote x) = x
where QUOTE is simply a constructor (undefined symbol). Then:
Meaning (Quote -12) ==> -12
Note incidentally that we are of course in no way limited to a single
MEANING function, but may easily define as many different denotations
as we like. Likewise it might sometimes be useful to have various
quoting constructors. Such constructors are in effect used to
establish different denotational levels (meta, meta-meta, etc.), and
having different such quoting devices would allow different meaning
functions to move differently among the various levels, even with
respect to the same argument expression.
Similarly, a given meaning function might recognize more than one form
of quotation. E.g.,
My-meaning (My-quote x) = x
Your-meaning (Your-quote x) = x
Your-meaning (My-quote x) = Nonsense!
Then, for example:
My-meaning (My-quote Foo) ==> Foo
Your-meaning (My-quote Foo) ==> Nonsense!
My-meaning (Your-quote Foo) ==> My-meaning (Your-quote Foo)
[already in normal form]
To recapitulate, the argument I have with (pure) LISP's EVAL (leaving
aside side effects and eagerness) is not that it is denotational, but
that it's recognition of quotation is omnipresent. It is as though
LISP were a reduction interpreter that automatically provided a
function such as MEANING, respecting quotation, with every prompt.
That is, one might say that every expression FOO evaluated by LISP is
first regarded as (MEANING FOO), and is then reduced. It is
difficult in general to ask LISP for a simpler version of the same
expression; EVAL looks for meaning behind each input. In a reduction
setting on the other hand, denotational evaluation is still
available, using only the mechanism of reduction, just by defining
explicit denotation functions such as MEANING.
References:
==========
Laziness:
--------
%T A Lazy Evaluator
%A Peter HENDERSON
%A James H. MORRIS, Jr.
%B Third Annual ACM Symposium on Principles of Programming Languages (POPL)
%P 95-103
%I ACM
%D January 1976
%T CONS Should Not Evaluate its Arguments
%A Daniel P. FRIEDMAN
%A David S. WISE
%J Automata, Languages and Programming: Third Int'l Coll.
%P 257-284
%E S. MICHAELSON and R. MILNER
%I Edinburgh University Press
%D July 1976
%T Structure and Interpretation of Computer Programs
%A Harold ABELSON
%A Gerald Jay SUSSMAN
%A Julie SUSSMAN
%I The MIT Press and McGraw-Hill
%C Cambridge, Massachusetts, and New York
%D 1985
"Full" laziness:
---------------
%T Semantics and Pragmatics of the Lambda-calculus
%A Christopher Peter WADSWORTH
%I Oxford University
%D September 1971
%O Ph.D. Thesis
%T Design and Implementation of Programming Languages
%A Robert John Muir HUGHES
%R Technical Monograph PRG-40
%I Oxford University Computing Laboratory, Programming Research Group
%C Oxford
%D July 1983, as monograph September 1984
%O Ph.D. Thesis
Reduction:
---------
%T The Calculi of Lambda-Conversion
%A Alonzo CHURCH
%J Annals Math. Studies
%V 6
%I Princeton University Press
%C Princeton, New Jersey
%D 1941
%T Combinatory Logic
%A Haskell B. CURRY
%A Robert FEYS
%A William CRAIG
%V 1
%I North-Holland
%C Amsterdam
%D 1968
%T Highlights of the History of the Lambda Calculus
%A J. Barkley ROSSER
%J Annals of the History of Computing
%V 6
%N 4
%P 337-349
%I American Federation of Information Processing Societies
%D October 1984
Quotation:
---------
%T A Critique of Abelson and Sussman - or - Why Calculating is
Better Than Scheming
%A Philip WADLER
%J SIGPLAN Notices
%V 22
%N 3
%P 83-94
%I ACM
%D March 1987
--
Drew ADAMS, Laboratoires de Marcoussis, Centre de Recherche de la Compagnie
Generale d'Electricite, Route de Nozay, 91460 MARCOUSSIS, FRANCE
Tel. 64.49.11.54, adams@crcge1.cge.fr
∂21-Jul-87 1956 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Recognizing QUOTE deemed harmful to EVAL's laziness
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 21 Jul 87 19:56:34 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 21 Jul 87 22:47:43 EDT
Date: Tue, 21 Jul 87 22:48:18 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Recognizing QUOTE deemed harmful to EVAL's laziness
To: mcvax!inria!crcge1!adams@SEISMO.CSS.GOV
cc: scheme@MC.LCS.MIT.EDU
In-reply-to: Msg of 21 Jul 87 09:45:43 GMT from mcvax!inria!crcge1!adams at seismo.css.gov (Drew Adams)
Message-ID: <230562.870721.JAR@AI.AI.MIT.EDU>
I don't quite see what the big deal is. I agree that reduction is a
somewhat nicer but it doesn't seem to be a very deep question. Consider
a language which is identical to Lisp (or Scheme) with the following
exceptions:
- There is no EVAL.
Instead, there is a procedure NORMALIZE which could be defined as
(define (normalize x environment)
(object->expression (eval x environment)))
(define (object->expression x)
(cond ((or (number? x) (char? x) (string? x) (boolean? x))
x)
(else `',x)))
- The "datum" in (QUOTE datum) must not be "self-evaluating".
(I.e. reserve ' for use by things which don't need it. You don't
write numbers in Pascal using "...", do you? Why do the analogous
thing in Lisp?)
- PRINT writes out an expression that evaluates to the object, if
possible. E.g. (PRINT 'FOO) would write the characters 'FOO.
There's no semantic difference between this language and Lisp, only
trivial differences in the runtime library. But it would appear to have
so-called "reduction semantics", wouldn't it? So what's the big deal?
The nature of the runtime library (EVAL, PRINT, etc.) is orthogonal to
the question of laziness; a lazy Lisp would work just fine.
What is the relevance to Scheme (which has no EVAL), by the way?
[Please note: Drew Adams' message, to which this is a reply, contains
the line "Sender: scheme-request at mc.lcs.mit.edu" in its header. The
header lies; the message was NOT sent by scheme-request. I think this
is some kind of Unixoid kludge inserted automatically by a mail
system somewhere between inria and MC.]
∂22-Jul-87 0919 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA modules
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 22 Jul 87 09:19:09 PDT
Received: from mitre-bedford.ARPA (TCP 3200600102) by MC.LCS.MIT.EDU 22 Jul 87 12:12:20 EDT
Posted-From: The MITRE Corp., Bedford, MA
Received: from darwin.sun.uucp by linus.research (3.2/4.7)
id AA05335; Wed, 22 Jul 87 12:11:20 EDT
Posted-Date: Wed, 22 Jul 87 12:10:25 EDT
Received: by darwin.sun.uucp (3.2/SMI-3.0DEV3)
id AA06942; Wed, 22 Jul 87 12:10:25 EDT
Date: Wed, 22 Jul 87 12:10:25 EDT
From: ramsdell%linus@mitre-bedford.ARPA
Message-Id: <8707221610.AA06942@darwin.sun.uucp>
To: rrrs-authors@mc.lcs.mit.edu
Subject: modules
Thanks to Will for his fine summary of the Scheme meeting. My highest
priority item for changes to Scheme is the inclusion of macros. I was
quite happy when Will reported:
------------
MACROS
The situation is pretty much ok. It looks like most of the work is
going to have to be done by people at MIT, because that's where the
largest concentration of macrologists seems to lie.
-------------------
I have directed my attention to my second highest priority: modules.
I decided to start by surveying modules in existing languages. I
ignored COBOL, FORTRAN, Pascal, C, PL/1 (Hmm... aren't they the most
used languages?), and Prolog, as those languages have little to say on
the subject of modules. I looked closely at ML, Modula-2, Ada, CLU
and Common Lisp. While the solutions these languages and their
environments present to the problem of organizing and structuring
large programs suggest many possibilities for Scheme, I in no way
would like to preclude a novel approach.
I've noticed three broad goals of module systems:
1. Logical separation of information -- in which information
describing an interface is shared, but information describing an
implementation is hidden (All). Multiple implementations of the same
interface is often also sometimes goal.
2. Physical separation of information -- in which compilation of
modules can proceed the compilation of the entire program with out
greatly affecting the quality of code produced (ML, Modula-2, Ada).
Compilations are performed with knowledge of all relevant interfaces,
so that inter-module type checking can be performed, and the compiler
can use the type information. Usually, the subject of precompiled
libraries and recompilation control, like Unix make, are also
addressed.
3. Object-oriented programming support -- in which instances of
modules are *interpreted types*, wherein the data object and its
operations are considered as a generalized form of type (ML, CLU).
I know that some Scheme people are interested in supporting block
compilation, so physical separation of information should be a goal.
I'm sure all would like a module system to support logical separation
of information, but I think using modules to support object-oriented
programming is debatable. Of course, my characterization of the goals
of modules in other systems is debatable, a debate I welcome.
Common Lisp's view of logical separation consists of limiting the
access of some symbols, and I suspect it can quickly be dismissed.
One difference between modules in CLU and in Modula-2, ML, and Ada, is
the latter languages have separate constructs that declare an
interface and an implementation. This separation is strongly
supported by users, and I hope a Scheme module system allow the same
separation. Furthermore, ML and Ada allow parameterized
implementations which are instantiated. This also seems to be a win.
It seems that ML's module system is a better than Ada's as a base from
which a Scheme module system may evolve. For one reason, ML shares
the goal of supporting interactive program development unlike Ada.
However, the following changes to Ada suggested by some Ada people
here at MITRE may be useful.
1. Implementations (package bodies in Ada) should be first-class so
that object-oriented programming is better supported.
2. Explicit control of what is imported should be added. This can be
used to insure code remains valid even when interfaces change.
3. Multiple levels of hiding should be added. In Ada (and the other
languages as well), you either have access to all an interface
exports, or you have access to nothing. They want the use of an
interface to determine what is exported.
Then again, maybe these suggestions won't be useful. I encourage all
to look at David MacQueen's article in the 1984 LISP and Functional
Programming Conference called "Modules for Standard ML".
John
∂22-Jul-87 1259 @MC.LCS.MIT.EDU:reddy@b.cs.uiuc.edu Recognizing QUOTE deemed harmful to EVAL's laziness
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 22 Jul 87 12:58:48 PDT
Received: from b.cs.uiuc.edu (TCP 30001242402) by MC.LCS.MIT.EDU 22 Jul 87 15:36:39 EDT
Received: by b.cs.uiuc.edu (UIUC-5.52/9.7)
id AA05068; Wed, 22 Jul 87 13:51:44 CDT
Date: Wed, 22 Jul 87 13:51:44 CDT
From: reddy@b.cs.uiuc.edu (Uday S. Reddy)
Message-Id: <8707221851.AA05068@b.cs.uiuc.edu>
To: mcvax!inria!crcge1!adams@seismo.css.gov
Cc: scheme@mc.lcs.mit.edu, fp@yale.arpa
In-Reply-To: (Drew Adams's message of 21 Jul 87 09:45:43 GMT <2698@crcge1.UUCP>
Subject: Recognizing QUOTE deemed harmful to EVAL's laziness
I too am quite perplexed by Drew's essay.
I would only add one change to the argument: full laziness lends
itself most naturally not to applicative (functional) languages in
general but, more precisely, to those respecting "*reduction*
semantics". In particular, the purely functional language "pure
LISP" (without side effects but with built-in quotation) does *not*
respect such semantics and is thus not easily made (fully) lazy. The
issue is quotation. Without its built-in recognition of quotation
LISP otherwise has reduction as its operational semantics.
To be "applicative" or "purely" functional a language must be
"referentially transparent", meaning that the same expression, in the
same definitional context, is always evaluated to the same result.
Pure LISP has this property.
I don't see how. A counterexample, assuming FOO is bound to 2 in the
context:
(QUOTE FOO) -> (QUOTE 2) by innermost reduction
But (QUOTE FOO) and (QUOTE 2) are different objects. Indeed, the term
"referential transparency" was coined by logicians precisely to
distinguish between things like (QUOTE FOO) and FOO. (QUOTE FOO)
"mentions" FOO, whereas FOO (or (+ FOO 1)) "uses" it. Referential
opacity is not necessarily bad. It is bad only if it is ambiguous
whether a particular occurrence of a symbol denotes a "mention" of it,
or a "use" of it. The point of QUOTE is precisely to eliminate any
such ambiguity, by distinguishing mentions from uses. The reduction I
showed above is thus invalid, because (QUOTE FOO) clearly means a
mention of FOO, so I can't replace FOO by something equivalent to it.
The LISP expression (QUOTE FOO) might be said in a sense to denote
the expression (value) FOO to which it evaluates, but the two aren't
equivalent;
Precisely. They aren't equivalent. So, why say that (QUOTE FOO)
denotes FOO? The confusion is probably caused by the fact that a Lisp
interpreter prints FOO rather than (QUOTE FOO) when we type in
(QUOTE FOO). I do wish Lisp interpreters didn't do that. They should
print (QUOTE FOO) to be precise. But, they print FOO for the sake of
convenience, I presume. Since FOO can never be the normal form value
of any expression (if FOO is bound, then its binding is the normal
form and, if it is unbound, then it is an error) they print FOO and
expect the user to understand it as (QUOTE FOO).
Having such a denotation mechanism available in a language
facilitates a leveled view of things. However, it would seem that
most programmer use of quotation in LISP doesn't really involve
intentional semantic leveling. The most frequent uses of quotation
in LISP would appear to be:
* to prevent the attempted evaluation of something which is
undefined, together with the ensuing error treatment
* to prevent the immediate evaluation of a defined expression
because the moment isn't right.
The most common use of quotation is merely to denote data objects.
Since Lisp does not have a separate syntax for data objects and
programs (which many Lispers consider to be an asset), data objects
are treated as "mentions" of S-expressions and programs are treated as
"uses" of them. This is one way of doing it. There are other ways,
of course. Prolog uses different syntax for atoms and variables.
Pascal and ML use declarations for atoms and constructors. Using a
normalizer instead of an evaluator (which Drew mentions later) is
another way. But, there are strong arguments against normalizers.
Firstly, they are inefficient compared to evaluators. Secondly, when
there is an error it is better to tell the user about it immediately
rather than printing a large expression and expecting the user to
search for the erroneous application in it.
The use of quotation for delayed evaluation is now widely recognized
to be misguided. Modern Lisps, such as Scheme, have constructs like
"delay" to achieve lazy evaluation.
Likewise, it would seem that in our daily reasoning we are rarely
conscious of using more than few semantic levels at once.
Nevertheless, there *are* times when a device for manipulating
programmer-defined levels of denotation is useful. Implementation/
manipulation of languages is a typical example where quotation is
appropriate. As such leveling is a very powerful abstraction
construct, it would be desirable not to have to do without denotation
in opting for reduction semantics. One would like to be able to
define meta-meta-levels, and so on. Fortunately it's easy to have
our cake and eat it too in a reduction-only setting by simply
programming quotation/denotation *explicitly* for use just where we
need it.
But suppose now that for a given application a programmer wants to
consider that the true meaning of -12 is, say, the object represented
by the expression OVERDRAWN. It's straightforward to define a
function MEANING which will perform such an EVALuation.
Such a MEANING function can be defined in any Lisp as well. (It is no
different from any other function). If such a MEANING function
differes from the standard meaning in minor ways, then Lisp allows you
to share it by calling EVAL from your MEANING function. If you indeed
want to use the standard meaning it should not be necessary to write a
brand new interpreter.
The quotation mechanism itself may of course be provided quite simply
by the general rule:
Meaning (Quote x) = x
where QUOTE is simply a constructor (undefined symbol). Then:
Meaning (Quote -12) ==> -12
This works only if outermost evaluation is the default (standard)
evaluation of the language. All Lisps use innermost evaluation
(though other modes of evaluation are provided by constructs like
"delay", "freeze" and "future"), so this trick does not work. It is
by no means universally accepted that outermost evaluation as the
default is "good", and many people who work with outermost evaluation
have reservations about using it as the default.
Drew ADAMS, Laboratoires de Marcoussis, Centre de Recherche de la Compagnie
Generale d'Electricite, Route de Nozay, 91460 MARCOUSSIS, FRANCE
Tel. 64.49.11.54, adams@crcge1.cge.fr
In summary, I can see no difference between "applicative semantics"
and "reduction semantics". The question of referential transparency
is orthogonal to applicative semantics. I believe Drew's comments are
largely motivated by the minor misuse of notation by Lisp interpreters
in not printing the outermost QUOTE.
Uday Reddy
reddy@a.cs.uiuc.edu
∂23-Jul-87 0018 @MC.LCS.MIT.EDU,@RELAY.CS.NET:stevev@tekchips.tek.com
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Jul 87 00:18:18 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 23 Jul 87 03:01:09 EDT
Received: from relay2.cs.net by RELAY.CS.NET id af05018; 23 Jul 87 2:51 EDT
Received: from tektronix.tek.com by RELAY.CS.NET id ao19444; 23 Jul 87 2:44 EDT
Received: by tektronix.TEK.COM (5.51/6.23)
id AA07882; Wed, 22 Jul 87 14:17:32 PDT
Received: by tekchips.TEK.COM (5.51/6.23)
id AA12230; Wed, 22 Jul 87 14:16:14 PDT
Message-Id: <8707222116.AA12230@tekchips.TEK.COM>
To: rrrs-authors%tekchips.tek.com@RELAY.CS.NET
Subject:
Date: 22 Jul 87 14:16:12 PDT (Wed)
From: Steve Vegdahl <stevev%tekchips.tek.com@RELAY.CS.NET>
I have a question about Scheme about which I am unclear after reading
R3RS. Consider the following procedure definitions
(define foo
(lambda () '(x y z)))
(define baz
(lambda () `(x y z)))
(define grump
(lambda (k) `(x y z ,k)))
Are the following expressions true, false, or implementation-dependent?
1: (eq? (foo) (foo))
2: (eq? (baz) (baz))
3: (eq? (grump 'w) (grump 'w))
It is hard to imagine that implementation would require 1 to be false or
3 to be true. But I could imagine, for example implementations being
allowed to transform:
'(x y z)
into
(list 'x 'y 'z)
thereby creating a distinct list each time the expression is evaluated.
Steve Vegdahl
Computer Research Lab
Tektronix Labs
Beaverton, Oregon
∂23-Jul-87 0905 @MC.LCS.MIT.EDU:mike%acorn@LIVE-OAK.LCS.MIT.EDU Recognizing QUOTE deemed harmful to EVAL's laziness
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Jul 87 09:05:10 PDT
Received: from LIVE-OAK.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 23 JUL 87 11:50:26 EDT
Received: from ACORN.Gold-Hill.DialNet.Symbolics.COM by MIT-LIVE-OAK.DialNet.Symbolics.COM via DIAL with SMTP id 52718; 23 Jul 87 11:43:28-EDT
Received: from BOSTON.Gold-Hill.DialNet.Symbolics.COM by ACORN.Gold-Hill.DialNet.Symbolics.COM via CHAOS with CHAOS-MAIL id 76014; Thu 23-Jul-87 10:44:26-EDT
Date: Thu, 23 Jul 87 10:49 est
From: mike%acorn@oak.lcs.mit.edu
To: reddy@b.cs.uiuc.edu (Uday S. Reddy)
Subject: Recognizing QUOTE deemed harmful to EVAL's laziness
Reply-to: mike%acorn@oak.lcs.mit.edu
Cc: scheme@mc.lcs.mit.edu,
Date: Wed, 22 Jul 87 13:51:44 CDT
From: reddy@b.cs.uiuc.edu (Uday S. Reddy)
I too am quite perplexed by Drew's essay............
Amen.
.................... Since FOO can never be the normal form value
of any expression (if FOO is bound, then its binding is the normal
form and, if it is unbound, then it is an error) they print FOO and
expect the user to understand it as (QUOTE FOO).
I mostly agree with Uday's point. I'd like only to comment on the use of
the term "normal form" in programming language analysis.
In Scheme or Lisp, you need a more powerful notion of Normal Form
than in a language without meta-language operations. Vanilla
expression rewriting cannot handle languages where the space of
values which cannot be rewritten by any rules (call them denotations,
values, etc) overlaps with those that can be. (call them expressions,
programs, etc.) Context is needed to distinguish when rewriting
should continue and when it should halt. Lisp-like languages with
quote have this property, in that an expression can evaluate or be
reduced to a value which is indistinguishable from an expression,
except that in context, it is not intended for re-evaluation, but as
an "answer".
(QUOTE FOO) denotes the value FOO, a symbol, not the expression FOO a
variable. No further evaluation is done on this value, no matter what
the context is. Hence, (QUOTE FOO) never has anything to do with any
value that the expression FOO (a variable) may have. In Scheme or
Lisp interpreters, this distinction between a symbol or S-expression
as a value, and as an expression is maintained by using applicative
(inner most) evaluation order. This avoids the problem of reexamining
expressions and thereby confusing a symbolic value with an expression
in the language.
Of course all this goes out the window if you allow a program to
call the interpreter,... i.e., EVAL.
...mike beckerle
∂23-Jul-87 1017 @MC.LCS.MIT.EDU:reddy@b.cs.uiuc.edu Recognizing QUOTE deemed harmful to EVAL's laziness
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Jul 87 10:17:06 PDT
Received: from b.cs.uiuc.edu (TCP 30001242402) by MC.LCS.MIT.EDU 23 Jul 87 12:40:50 EDT
Received: by b.cs.uiuc.edu (UIUC-5.52/9.7)
id AA19593; Thu, 23 Jul 87 11:38:42 CDT
Date: Thu, 23 Jul 87 11:38:42 CDT
From: reddy@b.cs.uiuc.edu (Uday S. Reddy)
Message-Id: <8707231638.AA19593@b.cs.uiuc.edu>
To: mike%acorn@oak.lcs.mit.edu
Cc: scheme@mc.lcs.mit.edu
In-Reply-To: mike%acorn@oak.lcs.mit.edu's message of Thu, 23 Jul 87 10:49 est <8707231551.AA18446@b.cs.uiuc.edu>
Subject: Recognizing QUOTE deemed harmful to EVAL's laziness
In Scheme or Lisp, you need a more powerful notion of Normal Form
than in a language without meta-language operations. .....
........ . This avoids the problem of reexamining
expressions and thereby confusing a symbolic value with an expression
in the language.
Of course all this goes out the window if you allow a program to
call the interpreter,... i.e., EVAL.
...mike beckerle
Precisely. Expressions ARE "symbolic values" (though not all symbolic
values are well-formed expressions). I don't see this as a "confusion".
It is quite legitimate use of a language.
I can't think of any consistent interpretation of "normal form" by
which you can say that (QUOTE FOO) normalizes to FOO. FOO is a
symbolic value, and (QUOTE FOO) is the way you express it in the
language. When Lisp prints answers, it prints the symbolic values
rather than the way they should be expressed in the language. Hence,
the outermost QUOTE gets eaten.
Uday Reddy
reddy@a.cs.uiuc.edu
∂23-Jul-87 1207 @MC.LCS.MIT.EDU:kaplan%kaplan.cs.uiuc.edu@a.cs.uiuc.edu futures in cscheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Jul 87 12:07:34 PDT
Received: from a.cs.uiuc.edu (TCP 1200600045) by MC.LCS.MIT.EDU 23 Jul 87 15:02:02 EDT
Received: from kaplan.cs.uiuc.edu by a.cs.uiuc.edu with SMTP (UIUC-5.52/9.7)
id AA03824; Thu, 23 Jul 87 14:02:15 CDT
Received: by kaplan.cs.uiuc.edu (7.1/9.7)
id AA11840; Thu, 23 Jul 87 14:01:08 mdt
Date: Thu, 23 Jul 87 14:01:08 mdt
From: kaplan%kaplan.cs.uiuc.edu@a.cs.uiuc.edu
Message-Id: <8707232001.AA11840@kaplan.cs.uiuc.edu>
To: scheme@mc.lcs.mit.edu
Subject: futures in cscheme
I have decided to play with the experimental futures system that comes
along with mit scheme. Unfortunately there is no documentation and the
various primitives do not seem to behave the way the are described in
Halstead's Multilisp paper (they are also named differently which I
guess means they are meant to be different!!). There seem to be
two primitives that do stuff to make processes, MAKE-INITIAL-PROCESS and
MAKE-CHEAP-FUTURE. I can pass make-initial-process a thunk and make that
run, which works as the comments in future.c seem to imply (I have only
tried this with simple thunks like (lambda () (display 'fish)))
Make-cheap-future requires 3 arguments, "orig" "user-code" and "name".
I guess that the second is a thunk for the code of the future but cannot
figure out the other 2. I have tried silly values like 0 and 'a and that
seems to allow make-cheap-future to return a thing which returns TRUE
in response to the (future?) operator. But now i dont know how to use
this future at all.
Help!! can anyone help me??? Has anyone got some documentation on
futures or some sample code I could look at?
Thanks,
Simon Kaplan
(kaplan@a.cs.uiuc.edu)
ps: If it makes a difference I am running an hp9000/s320.
∂23-Jul-87 1420 @MC.LCS.MIT.EDU:pierson@multimax.ARPA futures in cscheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Jul 87 14:20:06 PDT
Received: from multimax.ARPA (TCP 30001237416) by MC.LCS.MIT.EDU 23 Jul 87 16:46:09 EDT
Received: by multimax.ARPA (4.12/25-eef)
id AA06525; Thu, 23 Jul 87 16:38:04 edt
Date: Thu, 23 Jul 87 16:38:04 edt
From: Dan Pierson <pierson@multimax.ARPA>
Message-Id: <8707232038.AA06525@multimax.ARPA>
To: kaplan%kaplan.cs.uiuc.edu@a.cs.uiuc.edu
Cc: scheme@mc.lcs.mit.edu
In-Reply-To: kaplan%kaplan.cs.uiuc.edu@a.cs.uiuc.edu's message of Thu, 23 Jul 87 14:01:08 mdt <8707232001.AA11840@kaplan.cs.uiuc.edu>
Subject: futures in cscheme
You need the runtime file "future.scm". A version from an earlier
CScheme follows -- I've partially munged it to work with the 5.1 beta
release but there appear to be some remaining problems. Please send
me back a copy if you get it to work better; I don't have time to work
on it right now. I suspect that make-future needs to be changed to
use make-cheap-future but I'm not sure...
======================================================================
; This is -*- SCHEME -*- code
(declare (usual-integrations)
(compilable-primitive-functions
vector-set!
get-external-number
within-control-point))
(define put-work (make-primitive-procedure 'PUT-WORK))
(define global-interrupt (make-primitive-procedure 'GLOBAL-INTERRUPT))
(define touch (make-primitive-procedure 'TOUCH))
(define set-car-if-eq?! (make-primitive-procedure 'SET-CAR-IF-EQ?!))
(define set-cdr-if-eq?! (make-primitive-procedure 'SET-CDR-IF-EQ?!))
(define vector-set-if-eq?! (make-primitive-procedure 'VECTOR-SET-IF-EQ?!))
(define set-cxr-if-eq?! (make-primitive-procedure 'SET-CXR-IF-EQ?!))
(define future-ref (make-primitive-procedure 'FUTURE-REF))
(define future-set! (make-primitive-procedure 'FUTURE-SET!))
(define future-size (make-primitive-procedure 'FUTURE-SIZE))
(define lock-future! (make-primitive-procedure 'LOCK-FUTURE!))
(define unlock-future! (make-primitive-procedure 'UNLOCK-FUTURE!))
(define non-touching-eq? (make-primitive-procedure 'NON-TOUCHING-EQ?))
(define n-interpreters (make-primitive-procedure 'N-INTERPRETERS))
(define my-processor-number (make-primitive-procedure 'MY-PROCESSOR-NUMBER))
(define my-interpreter-number (make-primitive-procedure 'MY-INTERPRETER-NUMBER))
!
;; This is the stuff Anthony put here.
;; (define statistics-package
;; (make-environment
;; (define get-statistics
;; (make-primitive-procedure 'get-statistics #!true))
;; (define stat-names '((CONTENTION-COUNT . 0)
;; (GC-MASTER-IDLE-TIME . 1)
;; (GC-SLAVE-IDLE-TIME . 2)
;; (GC-LOOP-TIME . 3)
;; (GC-DAEMON-TIME . 4)))
;; (define This-load '())
;;
;; (define (load-statistics)
;; (set! this-load (get-statistics)))
;;
;; (define (get-statistic name)
;; (if (unassigned? this-load)
;; (load-statistics))
;; (vector-ref this-load (cdr (assq name stat-names))))
;;
;; (define (clear-statistics)
;; (set! this-load))))
;;
;; (define load-statistics (access load-statistics statistics-package))
;; (define get-statistic (access get-statistic statistics-package))
;; (define clear-statistics (access clear-statistics statistics-package))
!
;; Slots in a future
;; MICROCODE KNOWS ABOUT THESE
;; FUTURE-DETERMINED-SLOT is #!TRUE if the value is known and immutable
;; #!FALSE if not yet know, else known but mutable (i.e. KEEP-SLOT)
(define FUTURE-DETERMINED-SLOT 0)
;; FUTURE-LOCK-SLOT is #!TRUE if the future is locked by a process
(define FUTURE-LOCK-SLOT 1)
;; The next two are mutually exclusive. The VALUE is used if
;; DETERMINED is not #!FALSE. The QUEUE contains a WEAK queue of
;; processes waiting for a value to appear if DETERMINED is #!FALSE.
(define FUTURE-VALUE-SLOT 2)
(define FUTURE-QUEUE-SLOT 2)
; REFERENCED ONLY BY THE RUNTIME SYSTEM
;; Code to run to re-activate this process
(define FUTURE-PROCESS-SLOT 3)
;; The FUTURE-STATUS-SLOT contains one of:
;; RUNNING: Actually in possession of a processor
;; WAITING: Stopped waiting for the value of a future
;; PAUSED: Stopped by PAUSE-EVERYTHING
;; DELAYED: Created by delay scheduler and not yet run
;; RUNNABLE: Available for execution
;; DETERMINED: Value has been set and process is finished
;; CREATED: Future newly created
(define FUTURE-STATUS-SLOT 4)
;; For debugging purposes, the original thunk to be executed.
(define FUTURE-ORIG-CODE-SLOT 5)
(define FUTURE-PROCESS-PRIVATE-SLOT 6)
;; If this process has status WAITING this is a (strong) list of the
;; futures on which it is waiting.
(define FUTURE-WAITING-ON-SLOT 7)
;; For GC metering (not used by simulator)
(define FUTURE-METER-SLOT 8)
;; For users:
(define FUTURE-USER-SLOT 9)
!
; Some useful macros for dealing with atomicity. Notice that
;;DEFINE-MACRO happens when the text is turned into code (i.e.
;;at syntax time), while ADD-SYNTAX! happens only when the program
;;is actually executed. So both are used when this file uses the
;;macro, but only ADD-SYNTAX! is used for user macros which
;;are not referenced here.
(define-macro (add-syntax! name expander)
`(SYNTAX-TABLE-DEFINE SYSTEM-GLOBAL-SYNTAX-TABLE ,name ,expander))
; ATOMIC takes a list of expression and guarantees that they
;;are done without interrupts.
(define-macro (atomic . expressions)
`(WITHOUT-INTERRUPTS
(LAMBDA () . ,expressions)))
(add-syntax! 'ATOMIC
(macro expressions
`(WITHOUT-INTERRUPTS
(LAMBDA () . ,expressions))))
;; PROG1 is like the MACLISP macro of the same name
(define-macro (PROG1 . exprs)
`(LET ((FIRST ,(CAR exprs)))
,@(CDR exprs)
FIRST))
; DEFINE-ATOMIC is like the procedural version of DEFINE, except
;;that the body is wrapped in WITHOUT-INTERRUPTS.
(define-macro (define-atomic arg-template . body)
`(DEFINE ,arg-template (ATOMIC . ,body)))
(add-syntax! 'DEFINE-ATOMIC
(macro (arg-template . body)
`(DEFINE ,arg-template (ATOMIC . ,body))))
!
; LOCKING-FUTURE is the same as ATOMIC except that it also wraps
;;a LOCK-FUTURE! and UNLOCK-FUTURE! around the expression(s).
;;LOCKED? is a flag which can be used in BODY -- it will be #!true
;;if the future is still valid (you hang until you can lock it),
;;or #!false if it has been spliced out.
(define-macro (LOCKING-FUTURE FUTURE LOCKED? . BODY)
`(WITH-FUTURE-LOCKED ,future
(LAMBDA (,locked?) . ,body)))
(add-syntax! 'LOCKING-FUTURE
(macro (FUTURE LOCKED? . BODY)
`(WITH-FUTURE-LOCKED ,future
(LAMBDA (,locked?) . ,body))))
(define-macro (WITH-STATE STATE . BODY)
`(NON-REENTRANT-TASK-CATCH (LAMBDA (,state) . ,body)))
(DEFINE-ATOMIC (with-future-locked future thunk)
(if (lock-future! future)
(let ((result (thunk #!true)))
(unlock-future! future)
result)
(thunk #!false)))
!
(define scheduler
(make-environment
(declare (usual-integrations)
(compilable-primitive-functions
(weak-car system-pair-car)
(weak-cdr system-pair-cdr)
(weak-set-car! system-pair-set-car!)
(weak-set-cdr! system-pair-set-cdr!)))
(define control-point-type
(microcode-type 'CONTROL-POINT))
(define sti
(make-primitive-procedure 'setup-timer-interrupt #!true))
(define drain-work-queue!
(make-primitive-procedure 'drain-work-queue!))
(define weak-cons-type
(microcode-type 'WEAK-CONS))
(define non-reentrant-task-catch)
(define task-catch)
(define non-reentrant-call/cc
(make-primitive-procedure 'non-reentrant-call-with-current-continuation))
(define call/cc
(make-primitive-procedure 'call-with-current-continuation))
(define set-current-dynamic-state!
(make-primitive-procedure 'set-current-dynamic-state!))
(define catch-maker
(access catch-maker continuation-package))
(define current-Future-Vector) ; Process currently running
(define the-paused-tasks) ; Tasks being suspended temporarily
(define Start-Process) ; Default scheduler for FUTURE creation
(define Idle-Future) ; Future to wait until idle on
(define discard-the-paused-tasks? #!false) ; Throw away tasks?
(define preempting? #!false) ; No timer currently set
(define Delta '()) ; Scheduling frequency, centi-seconds
!
(set! non-reentrant-task-catch
(catch-maker non-reentrant-call/cc set-current-dynamic-state! #!true))
(set! task-catch
(catch-maker call/cc set-current-dynamic-state! #!false))
(define (legitimate-process? object)
(or (procedure? object) (primitive-type? control-point-type object)))
(DEFINE-ATOMIC (start-preempting interval)
(if (not preempting?)
(begin
(set! timer-interrupt
(lambda ()
(let ((My-Task (Current-Future)))
(WITH-STATE me
(LOCKING-FUTURE My-Task I-am-running?
(if I-am-running?
(begin
(future-set! My-Task FUTURE-PROCESS-SLOT me)
(more-work My-Task))
(begin
(stop-preempting)
(bkpt "TIMER: Existential crisis!"))))
(next)))))
(set! preempting? #!true)
(set! delta interval)
(sti 0 interval))
(display "Already preempting when START-PREEMPTING called")))
(DEFINE-ATOMIC (stop-preempting)
(sti '() '())
(set! preempting? #!false))
!
(define make-future
(let ((future-type (microcode-type 'FUTURE)))
(named-lambda (make-future orig-code user-procedure name)
(primitive-set-type
future-type
(vector #!false ; DETERMINED: No value yet
#!false ; LOCK: Not locked
(make-empty-queue)
; VALUE/QUEUE:No waiters
orig-code ; PROCESS: How to resume
'CREATED ; STATUS: Ready to go
user-procedure ; ORIG_CODE: For debugging
(if (unbound? open-console-channel)
name
(vector
(open-console-channel name)))
; PROCESS-PRIVATE: Butterfly??
'() ; WAITING-ON: Not waiting
0 ; METER: Ignored by simulator
'()))))) ; USER-SLOT
(define (more-work work)
(future-set! work FUTURE-STATUS-SLOT 'RUNNABLE)
(put-work work)
(if (and delta (not preempting?))
(start-preempting delta)))
(define spawn-process
(let ((make-initial-process
(make-primitive-procedure 'make-initial-process)))
(named-lambda (spawn-process thunk doc #!optional start)
(let ((object)
(dynamic-state (current-dynamic-state)))
(set! object
(make-future
(make-initial-process
(lambda ()
(set-current-dynamic-state! dynamic-state)
(thunk)))
thunk doc))
((if (unassigned? start) start-process start) object)
object))))
(DEFINE-ATOMIC (end-of-computation-handler expression environment value)
(let ((me (current-future)))
(determine! me value #!false))
(next))
!
(define (determine! future value #!optional keep-slot?)
;; AWAKEN! is called with a queue (of processes waiting
;; for a future) and promotes them all to runnable status.
(define (awaken! queue)
(let loop ()
(if (empty-queue? queue)
'DONE
(let ((next-item (dequeue! queue)))
(LOCKING-FUTURE next-item item-runnable?
(if (and
item-runnable?
(eq? (future-ref next-item FUTURE-STATUS-SLOT) 'WAITING)
(non-touching-memq future (future-ref next-item FUTURE-WAITING-ON-SLOT)))
(begin
(future-set! next-item FUTURE-WAITING-ON-SLOT future)
(more-work next-item))))
(loop)))))
(LOCKING-FUTURE future was-still-a-future?
(if was-still-a-future?
(let ((known? (future-ref future FUTURE-DETERMINED-SLOT))
(waiters (future-ref future FUTURE-QUEUE-SLOT)))
(if (eq? known? #!true)
(error "Future cannot be determined twice." future))
(future-set! future FUTURE-VALUE-SLOT value)
(future-set! future FUTURE-STATUS-SLOT 'DETERMINED)
(if (unassigned? keep-slot?)
(if (eq? known? #!false)
(future-set! future FUTURE-DETERMINED-SLOT #!true))
(future-set! future FUTURE-DETERMINED-SLOT
(if keep-slot? 'KEEP-SLOT #!true)))
(if (not known?) (awaken! waiters)))
(error "Future cannot be determined twice." future)))
value)
!
(define (Futures-On?) (not (unassigned? Current-Future-Vector)))
(define (Futures-Off)
(pause-everything)
(set! Current-Future-Vector)
'FUTURES-TURNED-OFF)
(define (Current-Future)
(if (Futures-On?)
(vector-ref Current-Future-Vector (My-Interpreter-Number))
'()))
(define (Set-Current-Future! Future)
(vector-set! Current-Future-Vector (My-Interpreter-Number)
Future))
(define (initialize-scheduler!
#!optional interval default-scheduler non-aborting?)
(let ((set-fixed-objects-vector!
(make-primitive-procedure 'set-fixed-objects-vector!)))
(pause-everything) ; Stop all processors & drain queue
(let ((termination-handlers
(vector-ref (get-fixed-objects-vector)
(fixed-objects-vector-slot
'MICROCODE-TERMINATIONS-PROCEDURES))))
(if (= (vector-length termination-handlers) 0)
(begin
(set! termination-handlers
(vector-cons number-of-microcode-terminations '()))
(vector-set! (get-fixed-objects-vector)
(fixed-objects-vector-slot
'MICROCODE-TERMINATIONS-PROCEDURES)
termination-handlers)
(set-fixed-objects-vector! (get-fixed-objects-vector))))
(vector-set! termination-handlers
(microcode-termination 'END-OF-CONTINUATION)
end-of-computation-handler))
(set! Start-Process
(if (unassigned? default-scheduler)
dfuture-scheduler
default-scheduler))
(set! Current-Future-Vector
(vector-cons (N-Interpreters) 'NO-FUTURE-YET))
(set! Idle-Future (make-future 'NO-PROCESS 'NO-PROCESS "Idle-Loop"))
;; INITIALIZE-SCHEDULER (futures-on) continues on the next page
!
;; INITIALIZE-SCHEDULER (futures-on), continued
(if (not (unassigned? interval)) (set! delta interval))
(let ((fobj (get-fixed-objects-vector)))
(vector-set! fobj (fixed-objects-vector-slot 'SCHEDULER)
await-future)
(set-fixed-objects-vector! fobj))
(Set-Current-Future!
(make-future 'INITIAL-PROCESS 'INITIAL-PROCESS "The Initial Process"))
(future-set! (current-future) FUTURE-STATUS-SLOT 'RUNNING)
(global-interrupt
1
(lambda (IntCode IntEnb)
(set-interrupt-enables! IntEnb)
(next))
(lambda () #!true))
(if (or (unbound? abort-to-top-level-driver)
(and (not (unassigned? non-aborting?))
non-aborting?))
(or Delta 'NOT-PREEMPTIVE-SCHEDULING)
(abort-to-top-level-driver
(cond ((unbound? format) "↑G to restart the futures")
((not Delta) "↑G: no preemptive scheduling")
((negative? Delta)
(format () "↑G: scheduling ~o.~o~o (real) secs."
(quotient (abs Delta) 100)
(remainder (quotient (abs Delta) 10) 10)
(remainder (remainder (abs Delta) 10) 10)))
(else
(format () "↑G: scheduling ~o.~o~o (runtime) secs."
(quotient Delta 100)
(remainder (quotient Delta 10) 10)
(remainder (remainder Delta 10) 10))))))))
!
; Scheduling support
(define (next)
(let ((get-work (make-primitive-procedure 'get-work)))
(Set-Current-Future! 'WAITING-FOR-WORK)
(run (get-work
(named-lambda (loop)
(stop-preempting)
(determine! Idle-Future 'DONE)
(set! Idle-Future
(make-future 'NO-PROCESS 'NO-PROCESS "Idle Loop"))
(run (get-work
(lambda ()
(error "No Work Available")
(loop)))))))))
;; RUN starts a process running
(define (run future)
((LOCKING-FUTURE future Still-A-Future?
(if Still-A-Future?
(let ((new-process
(future-set! future
FUTURE-PROCESS-SLOT (My-Interpreter-Number)))
(old-status (future-set! future FUTURE-STATUS-SLOT 'RUNNING)))
(if (and (legitimate-process? new-process)
(eq? old-status 'RUNNABLE))
(begin
(Set-Current-Future! future)
(if (and delta preempting?)
(sti 0 delta)) ; Full time interval
(lambda () (new-process 'YOUR-TURN)))
(begin
(future-set! future FUTURE-STATUS-SLOT old-status)
(future-set! future FUTURE-PROCESS-SLOT new-process)
next)))
next))))
!
;; AWAIT-FUTURE suspends the current process and adds it to the
;; queue waiting for the specified future to get a value. The
;; thunk, if specified, is executed immediately before going off for
;; more work to do (i.e. after all of the enqueuing work, etc. is done).
(DEFINE-ATOMIC (await-future future #!optional thunk)
(WITH-STATE me
(let
((perform-normal-return?
(LOCKING-FUTURE future waiting-for-a-future?
(if (or (not waiting-for-a-future?) ; Already determined
(future-ref future FUTURE-DETERMINED-SLOT))
#!TRUE ; Return normally
(let ((My-Task (Current-Future))
(status (future-ref future FUTURE-STATUS-SLOT)))
(if (or (eq? status 'DELAYED) (eq? status 'PAUSED))
(more-work future))
(LOCKING-FUTURE My-Task I-am-running?
(if I-am-running?
(begin
(future-set! My-Task FUTURE-PROCESS-SLOT me)
(future-set! My-Task FUTURE-STATUS-SLOT 'WAITING)
(future-set! My-Task FUTURE-WAITING-ON-SLOT
(list future))
(enqueue! (future-ref future FUTURE-QUEUE-SLOT) My-Task))
(display "AWAIT-FUTURE: Existential crisis!")))
#!FALSE))))) ; Don't return normally
(if (not (unassigned? thunk)) (thunk)) ; Do the optional work
(if perform-normal-return? ; Done or find more work
(me 'DONE)
(next)))))
!
;; AWAIT-FUTURE-AFTER-ACTION suspends the current process after
;; executing a thunk and adds it to the queue waiting for the
;; specified future to get a value. Its purpose is to ensure
;; that the process is actually on the wait queue of the future
;; when the action takes place. This prevents a race condition
;; which might cause problems if the action is intended to determine
;; the future (e.g., externally) and wake up the process. In other words,
;; if the process has not been added to the wait queue when another
;; process or an external interrupt determines the future, the event
;; would not wake up the process as intended.
;;
;; Since this is rather specialized code (it was added to support
;; the new console i/o system), many safeguards of the normal
;; AWAIT-FUTURE are removed for speed. Normally the future will
;; have been explicitly constructed by the user and is not being
;; determined by any other process.
(define (await-future-after-action future action)
(await-future future action))
!
(define await-internal
(let ((fall-through-tag (cons 'FALL-THROUGH '())))
(named-lambda (await-internal My-Task futures)
(let ((Value-Known? #!false))
(define (announce-value value)
(if (not (set! Value-Known? #!true))
(determine! My-Task value)))
(define (spawn-processes disjuncts)
(if (null? disjuncts)
'DONE
(let ((this-future (car disjuncts)))
(if (LOCKING-FUTURE this-future really-a-future?
(if (and really-a-future?
(null?
(future-ref
this-future FUTURE-DETERMINED-SLOT)))
(begin
(enqueue!
(future-ref this-future FUTURE-QUEUE-SLOT)
My-Task)
#!true)
(begin
(announce-value this-future)
#!false)))
(spawn-processes (cdr disjuncts))))))
(if (eq? fall-through-tag
(task-catch (lambda (me) ; Deliberately re-entrant
(future-set! My-Task FUTURE-PROCESS-SLOT me)
(future-set! My-Task FUTURE-STATUS-SLOT 'WAITING)
(future-set! My-Task FUTURE-WAITING-ON-SLOT futures)
(spawn-processes futures)
fall-through-tag)))
My-Task
(begin
(announce-value (future-ref My-Task FUTURE-WAITING-ON-SLOT))
(next)))))))
(define (disjoin . futures)
(await-internal (make-future 'DISJOIN 'DISJOIN "Disjoin") futures))
(define (await-first-of futures)
(await-internal (make-future 'DISJOIN 'DISJOIN "Disjoin") futures))
!
; Special scheduler operations
;; RESCHEDULE allows me to give up my processor slice and
;; wait until the scheduler gets back to me.
(define-atomic (reschedule)
(let ((my-task (current-future)))
(WITH-STATE me
(if (LOCKING-FUTURE my-task am-I-running?
(if am-I-running?
(begin
(future-set! my-task FUTURE-PROCESS-SLOT me)
(more-work my-task)))
am-I-running?)
(next)
'NOT-CURRENTLY-RUNNING-A-FUTURE))))
;; WAIT-UNTIL-IDLE causes a process to just continue
;; going to sleep until there are no other active processes.
(define (wait-until-idle) (touch idle-future))
;; DFUTURE-SCHEDULER is a future creation scheduler which
;; defers the child process and continues on with the parent.
;; Note that all creation schedulers are called as part of
;; the parent process, so this is the easy case.
(DEFINE-ATOMIC (dfuture-scheduler future)
(more-work future)
'CHILD-QUEUED-FOR-EXECUTION)
;; FUTURE-SCHEDULER is a future creation scheduler which
;; defers the parent process and continues on with the child.
;; This is a little harder than DFUTURE, since it is called
;; running as the parent.
(DEFINE-ATOMIC (future-scheduler future)
(WITH-STATE parent-process
(let ((My-Future (Current-Future)))
(LOCKING-FUTURE My-Future Still-Runnable?
(if Still-Runnable?
(begin
(future-set! My-Future FUTURE-PROCESS-SLOT parent-process)
(more-work My-Future))))))
(more-work future)
(run future))
;; DELAY-SCHEDULER is a future creation scheduler which defers
;; execution of the newly created future until it is first
;; touched.
(DEFINE-ATOMIC (delay-scheduler future)
(future-set! future FUTURE-STATUS-SLOT 'DELAYED)
'OK-I-DELAYED-IT)
!
;; Queue Abstraction
;;
;; -------------------------------
;; | Tail Pointer | Head Pointer |
;; -------------------------------
;; | |
;; | |
;; V V
;; ----- ----- -----
;; | |=|=>| |=|=>| |/| add new items by clobbering '()
;; ----- ----- -----
;; remove from start of list
;; (The list itself is made from WEAK cons cells)
;;
;; The queue is empty when Tail=Head=#!NULL
;; (thus it has one item when Tail=Head but they are not #!NULL)
;;
;; These operations assume that the caller has arranged for any
;; desired atomicity.
(define (weak-cons a b)
(system-pair-cons weak-cons-type a b))
(define weak-car system-pair-car)
(define weak-cdr system-pair-cdr)
(define weak-set-car! system-pair-set-car!)
(define weak-set-cdr! system-pair-set-cdr!)
(define (make-empty-queue) (cons '() ()))
(define queue-head-ptr car)
(define queue-tail-ptr cdr)
(define set-queue-head-ptr! set-car!)
(define set-queue-tail-ptr! set-cdr!)
(define (empty-queue? queue) (null? (queue-head-ptr queue)))
!
(define (enqueue! queue object)
(if (null? (queue-head-ptr queue))
(begin
(set-queue-head-ptr! queue (weak-cons object '()))
(set-queue-tail-ptr! queue (queue-head-ptr queue)))
(begin
(weak-set-cdr! (queue-head-ptr queue) (weak-cons object '()))
(set-queue-head-ptr! queue (weak-cdr (queue-head-ptr queue))))))
(define (dequeue! queue)
(let ((current-tail (queue-tail-ptr queue)))
(if (null? current-tail)
(error "Queue empty" queue)
(let ((result (weak-car current-tail)))
(if (null? (weak-cdr current-tail))
(begin (set-queue-head-ptr! queue '())
(set-queue-tail-ptr! queue '()))
(set-queue-tail-ptr! queue (weak-cdr current-tail)))
result))))
!
;; SAVING-STATE wraps up the current state of the system into the
;; current future and returns it to the work queue. It then executes
;; the thunk. If the current future is invoked the call to
;; SAVING-STATE is exitted; when the thunk returns, the processor will
;; wait for new work to perform.
(define (saving-state thunk)
(WITH-STATE my-state
(let ((my-future (current-future)))
(LOCKING-FUTURE my-future am-I-running?
(if am-I-running?
(begin
(future-set! my-future FUTURE-PROCESS-SLOT my-state)
(future-set! my-future FUTURE-STATUS-SLOT 'RUNNABLE)
(put-work my-future)))))
(set-current-future! 'STATE-SAVED)
(set! my-state)
(within-control-point the-error-continuation
(lambda ()
(thunk)
(next))))
'COMPLETED)
!
;; PAUSE-EVERYTHING is used to make every processor but the caller
;; save its state and go quiescent. The value returned by
;; Pause-Everything is a procedure which will put the work queue
;; back to its initial state (modulo order of futures on the queue).
(DEFINE-ATOMIC (pause-everything)
;; RELEASE-STATE! takes a list of futures and puts them
;; on the work queue.
(define (release-state! list)
(if (null? list)
'RESTARTED
(let ((work-unit (car list)))
(LOCKING-FUTURE work-unit work-to-do?
(if (and work-to-do?
(legitimate-process?
(future-ref work-unit FUTURE-PROCESS-SLOT))
(eq? (future-ref work-unit FUTURE-STATUS-SLOT)
'PAUSED))
(more-work work-unit)))
(release-state! (cdr list)))))
;; WEAK-LIST->LIST! takes a weak list of futures, as
;; returned by DRAIN-WORK-QUEUE! and converts it to a list of
;; the objects referenced. The GC code needs the weak form,
;; hence the extra work here. In the process, each future is
;; made to be PAUSED so it will automatically resume if touched
(define (weak-list->list! weak-list)
(let loop ((current weak-list)
(result '()))
(if (null? current)
result
(let ((work-unit (weak-car current)))
(LOCKING-FUTURE work-unit work-to-do?
(if work-to-do?
(begin
(future-set! work-unit FUTURE-STATUS-SLOT 'PAUSED)
(loop (weak-cdr current)
(cons work-unit result)))
(loop (weak-cdr current) result)))))))
!
(define ((returned-object the-queue) #!optional message)
(if (unassigned? message) (set! message 'Restart-tasks))
(cond ((eq? message 'Any-Tasks?)
(and (not (eq? the-queue #!true))
(not (null? the-queue))))
((eq? message 'Restart-tasks)
(if (not (eq? the-queue #!true))
(release-state! the-queue)
(error "Attempt to re-use a pause object!"))
(set! the-queue #!true))
((eq? message 'The-Tasks)
(if (eq? the-queue #!true)
'()
the-queue))
(else (error "Pause object: strange message" message))))
(if (not (Futures-On?))
(returned-object '())
(let ((save-synch (make-synchronizer))
(drain-synch (make-synchronizer))
(proceed-synch (make-synchronizer)))
(stop-preempting)
(global-interrupt
1
(lambda (int-code int-mask)
(await-synchrony save-synch)
(saving-state
(lambda ()
(set-interrupt-enables! int-mask)
(await-synchrony drain-synch)
(await-synchrony proceed-synch))))
(lambda () #!TRUE))
(await-synchrony save-synch)
(await-synchrony drain-synch)
(let ((me (current-future))
(the-queue (weak-list->list! (drain-work-queue!))))
(set! Current-Future-Vector (vector-cons (N-Interpreters) 'PAUSED))
(Set-Current-Future! me)
(await-synchrony proceed-synch)
(returned-object the-queue)))))
!
;; WITH-TASKS-SUSPENDED executes the thunk with all other processes
;; stopped. It returns the value of the thunk.
(define (with-tasks-suspended thunk)
(if (not (Futures-On?))
(thunk)
(fluid-let ((the-paused-tasks (pause-everything)))
(dynamic-wind
(lambda ()
(if (the-paused-tasks 'any-tasks?)
(begin
(newline)
(display "[Suspending tasks]"))))
thunk
(lambda ()
(cond ((not (the-paused-tasks 'any-tasks?)) '())
(discard-the-paused-tasks?
(newline) (display "[Discarding tasks]") (newline))
(else
(newline) (display "[Resuming tasks]") (newline)
(the-paused-tasks 'Restart-tasks))))))))
;; Dealing with recently suspended tasks
(define (discard-recently-suspended-tasks!)
(set! discard-the-paused-tasks? #!true))
(define (prevent-discarding-processes!)
(set! discard-the-paused-tasks? #!false))
!
;; Execution within a selected task
(define (within-process future thunk)
(define (loop noisy?)
((LOCKING-FUTURE future true-future?
(if true-future?
(let ((status (future-ref future FUTURE-STATUS-SLOT))
(process (future-ref future FUTURE-PROCESS-SLOT)))
(cond ((non-touching-eq? future (current-future))
thunk)
((eq? status 'RUNNING)
(lambda ()
(if noisy?
(bkpt "WITHIN-PROCESS: process is running"))
(loop #!false)))
(else
(future-set! future FUTURE-PROCESS-SLOT
(lambda (arg) (thunk) (process 'go)))
(more-work future)
(lambda () (run future)))))
(begin
(error "WITHIN-PROCESS: Not a process" future)
(lambda () (next)))))))
(loop #!true))
)) ; end of Make-Environment for Scheduler
!
; Export definitions to the world outside the scheduler
(define initialize-scheduler! (access initialize-scheduler! scheduler))
(define determine! (access determine! scheduler))
(define future-scheduler (access future-scheduler scheduler))
(define dfuture-scheduler (access dfuture-scheduler scheduler))
(define delay-scheduler (access delay-scheduler scheduler))
(define next (access reschedule scheduler))
(define wait-until-idle (access wait-until-idle scheduler))
(define pause-everything (access pause-everything scheduler))
(define with-tasks-suspended (access with-tasks-suspended scheduler))
(define discard-recently-suspended-tasks!
(access discard-recently-suspended-tasks! scheduler))
(define prevent-discarding-processes!
(access prevent-discarding-processes! scheduler))
(define Current-Future (access Current-Future scheduler))
(define Futures-On? (access Futures-On? scheduler))
(define Futures-Off (access Futures-Off scheduler))
(define Saving-State (access Saving-State scheduler))
(define within-process (access within-process scheduler))
(define Disjoin (access disjoin scheduler))
(define Await-First-Of (access await-first-of scheduler))
(define (futures-on #!optional slice)
(if (unassigned? slice) (set! slice '()))
(initialize-scheduler! slice dfuture-scheduler))
(define (non-touching-memq element list)
(cond ((null? list) #!false)
((non-touching-eq? element (car list)) list)
(else (non-touching-memq element (cdr list)))))
(define (non-touching-assq element list)
(cond ((null? list) #!false)
((non-touching-eq? element (caar list)) (car list))
(else (non-touching-assq element (cdr list)))))
!
(add-syntax! 'future
(macro (expression #!optional doc user-scheduler)
`((ACCESS SPAWN-PROCESS SCHEDULER)
(LAMBDA () ,expression) ; Work to do
,(if (unassigned? doc) ; Documentation
(with-output-to-string
(lambda () (display expression)))
doc)
,@(if (unassigned? user-scheduler) ; Start-up procedure
'()
`(,user-scheduler)))))
(futures-on)
∂23-Jul-87 2003 @MC.LCS.MIT.EDU:jeff%aiva.edinburgh.ac.uk@Cs.Ucl.AC.UK Recognizing QUOTE deemed harmful to EVAL's laziness
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Jul 87 20:03:27 PDT
Received: from Cs.Ucl.AC.UK (TCP 20012204403) by MC.LCS.MIT.EDU 23 Jul 87 22:57:17 EDT
Received: from aiva.edinburgh.ac.uk by nss.Cs.Ucl.AC.UK via Janet with NIFTP
id aa21492; 23 Jul 87 22:19 BST
From: Jeff Dalton <jeff%aiva.edinburgh.ac.uk@Cs.Ucl.AC.UK>
Date: Thu, 23 Jul 87 22:18:07 -0100
Message-Id: <13530.8707232118@aiva.ed.ac.uk>
To: scheme@mc.lcs.mit.edu
Subject: Recognizing QUOTE deemed harmful to EVAL's laziness
> From: Jonathan A Rees <JAR@edu.mit.ai.ai>
> I don't quite see what the big deal is. I agree that reduction is a
> somewhat nicer but it doesn't seem to be a very deep question. [...]
Well, that depends on whether you're a "purist" or a "pragmatist"
(relatively speaking). It's like the debate over the lack of a proper
function type in Common Lisp, or the question of whether the need to
use FUNCTION around lambda-expressions is or is not a trivial matter
of syntax... Well, maybe.
∂24-Jul-87 0337 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: Recognising QUOTE deemed harmful to EVAL's laziness
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 24 Jul 87 03:37:18 PDT
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 24 Jul 87 06:16:36 EDT
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA15302; Fri, 24 Jul 87 02:43:28 PDT
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 23 Jul 87 12:23:54 GMT
From: mcvax!inria!crcge1!adams@seismo.css.gov (Drew Adams)
Subject: Re: Recognising QUOTE deemed harmful to EVAL's laziness
Message-Id: <2718@crcge1.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Further References
------------------
I neglected to mention that the idea that QUOTE is properly treated
as a constructor (in a reduction setting) is due to Alan Robinson.
Thanks to Jan Prins for reminding me.
Here's the paper where he discusses denotation vs. reduction with
respect to quote. I don't know of a more recent one.
%T New Generation Knowledge Processing
%A J. A. ROBINSON
%R First Annual Progress Report
%I Syracuse University
%C Syracuse, New York
%D December 1984
That paper introduces the "unknown-tolerant" fully lazy functional
logic language SUPER being developed at Syracuse University. The
essential reference dealing with the functional basis of SUPER is:
%T A Fully Lazy Higher Order Purely Functional Programming Language
with Reduction Semantics
%A Kevin J. GREENE
%I Syracuse University
%C Syracuse, New York
%D August 1985
%O Ph.D. Thesis
Thanks also to Stan Shebs for reminding me of Brian Smith's work on
3-LISP, which (among other things) is another attempt to clean up the
semantics of quotation (and more). Here are two accessible
references.
%T The Implementation of Procedurally Reflective Languages
%A Jim des RIVIERES
%A Brian Cantwell SMITH
%B ACM Symposium on LISP and Functional Programming
%C Austin, Texas
%I ACM
%P 331-347
%D August 6-8, 1984
%T Reflection and Semantics in Lisp
%A Brian Cantwell SMITH
%B Eleventh Annual ACM Symposium on Principles
of Programming Languages (POPL)
%C Salt Lake City, Utah
%I ACM
%P 23-35
%D January 15-18, 1984
In case some who read this didn't see Stan's message, here is part:
"His basic point of view is that quoting is important to
distinguish levels of meta-ness, and so quoted objects
are promoted to first-class types known as handles.
There are operations UP and DOWN that add and remove
handles, since evaluation does not; (eval '2) => '2.
Also, (+ 2 '3) is an semantic error, like taking the car
of an number.
In other words, Smith also uses an essentially *reducing* EVAL,
separating out a separate denotation mechanism.
--
Drew ADAMS, Laboratoires de Marcoussis, Centre de Recherche de la Compagnie
Generale d'Electricite, Route de Nozay, 91460 MARCOUSSIS, FRANCE
Tel. 64.49.11.54, adams@crcge1.cge.fr
∂24-Jul-87 0415 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: Recognising QUOTE deemed harmful to EVAL's laziness
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 24 Jul 87 04:15:30 PDT
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 24 Jul 87 06:18:06 EDT
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA15326; Fri, 24 Jul 87 02:44:52 PDT
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 23 Jul 87 12:26:04 GMT
From: mcvax!inria!crcge1!adams@seismo.css.gov (Drew Adams)
Subject: Re: Recognising QUOTE deemed harmful to EVAL's laziness
Message-Id: <2719@crcge1.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
WARNING: Too long (again!)
Regarding My Original Posting and Replies:
-----------------------------------------
Thanks for the commentaries. I'm sorry my posting wasn't clearer
(and shorter). I wish this reply were shorter as well.
FIRST, some general remarks aimed to clear up misunderstandings due
(I think) to terminology, etc..
1) By EVAL I mean the LISP (or SCHEME) interpreter itself, as well as
explicit calls to the procedure EVAL in the program. Some people
quite naturally assumed I mean the latter only, thus wondering about
the "relevance to SCHEME (which has no EVAL)". [J. Rees]
2) DELAY/FORCE vs. QUOTE/EVAL: The former are used in eager
implementations to simulate (program, implement, etc.) lazy
evaluation. E.g., Uday Reddy mentions that
"The use of quotation for delayed evaluation is now widely
recognized to be misguided. Modern LISPs, such as SCHEME,
have constructs like "DELAY" to achieve lazy evaluation."
DELAY and FORCE achieve "call-by-name" which is sometimes called
"laziness", but they don't usually achieve "*full* laziness", (what
Robert Firth called "true laziness" in the original posting), which
was the issue under discussion. My point has nothing to do with
whether or not people would be better off avoiding QUOTE/EVAL and
using DELAY/FORCE. My point is that implicit recognition of
quotation by the interpreter (EVAL) gets in the way of *implementing*
(in the interpreter) full laziness, as repeated evaluations of the
same (quotation) expression *don't* yield the same result.
[A. Freeman, U. Reddy]
3) I think the biggest communication problem arose from my not making
sufficiently clear that I'm not concerned with differentiating
external expressions from internal data structures etc., as well as
from the different meanings "expression", "symbol" etc. might have
in different communities. I'm ignoring what goes on inside a LISP
implementation (data structure representation, binding etc.)
completely and am referring only to externally observed behavior as
determined by input and output *expressions* (= Sexprs). Thus, when
I refer to the "result" or "value" of an expression I by definition
mean the printed result. An example of the confusion [U. Reddy]:
"Since FOO can never be the normal form value of any
expression (if FOO is bound, then its binding is the
normal form and, if it is unbound, then it is an error)
they print FOO and expect the user to understand it as
(QUOTE FOO)."
I equate the expression FOO with its binding, as the normal form. If
unbound, I consider the expression FOO itself to be the normal form.
[J. Rees, A. Freeman, U. Reddy]
4) When I speak of that which is "denoted" by an expression I mean
(in LISP) the printed result of the expression, and I equate this
with whatever the programmer might have in mind that the expression
represents *for her*. Thus, in this view everything is regarded only
in its external aspect, as an expression, and all denoted values are
themselves expressions. Hence I wrote:
"(For simplicity, let's assume denoted values are always
expressions; values of the function represented by the
functor QUOTE are necessarily so.)
An expression then *is* "use" of that expression and a quoted
expression is "mentioned" (although the entire quotation itself is
"used", the "use" of the functor QUOTE serving to "mention" its
argument.) [U. Reddy]
5) When I speak of two expressions being denotationally *equivalent*
I thus mean
a) they both mean the same thing to the programmer,
b) they have the same operational behavior; that is, the
function (EVAL, MEANING etc.) which identifies their
meanings returns the "same" result for both,
c) "same", or "equivalent" *meaning* is operationally
determined (defined) by the interpreter's equality
predicate itself (EQ, EQUAL, =, etc.)
This is why I referred to
"equivalent meaning, as determined, or shown, by the operation
of the language's equality predicate"
and
"meaning ... the same as ... as determined by LISP predicates
such as EQ and EQUAL"
[U. Reddy]
6) Of course LISP may be made lazy, the function MEANING may be
programmed in LISP, the LISP evaluator may be rendered QUOTE-less,
etc.. My point was rather that
a) it's simple to leave quotation recognition out of LISP
*to begin with*,
b) the result of doing so is a *reduction* engine, no more,
no less,
c) a function such as MEANING, to perform what I'm calling
denotation, is simple to define in a reduction setting,
so that LISP's implicit recognition of quotation *isn't
necessary* in order to have a useful denotation
mechanism,
d) without getting rid of LISP's automatic treatment of
quotation it's not *simple* (direct, straightforward,
etc.) to implement lazy interpretation.
[J. Rees, A. Freeman, U. Reddy]
!
SECOND, a few specific comments on some of the replies:
To J. REES:
----------
1) I admit I'm not sure I understand your proposal correctly.
I think you mean to
(1) keep the standard LISP (or SCHEME) interpreter but
replace explicit programmer calls to the procedure
EVAL by calls to NORMALIZE.
(2) reserve quotation for things that aren't self
evaluating (i.e. "things which don't [I assume you
mean 'do'] need it")
(3) change PRINT a bit so that the printed result of
evaluation is always a quotation or a self-evaluating
expression
I don't see how this provides reduction semantics. Let's leave aside
(1) for the moment, assuming nobody explicitly normalizes anything.
Here's the original example I gave, with some cosmetic changes to
protect the innocent:
if the value of FOO is defined to be BAR then (EQUAL 'BAR FOO)
is true (T), whereas (EQUAL 'BAR 'FOO) is false (NIL).
Thus FOO and (QUOTE FOO) *aren't* equivalent, as determined by
EQUAL, yet the former is the result of interpreting the latter.
Such an interpretation isn't, therefore, a reduction.
Now, let the value of BAR be TOTO. Then, asking for the meaning of
the meaning of FOO: (NORMALIZE FOO) gives (QUOTE TOTO). Why not
TOTO? I think that you, as well as U. Reddy (see number 3), below)
and perhaps others, were aiming at a different kind of denotation
mechanism than what I had in mind: one that, instead of just
removing a level of "mention", returns a *mention* of the denoted
value. Anyway, that's what I understand from your treatment of
PRINT, etc.. That's fine too, although in that case I would opt for
consistency in the case of numbers, strings, etc. too. Such
consistency is important, if not always for users in an interactive
setting, at least for *programs* that might manipulate or reason
about evaluation results.
!
To U. REDDY:
-----------
1) Here's your
"counterexample, assuming FOO is bound to 2 in the context:
(QUOTE FOO) -> (QUOTE 2) by innermost reduction
But (QUOTE FOO) and (QUOTE 2) are different objects"
As mentioned above, I'm using the interpreter's equality predicate
(e.g. EQUAL) to measure semantic equivalence. Assuming this, and
assuming that we're both talking expression reduction and aren't
concerned with LISP "objects" as different from their external
Sexprs, I don't agree that the values denoted by (QUOTE FOO) and
(QUOTE 2) are different. (EQUAL (QUOTE FOO) (QUOTE 2)) ==> T.
Likewise: (EQUAL FOO 2) ==> T. The two quotations "mention" the
*same* (as judged by EQUAL) value, which happens to have (at least)
two names: FOO and 2.
This of course means that reduction rules are not to be used to
establish values (in the sense of meanings), but rather equivalences.
From the moment that we equate two expressions via a reduction rule
we no longer have any external way to distinguish them; we've just
declared them to be indistinguishable. This means that if we want to
differentiate, we must do it at an external meta-level: *we* (or an
external program) can *see* a difference between (QUOTE FOO) and
(QUOTE 2). By accepting to recognize such a difference we place
ourselves at a meta-level *unknown to the interpreter*. This is not
a meta-level *defined* to the interpreter via MEANING. It is not
even definable, once we've declared FOO and 2 to be indistinguishable.
2) Regarding (QUOTE FOO) and FOO, you write:
"They aren't equivalent. So why say that (QUOTE FOO) denotes
FOO?"
Would you be happy reading "mentions" for "denotes"? Be happy then;
that's what I mean by "denotes". QUOTE mentions and EVAL (or
MEANING) returns the value mentioned by a quotation. I say "denotes"
because I want to use EVAL/MEANING for other than just quotations.
3) You write:
"Since LISP does not have a separate syntax for data objects
and programs ..., data objects are treated as "mentions" of
S-expressions and programs are treated as "uses" of them."
Exactly. This is one of my points, that LISP obliges the programmer
to use the *same* mechanism/notation when expressing data structures
etc. as when shifting semantic levels. I wrote:
"as all computation in LISP is evaluation (in a denotational
sense), the programmer is obliged to conceptually move up
and down between semantic levels that are essentially
artificial in a purely declarative setting. They don't
correspond to her conception of the meaning of the program
but rather function as an ad hoc mechanism to keep the
eagerness of EVAL at bay. She in fact eventually learns to
ignore or abstract from them when mentally interpreting code.
LISP requires programmers to employ quotation even when it
serves no apparent semantic purpose."
The last line would be better written "serves a different semantic
purpose, if any".
4) You mention that "[normalizers] are inefficient compared to
evaluators." How does taking quotation recognition out of pure LISP
leave it less efficient? The answer, I suppose, is that some other
mechanism must then be found for preventing unintended evaluation.
Normal order reduction is an obvious candidate, and is perhaps what
you had in mind. It is indeed in general less efficient. But it's
not the only mechanism possible. Wouldn't it be desirable to perform
strictness analysis to find arguments to be interpreted "by-value"?
5) I wrote:
"The quotation mechanism itself may of course be provided
quite simply by the general rule:
Meaning (Quote x) = x
where QUOTE is simply a constructor (undefined symbol).
Then:
Meaning (Quote -12) ==> -12"
You write:
"This works only if outermost evaluation is the default
(standard) evaluation of the language."
I can see why you might say this, considering the confusion over
number 1), above. Otherwise, I can't see why this would be true. As
reduction is equivalence-preserving, it can't matter where you start
reducing, inside, outside, mix and match, .... (excepting, of
course, non-terminating interpretation).
6) You write:
"It is by no means universally accepted that outermost
evaluation as the default is "good", and many people who
work with outermost evaluation have reservations about
using it as the default."
I agree. You and I are both, I believe, two such people. I mention
this so folks who aren't familiar with your work may know that
you're "lazier" than your reply might indicate. :)
-------------
As I'm going on vacation for a month I won't be around to keep up the
provocation. I look forward however to seeing how things will turn
out. Again, thanks for the comments and sorry about the confusion &
length. -- drew
--
Drew ADAMS, Laboratoires de Marcoussis, Centre de Recherche de la Compagnie
Generale d'Electricite, Route de Nozay, 91460 MARCOUSSIS, FRANCE
Tel. 64.49.11.54, adams@crcge1.cge.fr
∂24-Jul-87 2128 @MC.LCS.MIT.EDU:narain%pluto@rand-unix.ARPA Quotation regarding QUOTE
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 24 Jul 87 21:28:04 PDT
Received: from rand-unix.arpa (TCP 1200600007) by MC.LCS.MIT.EDU 24 Jul 87 12:41:10 EDT
Received: by rand-unix.arpa; Fri, 24 Jul 87 08:49:49 PDT
Received: from localhost by pluto.arpa; Fri, 24 Jul 87 08:50:34 PDT
Message-Id: <8707241550.AA08641@pluto.arpa>
To: scheme@mc.lcs.mit.edu, narain%pluto@rand-unix.ARPA
Subject: Quotation regarding QUOTE
Date: Fri, 24 Jul 87 08:50:31 PDT
From: narain%pluto@rand-unix.ARPA
In the discussions of QUOTE, it would be useful to keep in mind its origins.
Consider the following:
In order that constants can always be distinguished from
variables however, they will be quoted. That is, a 2-list
will be formed whose first element is the keyword QUOTE
and whose second element is the constant. Hence the constants
127, NIL, (A B) and X will be represented by the S-expressions
(QUOTE 127), (QUOTE NIL), (QUOTE (A B)), (QUOTE X) respectively.
There is no exception to this rule: variables are *never*
quoted, constants are *always* quoted.
Peter Henderson
Functional Programming: Application & Implementation
Page 97
Note that quotation is hardly required in Prolog since it has another
convention for distinguishing variables from constants.
Sanjai Narain
Rand Corp.
∂29-Jul-87 0642 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU backquote semantics
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 29 Jul 87 06:41:59 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 29 Jul 87 09:39:08 EDT
Date: Wed, 29 Jul 87 09:41:25 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: backquote semantics
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <234576.870729.JAR@AI.AI.MIT.EDU>
re-sending...
Date: Mon, 27 Jul 87 15:55:40 EDT
From: Jonathan A Rees <JAR@mc.lcs.mit.edu>
Subject: backquote semantics
To: stevev%tekchips.tek.com@RELAY.CS.NET
cc: rrrs-authors%tekchips.tek.com@RELAY.CS.NET
In-reply-to: Msg of 22 Jul 87 14:16:12 PDT (Wed) from Steve Vegdahl <stevev%tekchips.tek.com at RELAY.CS.NET>
Message-ID: <233499.870727.JAR@AI.AI.MIT.EDU>
Date: 22 Jul 87 14:16:12 PDT (Wed)
From: Steve Vegdahl <stevev%tekchips.tek.com at RELAY.CS.NET>
(define foo
(lambda () '(x y z)))
(define baz
(lambda () `(x y z)))
(define grump
(lambda (k) `(x y z ,k)))
Are the following expressions true, false, or implementation-dependent?
1: (eq? (foo) (foo))
2: (eq? (baz) (baz))
3: (eq? (grump 'w) (grump 'w))
This is definitely an ommission from the report; I don't think the issue
ever got much discussion. Personally I don't much care how backquote
works, although I think it would be nice if it did a minimum of consing.
Other people think differently. My advice would be to assume it's
implementation-dependent until the question gets discussed on this
mailing list, and to see Steele's book Common Lisp: The Language for a
discussion of the range of possible implementations until something
better comes along.
∂12-Aug-87 1601 @MC.LCS.MIT.EDU,@RELAY.CS.NET:willc@tekchips.tek.com Gabriel benchmarks in Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 12 Aug 87 16:01:28 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 12 Aug 87 18:54:35 EDT
Received: from relay2.cs.net by RELAY.CS.NET id ac01166; 12 Aug 87 18:39 EDT
Received: from tektronix.tek.com by RELAY.CS.NET id aw06697; 12 Aug 87 18:28 EDT
Received: by tektronix.TEK.COM (5.51/6.24)
id AA19826; Wed, 12 Aug 87 14:13:49 PDT
Received: by tekchips.TEK.COM (5.51/6.24)
id AA15730; Wed, 12 Aug 87 14:11:57 PDT
Message-Id: <8708122111.AA15730@tekchips.TEK.COM>
To: scheme@mc.lcs.mit.edu
Cc: rrrs-authors@mc.lcs.mit.edu
Subject: Gabriel benchmarks in Scheme
Date: 12 Aug 87 14:11:55 PDT (Wed)
From: willc%tekchips.tek.com@RELAY.CS.NET
In the most recent issue of Lisp Pointers, Walter van Roggen asked implementors
to send in their most recent timings for the Gabriel benchmarks. I would like
to encourage implementors of Scheme to respond to this request.
I have recently finished translating the Gabriel benchmarks (except for STAK,
which is a test of fluid variables, and FRPOLY, which is written "in a somewhat
unpleasant programming style" that is hard to understand or translate) into
Scheme. Please let me know if you would like the source code.
Some of the benchmarks use property lists; I didn't try to change that, because
most implementations can mimic property lists. At least one of them (BROWSE)
also assumes that CAR and CDR of the empty list is the empty list; I didn't
try to change that either. Otherwise the benchmarks should be reasonably
portable. They have been run in MacScheme.
I changed the CTAK benchmark, which tested both fluid binding and escapes,
into a straight test of CALL-WITH-CURRENT-CONTINUATION. Otherwise the tests
measure pretty much the same things in Scheme as they do in Common Lisp.
(That's not to say I always understand what they are supposed to measure in
Common Lisp.) Because the Gabriel benchmarks do not test first class
procedures and do use much tail-recursion, I have added a continuation-passing
version of TAK to the Scheme benchmarks.
peace, William Clinger
Tektronix Computer Research Lab
willc%tekchips.tek.com@relay.cs.net
∂12-Aug-87 1648 @MC.LCS.MIT.EDU,@RELAY.CS.NET:willc@tekchips.tek.com MacScheme+Toolsmith Version 1.0
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 12 Aug 87 16:48:27 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 12 Aug 87 18:55:04 EDT
Received: from relay2.cs.net by RELAY.CS.NET id ae01166; 12 Aug 87 18:39 EDT
Received: from tektronix.tek.com by RELAY.CS.NET id bc06697; 12 Aug 87 18:29 EDT
Received: by tektronix.TEK.COM (5.51/6.24)
id AA20655; Wed, 12 Aug 87 14:53:21 PDT
Received: by tekchips.TEK.COM (5.51/6.24)
id AA16770; Wed, 12 Aug 87 14:51:32 PDT
Message-Id: <8708122151.AA16770@tekchips.TEK.COM>
To: scheme@mc.lcs.mit.edu
Subject: MacScheme+Toolsmith Version 1.0
Date: 12 Aug 87 14:51:30 PDT (Wed)
From: willc%tekchips.tek.com@RELAY.CS.NET
Apology: While this amounts to a commercial announcement, I believe its
technical content should be of great interest to the Scheme and Lisp
communities.
MacScheme+Toolsmith Version 1.0 is being introduced this week at the
MacWorld Expo in Boston. One feature of this product is particularly
significant: The Application Builder is a selective linker that makes
it easy to construct standard, double-clickable Macintosh applications
that are practically indistinguishable from applications written in
mainstream programming languages such as Pascal and C. While applications
written in Scheme tend to be larger than if they were written in Pascal
or C, they are not so large as to be outrageous. The smallest complete
applications occupy less than 100K bytes on disk.
By a selective linker I mean that the Application Builder automatically
removes unused code and data from the Scheme library as it builds the
application. Selective linking is made possible by the clean design of
Scheme, which maintains a rigorous distinction between program and data.
It is impossible to write a reliable and effective selective linker for
other dialects of Lisp, because they do not maintain this distinction.
The Application Builder does permit the use of EVAL and LOAD in an
application, but their use defeats selective linking in most cases.
MacScheme+Toolsmith Version 1.0 also includes a native code compiler
that is almost decent. That is, it is several times faster than previous
Lisp compilers for the Macintosh, and is able to bear comparison with the
best microcomputer Lisp compilers available.
Other notable features of MacScheme+Toolsmith include support for the
Macintosh Toolbox traps, a programmable interrupt system, and multitasking.
As an author of this system, I am quite proud of it. Since it was made
possible by the high quality of the Scheme language itself, it seems only
fair that the Scheme community at large should be able to share my joy.
Peace, William Clinger
∂12-Aug-87 1853 @MC.LCS.MIT.EDU:fateman@renoir.Berkeley.EDU Re: Gabriel benchmarks in Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 12 Aug 87 18:53:19 PDT
Received: from renoir.Berkeley.EDU (TCP 20010101004) by MC.LCS.MIT.EDU 12 Aug 87 19:38:15 EDT
Received: by renoir.Berkeley.EDU (5.58/1.25)
id AA03890; Wed, 12 Aug 87 16:36:13 PDT
Date: Wed, 12 Aug 87 16:36:13 PDT
From: fateman@renoir.Berkeley.EDU (Richard Fateman)
Message-Id: <8708122336.AA03890@renoir.Berkeley.EDU>
To: scheme@mc.lcs.mit.edu, willc%tekchips.tek.com@relay.cs.net
Subject: Re: Gabriel benchmarks in Scheme
Cc: rrrs-authors@mc.lcs.mit.edu
The guts of the FRPOLY benchmark was written by the late
Prof. William A. Martin, of MIT, c. 1968. That is, before
many people reading this were born, and when the Mathlab group was
concerned with other issues than those we face today in
programming and teaching programming.
I think that the part that causes
the most difficulty in understanding is in the middle
of the polynomial multiplication routine. A more straightforward
program, such as the one in Scheme given in Abelson/Sussman↑2,
can use O(n↑2) rather than O(n) conses in multiplying two degree-n
polynomials compared to Martin's program.
I find it unfortunate that people feel they have to understand code
in MacLisp in order to translate it into Scheme.
Can't this be done automatically?
∂12-Aug-87 2227 @MC.LCS.MIT.EDU:gjs@ZOHAR.AI.MIT.EDU Gabriel benchmarks in Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 12 Aug 87 22:27:06 PDT
Received: from zohar (TCP 2206400256) by MC.LCS.MIT.EDU 13 Aug 87 00:44:07 EDT
Received: by ZOHAR.AI.MIT.EDU; Wed, 12 Aug 87 23:36:17 edt
Date: Wed, 12 Aug 87 23:36:17 edt
From: gjs@ZOHAR.AI.MIT.EDU (Gerald Jay Sussman)
Message-Id: <8708130336.AA08981@zohar>
To: willc%tekchips.tek.com@RELAY.CS.NET
Cc: scheme@mc.lcs.mit.edu, rrrs-authors@mc.lcs.mit.edu
In-Reply-To: willc%tekchips.tek.com@RELAY.CS.NET's message of 12 Aug 87 14:11:55 PDT (Wed) <8708122111.AA15730@tekchips.TEK.COM>
Subject: Gabriel benchmarks in Scheme
great.. please bring them when you come.
regards to anne
∂13-Aug-87 0900 @MC.LCS.MIT.EDU:jrl@ZERMATT.LCS.MIT.EDU Re: MacScheme+Toolsmith Version 1.0
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 13 Aug 87 09:00:49 PDT
Received: from RTS-10.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 13 AUG 87 11:55:17 EDT
Message-Id: <2764857083-3315152@RTS-10>
Sender: JRL@RTS-10
Date: Thu, 13 Aug 87 11:51:23 EDT
From: jrl@ZERMATT
To: willc%tekchips.tek.com@RELAY.CS.NET
Cc: scheme@mc.lcs.mit.edu
Subject: Re: MacScheme+Toolsmith Version 1.0
In-Reply-To: Msg of 12 Aug 87 14:51:30 PDT (Wed) from willc%tekchips.tek.com@RELAY.CS.NET
Selective linking is made possible by the clean design of
Scheme, which maintains a rigorous distinction between program and data.
It is impossible to write a reliable and effective selective linker for
other dialects of Lisp, because they do not maintain this distinction.
Peace, William Clinger
This is an intriguing statement. Can you amplify on this. Is it the use
of symbols both as first class objects and as names that causes the
problems or is it something else?
Juan
∂13-Aug-87 1041 @MC.LCS.MIT.EDU:KSWANSON%SUNRISE.BITNET@MITVMA.MIT.EDU C Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 13 Aug 87 10:38:18 PDT
Received: from MITVMA.MIT.EDU (TCP 2227000003) by MC.LCS.MIT.EDU 13 Aug 87 13:14:10 EDT
Received: from (MAILER)MITVMA.BITNET by MITVMA.MIT.EDU on 08/13/87 at
13:11:59 EDT
Received: from SUNRISE.BITNET (KSWANSON) by MITVMA.MIT.EDU (Mailer
X1.24) with
BSMTP id 3518; Thu, 13 Aug 87 13:11:55 EDT
Date: Thu, 13 Aug 87 13:02 EST
From: <KSWANSON%SUNRISE.BITNET@MITVMA.MIT.EDU>
Subject: C Scheme
To: scheme@mc.lcs.mit.edu
X-Original-To: scheme@mc.lcs.mit.edu
I'm interested in obtaining a copy of C Scheme, for VMS and UNIX. I
tried the telnet way, but wasn't able to get it to work. Is there anyone on
BITNET with a copy of either or both of theses who could send/file them to me?
Your cooperation is most appreciated,
Kurt Swanson
∂13-Aug-87 1528 @MC.LCS.MIT.EDU:hal@MURREN.AI.MIT.EDU Gabriel benchmarks in Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 13 Aug 87 15:27:49 PDT
Received: from murren (TCP 2206400263) by MC.LCS.MIT.EDU 13 Aug 87 18:22:36 EDT
Received: by MURREN.AI.MIT.EDU; Thu, 13 Aug 87 18:19:48 edt
Date: Thu, 13 Aug 87 18:19:48 edt
From: hal@MURREN.AI.MIT.EDU (Hal Abelson)
Message-Id: <8708132219.AA01596@murren>
To: fateman@renoir.Berkeley.EDU, scheme@mc
In-Reply-To: Richard Fateman's message of Wed, 12 Aug 87 16:36:13 PDT <8708122336.AA03890@renoir.Berkeley.EDU>
Subject: Gabriel benchmarks in Scheme
Reply-To: hal@ai.ai.mit.edu
Rich Fateman writes:
I find it unfortunate that people feel they have to understand code
in MacLisp in order to translate it into Scheme.
Can't this be done automatically?
I don't want to disparage the Macsyma code (and I have the greatest
respect for the memory of Bill Martin), but it is not a good idea to
run benchmarks based on code that one doesn't understand, whether or
not the translation to Scheme is done automatically.
The most striking example of this is the Gabriel Boyer-Moore
benchmark, which always
(a) returns as its value the value of a PROG that falls off the end
(e.g., ALWAYS produces NIL)
(b) follows a computation path that turns out to depend upon the
default test used by MEMBER. MacLisp and ZetaLisp here use EQUAL and
CL uses EQL. Because of this, initially people at Symbolics thought
that one of their implementations ran this benchmark much faster than
the other -- it turned out that the two implementations were following
completely different execution paths.
Figuring out these bugs wasted a lot of time on the part of Sussman
and Don Allen.
Given that the Scheme community is trying to avoid the
over-complexities of Common Lisp, it is not too inappropriate for us
to give some effort to using understandable benchmarks.
∂13-Aug-87 2355 @MC.LCS.MIT.EDU,@RELAY.CS.NET:willc@tekchips.tek.com FRPOLY; philosophy of benchmarking
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 13 Aug 87 23:55:15 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 14 Aug 87 02:52:37 EDT
Received: from relay2.cs.net by RELAY.CS.NET id aa04759; 14 Aug 87 2:48 EDT
Received: from tektronix.tek.com by RELAY.CS.NET id aa15182; 14 Aug 87 2:39 EDT
Received: by tektronix.TEK.COM (5.51/6.24)
id AA04478; Thu, 13 Aug 87 15:53:21 PDT
Received: by tekchips.TEK.COM (5.51/6.24)
id AA05333; Thu, 13 Aug 87 15:51:04 PDT
Message-Id: <8708132251.AA05333@tekchips.TEK.COM>
To: fateman@RENOIR.BERKELEY.EDU
Cc: scheme@mc.lcs.mit.edu
Subject: FRPOLY; philosophy of benchmarking
In-Reply-To: Your message of Wed, 12 Aug 87 16:36:13 PDT.
<8708122336.AA03890@renoir.Berkeley.EDU>
Date: 13 Aug 87 15:51:01 PDT (Thu)
From: willc%tekchips.tek.com@RELAY.CS.NET
Thank you for explaining the history of the FRPOLY benchmark. I was
TA for a course in which Professor Martin lectured at MIT.
I certainly believe it is possible to translate MacLisp code automatically
into Scheme, and I even suspect that it is easier than translating (e.g.)
Ada automatically into Common Lisp. But that's not a very interesting issue.
It is important for people to understand benchmarks so they can
understand what the results of the benchmark mean. Without
that understanding, benchmarking is a worse than useless exercise.
I don't understand FRPOLY well enough to convert its PROGs into
idiomatic Scheme code. Scheme doesn't support PROG. I know an
algorithm for translating any PROG into a single use of
CALL-WITH-CURRENT-CONTINUATION surrounding a LETREC, and I have
used that algorithm on occasions when my sole interest was in
getting an antique piece of code to run, but mindless application
of the algorithm makes the code even more opaque.
I might add that several other of the Gabriel benchmarks are too
large for their significance to be comprehended easily, but with
the others I was able to translate them into reasonably idiomatic
Scheme code after only a little study. I would be delighted if
someone who understood the FRPOLY benchmark were to translate it
into Scheme. I think it is far better for that to happen after
some delay than for me to do a quick but poor translation.
peace,
Will Clinger
∂14-Aug-87 0034 @MC.LCS.MIT.EDU,@RELAY.CS.NET:willc@tekchips.tek.com selective linking in Lisp
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 14 Aug 87 00:34:05 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 14 Aug 87 03:01:08 EDT
Received: from relay2.cs.net by RELAY.CS.NET id aa04851; 14 Aug 87 2:59 EDT
Received: from tektronix.tek.com by RELAY.CS.NET id au15182; 14 Aug 87 2:49 EDT
Received: by tektronix.TEK.COM (5.51/6.24)
id AA08274; Thu, 13 Aug 87 16:57:04 PDT
Received: by tekchips.TEK.COM (5.51/6.24)
id AA07301; Thu, 13 Aug 87 16:55:13 PDT
Message-Id: <8708132355.AA07301@tekchips.TEK.COM>
To: scheme@mc.lcs.mit.edu
Subject: selective linking in Lisp
From: willc%tekchips.tek.com@RELAY.CS.NET
Date: 13 Aug 87 16:55:11 PDT (Thu)
Sender: willc%tekchips.tek.com@RELAY.CS.NET
[my attempt to reply directly to jrl@zermatt failed; he posted his
question here, so I'll reply here]
This is an intriguing statement. Can you amplify on this. Is it the use
of symbols both as first class objects and as names that causes the
problems or is it something else?
Depends on what you mean by that. You can't do reliable selective linking
on a program that calls EVAL (or its kin such as SYMBOL-VALUE,
SYMBOL-FUNCTION, etc) unless the linker can determine the arguments
that are passed to EVAL, which is impossible in general. The reason EVAL
defeats selective linking is that the argument to EVAL, being a computed
quantity, potentially refers to just about any procedure or variable.
This is true in all Lisps, including Scheme.
The problem with Lisps other than Scheme is that all sorts of standard
procedures are specified in such a way that they potentially call EVAL
(or SYMBOL-VALUE or SYMBOL-FUNCTION), so even if you scrupulously avoid
calling EVAL yourself you still lose because you call FUNCALL or APPLY
or something else that calls EVAL (or SYMBOL-VALUE or SYMBOL-FUNCTION).
I raised this with the Common Lisp cleanup subcommittee and at the last
X3J13 meeting, and was astounded to learn that the Common Lisp vendors
generally feel that selective linking isn't worth thinking about. They
may be right, in the sense that it would take a fairly drastic overhaul
of Common Lisp to make it possible to write reliable selective linkers.
I expect most vendors will eventually write unreliable selective linkers
that ignore the problems posed by EVAL and its kin, or else they will
rely on the programmer to declare all variables that might be needed by
a call to EVAL. This might well be good enough for government work.
Peace, Will Clinger
Tektronix Computer Research Lab
∂14-Aug-87 0128 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: Gabriel benchmarks in Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 14 Aug 87 01:28:03 PDT
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 14 Aug 87 04:17:37 EDT
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA01671; Fri, 14 Aug 87 01:14:28 PDT
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 14 Aug 87 06:52:35 GMT
From: phr@hermes.ai.mit.edu (Paul Rubin)
Organization: The MIT AI Lab, Cambridge, MA
Subject: Re: Gabriel benchmarks in Scheme
Message-Id: <2882@mit-hermes.AI.MIT.EDU>
References: <8708122336.AA03890@renoir.Berkeley.EDU>, <8708132219.AA01596@murren>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I notice that most of the Gabriel benchmarks were run under ORBIT
(the compiler for the T system (T is a Scheme dialect)). Possibly
you could get in touch with the T authors to avoid duplicating some
of the effort of benchmark conversion. See "ORBIT: An Optimizing
Compiler for Scheme" by David Kranz et al, Proc. SIGPLAN '86
Symposium on Compiler Construction. That is a good paper to read
if you are interested in Scheme compilation, too.
∂14-Aug-87 1757 @MC.LCS.MIT.EDU,@dewey.udel.edu,@localhost:saunders@UDEL.EDU Re: FRPOLY; philosophy of benchmarking
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 14 Aug 87 17:57:47 PDT
Received: from UDEL.EDU (TCP 1200000140) by MC.LCS.MIT.EDU 14 Aug 87 20:19:40 EDT
Received: from dewey.udel.edu by Louie.UDEL.EDU id aa04086; 14 Aug 87 10:40 EDT
Received: from localhost by Dewey.UDEL.EDU id aa07797; 14 Aug 87 10:40 EDT
To: willc%tekchips.tek.com@relay.cs.net
cc: fateman@renoir.berkeley.edu, scheme@mc.lcs.mit.edu
Subject: Re: FRPOLY; philosophy of benchmarking
In-reply-to: Your message of Thu, 13 Aug 87 15:51:01 -0700.
<8708132251.AA05333@tekchips.TEK.COM>
Date: Fri, 14 Aug 87 10:40:12 -0400
From: David Saunders <saunders@UDEL.EDU>
Message-ID: <8708141040.aa07797@Dewey.UDEL.EDU>
I'd like to see the FRPOLY benchmark. I might even undertake the translation
to scheme. Can you send me a copy?
Thanx, Dave Saunders
∂14-Aug-87 1847 @MC.LCS.MIT.EDU:gjc@bucsf.bu.edu Re: selective linking in Lisp
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 14 Aug 87 18:47:04 PDT
Received: from bu-cs.BU.EDU (TCP 30003134401) by MC.LCS.MIT.EDU 14 Aug 87 20:21:04 EDT
Received: from bucsf (BUCSF.BU.EDU) by bu-cs.BU.EDU (3.2/4.7)
id AA01313; Fri, 14 Aug 87 16:45:44 EDT
Return-Path: <gjc@bucsf.bu.edu>
Received: by bucsf (4.12/4.7)
id AA15964; Fri, 14 Aug 87 07:36:46 edt
Date: Fri, 14 Aug 87 07:36:46 edt
From: gjc@bucsf.bu.edu (George J. Carrette)
Message-Id: <8708141136.AA15964@bucsf>
To: scheme@mc.lcs.mit.edu, willc%tekchips.tek.com@RELAY.CS.NET
Subject: Re: selective linking in Lisp
There is no problem with selective linking while using EVAL,
the problem comes up when you add to this the use of
INTERN or READ.
∂16-Aug-87 1804 @MC.LCS.MIT.EDU:gjc@bucsf.bu.edu Re: Gabriel benchmarks in Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 16 Aug 87 18:04:28 PDT
Received: from bu-cs.BU.EDU (TCP 30003134401) by MC.LCS.MIT.EDU 16 Aug 87 20:29:21 EDT
Received: from bucsf (BUCSF.BU.EDU) by bu-cs.BU.EDU (3.2/4.7)
id AA01328; Fri, 14 Aug 87 16:45:50 EDT
Return-Path: <gjc@bucsf.bu.edu>
Received: by bucsf (4.12/4.7)
id AA15933; Fri, 14 Aug 87 07:25:16 edt
Date: Fri, 14 Aug 87 07:25:16 edt
From: gjc@bucsf.bu.edu (George J. Carrette)
Message-Id: <8708141125.AA15933@bucsf>
To: scheme@mc.lcs.mit.edu, willc%tekchips.tek.com@RELAY.CS.NET
Subject: Re: Gabriel benchmarks in Scheme
Cc: rrrs-authors@mc.lcs.mit.edu
There was a continuation passing version of tak I ran in VAX-NIL
and submitted a couple years ago, called TAKF. It made it into
"the book" but unfortunately was not run by many (if any) other
lisp implementors. Perhaps an interesting note, on the MIT Lispmachine
instruction set (CADR, LM-2, LMI-LAMBDA, TI-EXPLORER) the procedures
for TAK and TAKF compile into exactly the same sequence of instructions,
and TAKF is slightly faster, with one memory reference less per
procedure call (no, make that two memory reference, one for the
exit-vector and one for the function-cell).
Needless to say, in most lisps TAKF is considerably slower than TAK.
In Maclisp or Franz, with FUNCALL, quite considerably slower,
although with SUBRCALL in Maclisp there is no problem.
∂16-Aug-87 1931 @MC.LCS.MIT.EDU:masinter.pa@Xerox.COM Re: selective linking in Lisp
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 16 Aug 87 19:30:56 PDT
Received: from Xerox.COM (TCP 1200400040) by MC.LCS.MIT.EDU 16 Aug 87 21:49:38 EDT
Received: from Cabernet.ms by ArpaGateway.ms ; 16 AUG 87 02:37:48 PDT
Date: 16 Aug 87 02:37 PDT
From: masinter.pa@Xerox.COM
Subject: Re: selective linking in Lisp
In-reply-to: willc%tekchips.tek.com@RELAY.CS.NET's message of 13 Aug 87
16:55:11 PDT (Thu)
To: willc%tekchips.tek.com@RELAY.CS.NET
cc: scheme@mc.lcs.mit.edu
Message-ID: <870816-023748-4773@Xerox>
Will, in regard to selective linking in Common Lisp, your
characterization of the response from the cleanup committee and X3J13 is
incorrect.
I've reviewed the mail on the topic (issue "EVAL-DEFEATS-LINKER".) None
of the responses came close to suggesting that "selective linking isn't
worth thinking about." However, a number of people responded that they
thought about it in a different way than you do. The specific issue was
discussed at length, and the discussion has not been brought to a
conclusion.
I don't think this is the appropriate forum to debate the point or to
summarize the alternatives discussed so far. If anyone is interested in
helping carry this topic further, I can make the mail archives
available.
∂17-Aug-87 0257 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA Pausing garbage collection
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 17 Aug 87 02:57:06 PDT
Received: from mitre-bedford.ARPA (TCP 3200600102) by MC.LCS.MIT.EDU 17 Aug 87 04:36:06 EDT
Posted-From: The MITRE Corp., Bedford, MA
Received: from darwin.sun.uucp by linus.research (3.2/4.7)
id AA02931; Sat, 15 Aug 87 20:38:07 EDT
Posted-Date: Sat, 15 Aug 87 20:37:59 EDT
Received: by darwin.sun.uucp (3.2/SMI-3.0DEV3)
id AA07174; Sat, 15 Aug 87 20:37:59 EDT
Date: Sat, 15 Aug 87 20:37:59 EDT
From: ramsdell%linus@mitre-bedford.ARPA
Message-Id: <8708160037.AA07174@darwin.sun.uucp>
To: rrrs-authors@mc.lcs.mit.edu
Subject: Pausing garbage collection
Sorry about using this mailing list for other than what it was
intended, but I think you are best qualified to answer my question.
Is it true that the state of the art in pausing garbage collection
algorithms is the one by Douglas Clark, "An Efficient List-Moving
Algorithm Using Constant Workspace", in CACM, June 1976, Vol. 19, No.
6, pp. 352-5? I know that T uses this algorithm.
John
∂18-Aug-87 0759 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Pausing garbage collection
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 18 Aug 87 07:52:45 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 18 Aug 87 10:50:36 EDT
Date: Tue, 18 Aug 87 10:50:12 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Pausing garbage collection
To: ramsdell%linus@MITRE-BEDFORD.ARPA
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Sat 15 Aug 87 20:37:59 EDT from ramsdell%linus at mitre-bedford.ARPA
Message-ID: <243369.870818.JAR@AI.AI.MIT.EDU>
The main reason T uses Clark's GC is to linearize lists and thereby
reduce paging, presumably. (Also because we had just spoken to Clark
before we wrote it.) I'm not sure it's otherwise a win; I think it may
inspect objects objects fewer times, but the constant factor might be
bad because of the way it represents its stack -- several memory
references are required to chase forwarding pointers and get the next
object to inspect. The usual scan/free pointer copying GC (I forget
what it's called) is certainly simpler and probably just as good,
especially if you have lots of physical memory. It would be nice to see
some experiments comparing the two, however.
∂19-Aug-87 1233 @MC.LCS.MIT.EDU:DOMAHONY%IRLEARN.BITNET@MITVMA.MIT.EDU Scheme Instructors Guide
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 19 Aug 87 12:33:23 PDT
Received: from MITVMA.MIT.EDU (TCP 2227000003) by MC.LCS.MIT.EDU 19 Aug 87 14:17:34 EDT
Received: from (MAILER)MITVMA.BITNET by MITVMA.MIT.EDU on 08/19/87 at
13:34:13 EDT
Received: from IRLEARN.BITNET by MITVMA.MIT.EDU (Mailer X1.24) with
BSMTP id
1255; Wed, 19 Aug 87 13:34:09 EDT
Received: by IRLEARN (Mailer X1.24) id 8040; Wed, 19 Aug 87 17:37:25 GMT
Date: Wed, 19 Aug 87 17:34:50 GMT
From: Donal O'Mahony
<DOMAHONY%IRLEARN.BITNET@MITVMA.MIT.EDU>
Subject: Scheme Instructors Guide
To: SCHEME@MC.LCS.MIT.EDU
I intend to teach a course next year based on the Structure and Interpretation
of Computer Programs Book. In the stuff that came with C-Scheme Release 4,
a mention was made of an "Instructors Guide" to accompany the book.
Does anybody know where I can order a copy?
Donal O'Mahony
Computer Science Dept,
Trinity College,
Dublin,
Ireland.
∂20-Aug-87 1019 @MC.LCS.MIT.EDU:KURT%sungod.nsc.syr.edu@amax.npac.syr.edu C Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 20 Aug 87 10:19:44 PDT
Received: from amax.npac.syr.edu (TCP 20071400404) by MC.LCS.MIT.EDU 20 Aug 87 12:49:19 EDT
Received: from sungod.nsc.syr.edu by amax.npac.syr.edu id aa03736;
20 Aug 87 12:47 EDT
Date: Thu, 20 Aug 87 12:16 EDT
From: Kurt Swanson <KURT%sungod.nsc.syr.edu@amax.npac.syr.edu>
Subject: C Scheme
To: scheme@mc.lcs.mit.edu
X-VMS-To: IN%"scheme@mc.lcs.mit.edu"
I'm looking for C Scheme source for both VMS and UNIX. Is there
anyone on bitnet who could possibly send/file them to me? I also have FTP
access to Internet, but my attempts to get the source have failed.
Kurt Swanson
∂22-Aug-87 2122 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Scheme tutorial
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 22 Aug 87 21:21:52 PDT
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 23 Aug 87 00:18:18 EDT
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA04673; Sat, 22 Aug 87 20:52:02 PDT
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 23 Aug 87 01:44:56 GMT
From: xanth!kahn@mcnc.org (Gary I Kahn)
Organization: Old Dominion University, Norfolk Va.
Subject: Scheme tutorial
Message-Id: <2229@xanth.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I'm new to Scheme, but have limited experience with LISP. I bought PC Scheme,
but the manual is not a Scheme tutorial. TI's manual mentions the book by
Abelson, Sussman, and Sussman (Structure and Implementation of Computer
Programs) as a good book for learning Scheme. I'm ready to order the book
if it's good for learning Scheme. Does anyone out there have anything to
say about this book, or any other Scheme books? I'm particularly
interested in the features of Scheme which are different from LISP, such as
engines, closures, and it's treatment of everything as first-class objects.
Thanks in advance.
Gary I. Kahn
kahn@xanth.odu.edu
∂27-Aug-87 0956 @MC.LCS.MIT.EDU:JELROBN%YALEVM.BITNET@MITVMA.MIT.EDU Please remove me from the mailing list.
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 27 Aug 87 09:56:48 PDT
Received: from MITVMA.MIT.EDU (TCP 2227000003) by MC.LCS.MIT.EDU 27 Aug 87 12:53:20 EDT
Received: from (MAILER)MITVMA.BITNET by MITVMA.MIT.EDU on 08/27/87 at
12:52:33 EDT
Received: from YALEVM.BITNET by MITVMA.MIT.EDU (Mailer X1.24) with
BSMTP id
3700; Thu, 27 Aug 87 12:52:29 EDT
Received: by YALEVM (Mailer X1.24) id 0211; Thu, 27 Aug 87 12:42:31 EST
Date: Thu, 27 Aug 87 12:42 EST
From: JELROBN%YALEVM.BITNET@MITVMA.MIT.EDU
Subject: Please remove me from the mailing list.
To: SCHEME@MC.LCS.MIT.EDU
Please remove me from this mailing list. Thanks.
∂27-Aug-87 2006 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu On-line Documentation
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 27 Aug 87 20:06:12 PDT
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 27 Aug 87 22:51:29 EDT
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA15025; Thu, 27 Aug 87 17:19:59 PDT
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 27 Aug 87 13:33:11 GMT
From: rich@eddie.mit.edu (Richard Caloggero)
Organization: MIT EE/CS Computer Facility, Cambridge, MA
Subject: On-line Documentation
Message-Id: <6672@eddie.MIT.EDU>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Hi there...
Can anyone email, or point me to any *on-line* documentation/papers on the design and implementation
of CSCHEME and/or T (Yale's production SCHEME interpeter/compiler)?
Thanx in advance!
-- Rich
∂28-Aug-87 0533 @MC.LCS.MIT.EDU:DEMOL%NUSVM.BITNET@MITVMA.MIT.EDU info file
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 28 Aug 87 05:33:22 PDT
Received: from MITVMA.MIT.EDU (TCP 2227000003) by MC.LCS.MIT.EDU 28 Aug 87 08:06:28 EDT
Received: from (MAILER)MITVMA.BITNET by MITVMA.MIT.EDU on 08/28/87 at
08:05:21 EDT
Received: from NUSVM.BITNET by MITVMA.MIT.EDU (Mailer X1.24) with BSMTP
id
6459; Fri, 28 Aug 87 08:05:17 EDT
Received: by NUSVM (Mailer X1.23b) id 3396; Fri, 28 Aug 87 20:04:14 SST
Date: Fri, 28 Aug 87 20:04:00 SST
From: fung-chai lim <DEMOL%NUSVM.BITNET@MITVMA.MIT.EDU>
Subject: info file
To: SCHEME@MC.LCS.MIT.EDU
info file
∂28-Aug-87 1102 @MC.LCS.MIT.EDU:wtm@buengc.bu.edu Please remove me from the mailing list
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 28 Aug 87 11:02:41 PDT
Received: from bu-cs.BU.EDU (TCP 20061201001) by MC.LCS.MIT.EDU 28 Aug 87 13:06:45 EDT
Received: from buengc (BUENGC.BU.EDU) by bu-cs.BU.EDU (3.2/4.7)
id AA25423; Fri, 28 Aug 87 13:04:34 EDT
Return-Path: <wtm@buengc.bu.edu>
Received: by buengc (4.12/4.7)
id AA05619; Fri, 28 Aug 87 13:00:34 edt
Date: Fri, 28 Aug 87 13:00:34 edt
From: wtm@buengc.bu.edu (W. Thomas Meier)
Message-Id: <8708281700.AA05619@buengc>
To: scheme@mc.lcs.mit.edu
Subject: Please remove me from the mailing list
Please remove me from this mailing list, as I am reading it from another
source.
+Tom Meier
∂01-Sep-87 1825 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu getting scheme up on a 3B1
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 1 Sep 87 18:25:00 PDT
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 1 Sep 87 21:20:05 EDT
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA03777; Tue, 1 Sep 87 17:47:18 PDT
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 1 Sep 87 23:23:17 GMT
From: super.upenn.edu!linc.cis.upenn.edu!brant@RUTGERS.EDU (Brant Cheikes)
Organization: University of Pennsylvania
Subject: getting scheme up on a 3B1
Message-Id: <1914@super.upenn.edu>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I hope this is the right place to post this... I'm trying to get
C-Scheme running on an AT&T Unix PC (approx Unix SV.2). First Q:
what's the latest C-Scheme version and where is it available from
(FTP preferred)? (want to make sure I'm working with the latest
version).
2nd Q: on what basis does one define STACK, HEAP, and CONSTANT size
in config.h? When I use the defaults and try to run scheme, I get
a "Not enough memory for this configuration." message, and scheme
halts. If I try "scheme -heap 75 -stack 75", it comes up ok. But
I had to tweak the numbers to get it to work-- isn't there a more
principled approach?
Last Q: the runtime/ and sf/ areas have .scm, .psb, and .bin files.
I see that one can convert psb/bin easily, but is there some way
to generate psb or bin files from scm files?
ANY assistance would be appreciated! Thanks,
Brant
-----------------------------------------------------------------------------
Brant Cheikes University of Pennsylvania
ARPA: brant@linc.cis.upenn.edu Computer and Information Science
=============================================================================
∂02-Sep-87 2333 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Looking for Scheme implementation
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 2 Sep 87 23:33:43 PDT
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 3 Sep 87 02:10:52 EDT
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA03079; Wed, 2 Sep 87 22:40:04 PDT
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 2 Sep 87 20:20:46 GMT
From: pollux.usc.edu!pgarg@OBERON.USC.EDU (Pankaj K. Garg)
Organization: University of Southern California, Los Angeles
Subject: Looking for Scheme implementation
Message-Id: <4297@oberon.USC.EDU>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Can someone please point me to an implementation of Scheme, preferably
in Common Lisp?
Thanx...
...pankaj
US Mail: Computer Science Department
University of Southern California
Los Angeles, CA 90089-0782
Phone: (213)743-7995
E-mail: garg@cse.usc.edu
∂03-Sep-87 0013 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Thanks for comments about S&ICP book
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 3 Sep 87 00:13:31 PDT
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 3 Sep 87 02:11:13 EDT
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA03339; Wed, 2 Sep 87 22:53:05 PDT
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 3 Sep 87 01:16:47 GMT
From: xanth!kahn@mcnc.org (Gary I Kahn)
Organization: Old Dominion University, Norfolk Va.
Subject: Thanks for comments about S&ICP book
Message-Id: <2347@xanth.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Thank you for the information about the various Scheme texts and tutorials.
I tried to mail individual notes, but several got returned because I don't
understand the address system well enough.
Gary I. Kahn
kahn@odu.edu
∂03-Sep-87 0409 @MC.LCS.MIT.EDU:gjc@bucsf.bu.edu
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 3 Sep 87 04:09:15 PDT
Received: from bu-cs.BU.EDU (TCP 20061201001) by MC.LCS.MIT.EDU 3 Sep 87 07:06:52 EDT
Received: from bucsf (128.197.2.9) by bu-cs.BU.EDU (3.2/4.7)
id AA04585; Thu, 3 Sep 87 07:04:41 EDT
Return-Path: <gjc@bucsf.bu.edu>
Received: by bucsf (4.12/4.7)
id AA19134; Thu, 3 Sep 87 07:04:48 edt
Date: Thu, 3 Sep 87 07:04:48 edt
From: gjc@bucsf.bu.edu (George J. Carrette)
Message-Id: <8709031104.AA19134@bucsf>
To: scheme@mc.lcs.mit.edu
Whats the cheapest way to get S&ICP? The bookstores seem to have it
for around forty clams.
∂03-Sep-87 0623 @MC.LCS.MIT.EDU:alpert@bu-cs.bu.edu Please remove this address from the mailing list
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 3 Sep 87 06:19:32 PDT
Received: from bu-cs.BU.EDU (TCP 20061201001) by MC.LCS.MIT.EDU 3 Sep 87 09:16:58 EDT
Received: from bucsd.bu.edu by bu-cs.BU.EDU (3.2/4.7)
id AA05932; Thu, 3 Sep 87 09:14:58 EDT
Return-Path: <alpert@bu-cs.bu.edu>
Received: by bucsd.bu.edu (5.31/4.7)
id AA24268; Thu, 3 Sep 87 09:16:04 EDT
Date: Thu, 3 Sep 87 09:16:04 EDT
From: alpert@bu-cs.bu.edu
Message-Id: <8709031316.AA24268@bucsd.bu.edu>
To: scheme@mc.lcs.mit.edu
Subject: Please remove this address from the mailing list
Thank you
∂03-Sep-87 0730 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Looking for Scheme implementation
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 3 Sep 87 07:30:30 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 3 Sep 87 10:13:28 EDT
Date: Thu, 3 Sep 87 10:14:48 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Looking for Scheme implementation
To: pollux.usc.edu!pgarg@OBERON.USC.EDU
cc: scheme@MC.LCS.MIT.EDU
In-reply-to: Msg of 2 Sep 87 20:20:46 GMT from pollux.usc.edu!pgarg at OBERON.USC.EDU (Pankaj K. Garg)
Message-ID: <249725.870903.JAR@AI.AI.MIT.EDU>
I have an ugly and incomplete, but effective, scheme implementation
as a bunch of Common Lisp macros. If you can't FTP it I'll mail it
to you. The files are MC.LCS.MIT.EDU: JAR; PSEUDO > and PSEUDO DOC.
∂03-Sep-87 1147 @MC.LCS.MIT.EDU:ab@bu-cs.bu.edu Please remove my address from the mailing list
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 3 Sep 87 11:47:42 PDT
Received: from bu-cs.BU.EDU (TCP 20061201001) by MC.LCS.MIT.EDU 3 Sep 87 14:15:30 EDT
Received: from bucsd.bu.edu by bu-cs.BU.EDU (3.2/4.7)
id AA19121; Thu, 3 Sep 87 14:11:21 EDT
Return-Path: <ab@bu-cs.bu.edu>
Received: by bucsd.bu.edu (5.31/4.7)
id AA06293; Thu, 3 Sep 87 14:12:26 EDT
Date: Thu, 3 Sep 87 14:12:26 EDT
From: ab@bu-cs.bu.edu
Message-Id: <8709031812.AA06293@bucsd.bu.edu>
To: scheme@mc.lcs.mit.edu
Subject: Please remove my address from the mailing list
Thanks you.
∂08-Sep-87 0845 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA Preemptive garbage collection
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Sep 87 08:45:23 PDT
Received: from mitre-bedford.ARPA (TCP 3200600102) by MC.LCS.MIT.EDU 8 Sep 87 11:31:42 EDT
Posted-From: The MITRE Corp., Bedford, MA
Received: from darwin.sun.uucp by linus.research (3.2/4.7)
id AA24995; Tue, 8 Sep 87 09:36:14 EDT
Posted-Date: Tue, 8 Sep 87 07:54:10 EDT
Received: by darwin.sun.uucp (3.2/SMI-3.0DEV3)
id AA13386; Tue, 8 Sep 87 07:54:10 EDT
Date: Tue, 8 Sep 87 07:54:10 EDT
From: ramsdell%linus@mitre-bedford.ARPA
Message-Id: <8709081154.AA13386@darwin.sun.uucp>
To: rrrs-authors@mc.lcs.mit.edu
Cc: ramsdell%linus@mitre-bedford.ARPA
In-Reply-To: ramsdell@linus's message of Sat, 15 Aug 87 20:37:59 EDT <8708160037.AA07174@darwin.sun.uucp>
Subject: Preemptive garbage collection
To answer my own question, the state of the art in preemptive garbage
collection algorithms seems to be the one by David Ungar, "Generation
Scavenging: A Non-disruptive High Performance Storage Reclamation
Algorithm" in Proc. ACM SIGSOFT/SIGPLAN SE Symp. Practical Software
Development Environments, Pittsburg, PA, April 1984, pp. 157-167. I
say this because at least Franz Inc is going with this garbage
collector for its Sun implementation of Common Lisp and so are the
SmallTalk people. Are there any Scheme implementations going with
this garbage collector?
John
PS The last note used the confusing term "pausing GC" instead of
preemptive GC.
∂09-Sep-87 2235 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU test message, ignore
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Sep 87 22:35:29 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 9 Sep 87 22:38:24 EDT
Date: Wed, 9 Sep 87 20:00:53 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: test message, ignore
To: scheme@MC.LCS.MIT.EDU
Reply-to: Scheme-Request@MC.LCS.MIT.EDU
Message-ID: <252467.870909.JAR@AI.AI.MIT.EDU>
[I'm ruthlessly weeding out bad addresses on the list yet again.]
∂10-Sep-87 0549 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu On-line documentation on T and/or CSCHEME.
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 10 Sep 87 05:49:39 PDT
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 10 Sep 87 08:37:01 EDT
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA00901; Thu, 10 Sep 87 05:32:29 PDT
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 10 Sep 87 11:26:33 GMT
From: rich@EDDIE.MIT.EDU (Richard Caloggero)
Organization: MIT EE/CS Computer Facility, Cambridge, MA
Subject: On-line documentation on T and/or CSCHEME.
Message-Id: <6816@eddie.MIT.EDU>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Can anyone out there point me to on-line papers or other documents
on the design and implementation of T or CSCHEME?
Thanx.
-- Rich
∂10-Sep-87 1444 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Wanted: Cscheme5 (In English)
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 10 Sep 87 14:43:51 PDT
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 10 Sep 87 14:09:33 EDT
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA03724; Thu, 10 Sep 87 09:03:18 PDT
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 9 Sep 87 11:23:30 GMT
From: mcvax!kddlab!titcca!secisl!tau@seismo.css.gov ("Yatchan" TAUCHI)
Organization: SECOM Intelligent Systems Laboratory, JAPAN
Subject: Wanted: Cscheme5 (In English)
Message-Id: <1126@secisl.seclab.JUNET>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I got SCOOPS (= Scheme + Object Oriented Programming) which is written
in Cscheme 5 via Network News. Unfortunately I have only old scheme of
Revised Revised Scheme report. I heard it could be got from MIT, but
not sure. If you can have any information of getting Cscheme or you
can distribute it, please send me a Email.
---
Yasuyuki Tauchi
Intelligent Systems Laboratory
SECOM Co Ltd
6-11-23 Shimo-Renjaku
Mitaka, Tokyo 181
JAPAN
JUNET: tau%seclab.junet@kddlabs.jp
UUCP: seismo!kddlab!titcca!secisl!tau
PHONE: 0422-46-5600[japan]
FAX: 0422-48-6841[japan]
∂14-Sep-87 1121 @MC.LCS.MIT.EDU:ADLER1%BRANDEIS.BITNET@MITVMA.MIT.EDU subscription
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 14 Sep 87 11:19:25 PDT
Received: from MITVMA.MIT.EDU (TCP 2227000003) by MC.LCS.MIT.EDU 14 Sep 87 11:37:03 EDT
Received: from (MAILER)MITVMA.BITNET by MITVMA.MIT.EDU on 09/14/87 at
11:33:56 EDT
Received: from BRANDEIS.BITNET (ADLER1) by MITVMA.MIT.EDU (Mailer
X1.25) with
BSMTP id 1897; Mon, 14 Sep 87 11:33:36 EDT
Date: Sun, 13 Sep 87 03:40 EDT
From: <ADLER1%BRANDEIS.BITNET@MITVMA.MIT.EDU>
Subject: subscription
To: scheme@mc.lcs.mit.edu
X-Original-To: scheme@mc.lcs.mit.edu, ADLER1
I sent you a message a while ago requesting that I be added to your mailing
list. If you have not yet done so, please add me to your mailing list.
Thank you.
Sincerely,
ADLER1@BRANDEIS.BITNET
∂15-Sep-87 0209 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Wanted: SCHEME/COMMON-LISP compiler documentation
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 15 Sep 87 02:09:42 PDT
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 15 Sep 87 05:09:14 EDT
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA16117; Tue, 15 Sep 87 01:46:38 PDT
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 14 Sep 87 14:43:54 GMT
From: mcvax!dutrun!dutesta!brouw@seismo.css.gov (Gerard Brouwer)
Organization: Delft University of Technology, Faculty of Electrical Engineering.
Subject: Wanted: SCHEME/COMMON-LISP compiler documentation
Message-Id: <976@dutesta.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
At the Delft University of Technology we are developing an architecture
for a LISP-computer based on Eu-LISP level 0, which is related to
SCHEME. Part of the project is building a compiler for this new
architecture. To gain experience in the usage of SCHEME-based compilers
we will be studying several already existing compilers.
At this moment we are looking for documentation of the following
SCHEME- and COMMON-LISP-implementations:
- T3 (The ORBIT-compiler)
- MIT Scheme
- Scheme48
- Scheme-84
- Kyoto Common Lisp (KCL)
Our special interest is in the compilation techniques used by the various
implementations, such as used intermediate languages, code-generating,
optimization at various levels.
If you have any information and/or documentation available or know where
we can get the information/documentation, please contact us.
Thanks for your cooperation.
Gerard Brouwer UUCP: MCVAX!dutrun!dutesta!brouw
Delft University of Technology
Department of Electrical Engeneering
Section Computer Architecture
P.O. Box 5031
2600 AG Delft, The Netherlands
Phone: 015-785021
015-783644
∂15-Sep-87 2042 @MC.LCS.MIT.EDU:munnari!cidam.oz.au!mg@uunet.UU.NET prolog in scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 15 Sep 87 20:42:04 PDT
Received: from uunet.UU.NET (TCP 30003106601) by MC.LCS.MIT.EDU 15 Sep 87 22:58:05 EDT
Received: from munnari.UUCP by uunet.UU.NET (5.54/1.14) with UUCP
id AA23921; Tue, 15 Sep 87 22:46:45 EDT
Message-Id: <8709160246.AA23921@uunet.UU.NET>
Received: from cidam (via goanna) by munnari.oz with SunIII (5.5)
id AA19656; Wed, 16 Sep 87 12:18:22 EST
Received: by cidam.rmit.oz (4.3+RMIT/4.7)
id AA18688; Wed, 16 Sep 87 08:13:02 EST
Date: Wed, 16 Sep 87 08:13:02 EST
From: munnari!cidam.rmit.oz!mg@uunet.UU.NET (Mike A. Gigante)
To: scheme@mc.lcs.mit.edu
Subject: prolog in scheme
Does anyone have such a beast (that you are willing to share)? I know
you can use the query system (as in SICP) in a similar manner to prolog
but is not really enough. It would also require a *lot* of efficiency
hacking for any serious use...
Any dialect of scheme would be ok.
Mike
∂21-Sep-87 1400 @MC.LCS.MIT.EDU:jinx@GENEVA.AI.MIT.EDU Wanted: Cscheme5 (In English)
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 21 Sep 87 14:00:22 PDT
Received: from geneva (TCP 2206400372) by MC.LCS.MIT.EDU 21 Sep 87 13:36:47 EDT
Received: by GENEVA.AI.MIT.EDU; Mon, 21 Sep 87 13:26:38 edt
Date: Mon, 21 Sep 87 13:26:38 edt
From: jinx@GENEVA.AI.MIT.EDU (Guillermo J. Rozas)
Message-Id: <8709211726.AA27744@geneva>
To: mcvax!kddlab!titcca!secisl!tau@seismo.css.gov (TAUCHI)
Cc: scheme@mc.lcs.mit.edu
In-Reply-To: ("Yatchan" TAUCHI's message of 9 Sep 87 11:23:30 GMT <1126@secisl.seclab.JUNET>
Subject: Wanted: Cscheme5 (In English)
Reply-To: jinx@zurich.ai.mit.edu
I got SCOOPS (= Scheme + Object Oriented Programming) which is written
in Cscheme 5 via Network News. Unfortunately I have only old scheme of
Revised Revised Scheme report. I heard it could be got from MIT, but
not sure. If you can have any information of getting Cscheme or you
can distribute it, please send me a Email.
There are two main ways of obtaining CScheme
Arpanet/Internet FTP:
host prep.ai.mit.edu contains a tar file (and a compressed tar file)
of the distribution directory. You can log in as scheme, password
scheme. The files are /scheme/dist.tar and /scheme/dist.tar.Z
Tape:
We'll send you a tar tape if you send a check for US $200 to
Scheme Distribution
co Prof. Hal Abelson
545 Technology Sq.
Cambridge MA 02139
USA
∂22-Sep-87 0121 @MC.LCS.MIT.EDU:ADLER1%BRANDEIS.BITNET@MITVMA.MIT.EDU scoop wanted
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 22 Sep 87 01:20:53 PDT
Received: from MITVMA.MIT.EDU (TCP 2227000003) by MC.LCS.MIT.EDU 22 Sep 87 03:51:40 EDT
Received: from (MAILER)MITVMA.BITNET by MITVMA.MIT.EDU on 09/22/87 at
03:47:22 EDT
Received: from BRANDEIS.BITNET (ADLER1) by MITVMA.MIT.EDU (Mailer
X1.25) with
BSMTP id 5870; Tue, 22 Sep 87 03:47:19 EDT
Date: Tue, 22 Sep 87 03:45 EDT
From: <ADLER1%BRANDEIS.BITNET@MITVMA.MIT.EDU>
Subject: scoop wanted
To: scheme@mc.lcs.mit.edu
X-Original-To: scheme@mc.lcs.mit.edu, ADLER1
From: BINAH::ADLER1 21-SEP-1987 22:43
To: Orig_To! INFO-SCHEME@OZ.AI.MIT.EDU, ADLER1
Subj: SCOOPS WANTED
I'm new on this network. One of the first messages I received suggests that
someone recently distributed a version of SCOOP (= SCheme + Object Oriented
Programming) on the network. I'd be very interested in obtaining a copy.
I believe that the version in question was written on top of CScheme which
I have no difficulty obtaining via ftp.
If you can send me a copy of SCOOP at the following address, I would
appreciate it: ghoti@cauchy.mit.edu
Or, if you can tell me where I can ftp it and how, I'll more simply do that
and avoid possible corruption of the file by the mails. Thanks.
ghoti@cauchy.mit.edu
∂24-Sep-87 2114 @MC.LCS.MIT.EDU:windley@iris.ucdavis.edu using editors
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 24 Sep 87 21:14:27 PDT
Received: from clover.ucdavis.edu (TCP 20036034401) by MC.LCS.MIT.EDU 24 Sep 87 22:46:36 EDT
Received: by clover.ucdavis.edu (5.51/4.7)
id AA29007; Thu, 24 Sep 87 14:09:43 PDT
Received: from localhost.ucdavis.edu.ARPA by iris (1.2/3.14)
id AA00272; Thu, 24 Sep 87 14:10:39 pdt
Message-Id: <8709242110.AA00272@iris>
To: scheme@mc.lcs.mit.edu
Subject: using editors
Date: Thu, 24 Sep 87 14:10:37 PDT
From: windley@iris.ucdavis.edu
I'm new to scheme. Is there a way to call an editor from within
scheme (in particular the student band) like vi to edit programs for
loading and execution?
Phil Windley
Robotics Research Lab
University of California, Davis
∂25-Sep-87 2254 @MC.LCS.MIT.EDU,@RELAY.CS.NET:shneider@cui.unige.chunet Any Scheme for Atari and/or Amiga ?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 25 Sep 87 22:54:22 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 26 Sep 87 01:25:49 EDT
Received: from relay2.cs.net by RELAY.CS.NET id aa12673; 25 Sep 87 11:53 EDT
Received: from switzerland by RELAY.CS.NET id ab17614; 25 Sep 87 11:40 EDT
Received: from ean by SWITZERLAND.CSNET id a023748; 25 Sep 87 17:31 MET DST
From: "Daniel K. Schneider" <shneider%cui.unige.chunet@RELAY.CS.NET>
To: scheme@mc.lcs.mit.edu
MMDF-Warning: Parse error in original version of preceding line at SWITZERLAND.CSNET
Message-ID: <309:shneider@cui.unige.chunet>
Subject: Any Scheme for Atari and/or Amiga ?
Is there any Scheme available for the Atari or the Amiga ?
...... or does somebody plan an implementation?
(I am asking this every 6 month, so far these companies don't seem to worry
about lisp either)
-------
Daniel K.Schneider, ISSCO, University of Geneva, 54 route des Acacias,
1227 Carouge (Switzerland), Tel. (..41) (22) 20 93 33 ext. 2116
--> to EAN/X400/MHS (on Unix, (preferable :]) :
EAN/X400:shneider@cui.unige.ch | if reply does
ARPA: shneider%cui.unige.ch@csnet-relay.arpa | not work,
CSnet: shneider%cui.unige.ch@csnet-relay.csnet | keep trying:
(or:....%relay.cs.net@relay.cs.net) | mailers are
JANET: shneider%cui.unige.ch@cs.ucl.ac.uk | *great* fun!
uucp: mcvax!cernvax!cui!shneider | ;-( |+{ :=[
(note: "ch" used to be called "chunet")
--> to BITNET (on VMS, the easy solution):
BITNET: SCHNEIDE@CGEUGE51 ARPA: SCHNEIDE%CGEUGE51.BITNET@WISCVM
∂28-Sep-87 0922 @MC.LCS.MIT.EDU:EDH%HNYKUN52.BITNET@MITVMA.MIT.EDU Scheme on Atari
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 28 Sep 87 09:22:42 PDT
Received: from MITVMA.MIT.EDU (TCP 2227000003) by MC.LCS.MIT.EDU 28 Sep 87 12:14:57 EDT
Received: from (MAILER)MITVMA.BITNET by MITVMA.MIT.EDU on 09/28/87 at
12:14:20 EDT
Received: from HNYKUN52.BITNET (EDH) by MITVMA.MIT.EDU (Mailer X1.25)
with
BSMTP id 7044; Mon, 28 Sep 87 12:14:17 EDT
Date: Mon, 28 Sep 87 15:13 N
From: <EDH%HNYKUN52.BITNET@MITVMA.MIT.EDU>
Subject: Scheme on Atari
To: SCHEME@MC.LCS.MIT.EDU
X-Original-To: SCHEME@MC.LCS.MIT.EDU, EDH
To: scheme@mc.lcs.mit.edu
Cc:
Subject: Scheme on Atari
From: Edward Hoenkamp <EDH at HNYKUN52.BITNET>
(Arpa: EDH%HNYKUN52.BITNET@WISCVM.WISC.EDU)
Date: Mon Sep 28 15:11:39 1987
---
Since there have been several requests for Scheme from people
possessing an Atari, here is a possible way out.
There are Mac emulators on the Atari. The one I am familiar with,
(the German 'Aladin') I essentially use as an application program
to run MacScheme. It does this wonderfully well, i.e. the
programs I tried (e.g. prolog and Erathosthenes' Sieve from THE book)
run somewhat FASTER emulated, plus you can use the bigger screen,
plus it supports almost 2 megabyte (e.g. for the heap).
E.
(If giving this information is illegal, realize that this text was
generated randomly).
∂28-Sep-87 1109 @MC.LCS.MIT.EDU:jinx@GENEVA.AI.MIT.EDU Any Scheme for Atari and/or Amiga ?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 28 Sep 87 11:09:37 PDT
Received: from geneva (TCP 2206400372) by MC.LCS.MIT.EDU 28 Sep 87 14:03:59 EDT
Received: by GENEVA.AI.MIT.EDU; Mon, 28 Sep 87 14:08:10 edt
Date: Mon, 28 Sep 87 14:08:10 edt
From: jinx@GENEVA.AI.MIT.EDU (Guillermo J. Rozas)
Message-Id: <8709281808.AA02560@geneva>
To: shneider%cui.unige.chunet@RELAY.CS.NET
Cc: scheme@mc.lcs.mit.edu
In-Reply-To: "Daniel K. Schneider"'s message of Sat, 26 Sep 87 02:32:55 edt <309:shneider@cui.unige.chunet>
Subject: Any Scheme for Atari and/or Amiga ?
Reply-To: jinx@zurich.ai.mit.edu
Is there any Scheme available for the Atari or the Amiga ?
...... or does somebody plan an implementation?
I've been told that MIT CScheme runs on the Amiga. MIT CScheme is
relatively portable, so you should be able to bring it up on any
machine with C and a reasonable amount of memory.
∂30-Sep-87 0121 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Wanted Scoops for MacSheme (or help in porting)
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 30 Sep 87 01:21:04 PDT
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 30 Sep 87 04:18:17 EDT
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA11968; Wed, 30 Sep 87 01:16:50 PDT
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 30 Sep 87 04:10:56 GMT
From: sunybcs!boulder!halls@rutgers.edu (Andy Halls)
Organization: University of Colorado, Boulder
Subject: Wanted Scoops for MacSheme (or help in porting)
Message-Id: <2388@sigi.Colorado.EDU>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I've been using MacScheme for several months now and I love it. I want to
start using the Scoops system with it. I got a copy of Scoops provided by
TI. However there are several problems that prevent it from loading into
my system. The two major ones are MacSheme has no syntax function or
define-intergrable (or something like that) I need some clues on how to
translate these guys, or better yet has someone already done it, and are
you willing to mail me a copy?
Andy Halls
mail: 2646 Stuart Street, Denver, CO 80212
phone: home (303) 455-9139 messages (303) 692-5094
uucp: {cires | hao | nbires}boulder!halls
internet: halls@boulder.colorado.edu
∂02-Oct-87 0818 @MC.LCS.MIT.EDU:STCS8004%IRUCCVAX.BITNET@MITVMA.MIT.EDU FreeWare Scheme - IBM PS/2 or AT
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 2 Oct 87 08:18:16 PDT
Received: from MITVMA.MIT.EDU (TCP 2227000003) by MC.LCS.MIT.EDU 2 Oct 87 11:15:26 EDT
Received: from (MAILER)MITVMA.BITNET by MITVMA.MIT.EDU on 10/02/87 at
11:14:13 EDT
Received: from IRUCCIBM.BITNET by MITVMA.MIT.EDU (Mailer X1.25) with
BSMTP id
5720; Fri, 02 Oct 87 11:14:09 EDT
Received: from IRUCCVAX.BITNET by IRUCCIBM.BITNET (Mailer X1.24) with
BSMTP id
2685; Fri, 02 Oct 87 16:01:54 IST
Date: Fri, 2 Oct 87 16:03 GMT
From: STCS8004%IRUCCVAX.BITNET@MITVMA.MIT.EDU
Subject: FreeWare Scheme - IBM PS/2 or AT
To: SCHEME@MC.LCS.MIT.EDU
X-VMS-To: SCHEME,STCS8004
I wish to teach Scheme to 2nd and 3rd Honours CS students and
would like to distribute a Shareware/Freeware version to them for
use on IBM PS/2 1mB+HD and Unisys Micro IT 640kB+HD. Full Scheme
is not essential - a viable subset is quite sufficient. I have a
small subset implemented as an interpreter running under PCLisp
(subset Franz) broadly modelled on Abelson and Sussman, but this is
far too slow and lacks diagnostics at the Scheme level. Information
on what is available free would be most welcome. G. Oulsnam.
∂03-Oct-87 0411 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu ibm-pc compatible CScheme compiler
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 3 Oct 87 04:11:29 PDT
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 3 Oct 87 07:06:44 EDT
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA06342; Sat, 3 Oct 87 03:51:10 PDT
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 3 Oct 87 07:19:42 GMT
From: sunybcs!uggorman@rutgers.edu (Jeffrey Gorman)
Organization: SUNY/Buffalo Computer Science
Subject: ibm-pc compatible CScheme compiler
Message-Id: <5637@sunybcs.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Hi, does anyone have a CScheme compiler for the Tandy 1000? I could really use
one
Jeff
∂03-Oct-87 2309 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Scheme needed for the VAX-780
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 3 Oct 87 23:09:34 PDT
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 4 Oct 87 02:06:52 EDT
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA19954; Sat, 3 Oct 87 22:54:34 PDT
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 4 Oct 87 01:12:17 GMT
From: gumby!quale@rsch.wisc.edu (Douglas Quale)
Organization: U of Wisconsin CS Dept
Subject: Scheme needed for the VAX-780
Message-Id: <1067@gumby.wisc.edu>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Help! Desperately seeking Scheme!
I'm an undergrad at the UW-Madison, and no one here groks lisp.
The only lisp available at Madison is Franz, and frankly I'd rather have an
appendectomy. I would like to have a lexically-scoped lisp which has a
consistent treatment of procedures as objects, i.e. Scheme.
My first exposure to lisp was in an MIT AI Memo by Guy L. Steele and Gerry
Sussman, "The Art of the Interpreter, or the Modularity Complex Parts 0, 1,
2 and 3." I used to program in Pascal, but once I read Abelson and Sussman's
"The Structure and Interpretation of Computer Programs," I knew I was hooked.
(I have the Revised**3 Report on Scheme and Slade's book on the Yale T dialect
of Scheme.)
I think there was a posting (by Gerry Sussman himself?) explaining how to
obtain MIT's CScheme, but I missed it.
If anyone has any info on how I could get a Scheme system for the VAX under
UNIX, I would literally be eternally grateful. I try to watch this newsgroup
or you can e-mail me, quale@gumby.wis.edu .
Tx 1E+06 ...
D. Quale
P.S. If anyone could convince Dr. Steele or Dr. Sussman to write the promised
sequel to "The Art of the Interpreter," I'd love to see it.
∂04-Oct-87 1113 @MC.LCS.MIT.EDU:KSWANSON%SUNRISE.BITNET@MITVMA.MIT.EDU R↑3RS
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 4 Oct 87 11:13:34 PDT
Received: from MITVMA.MIT.EDU (TCP 2227000003) by MC.LCS.MIT.EDU 4 Oct 87 14:07:48 EDT
Received: from (MAILER)MITVMA.BITNET by MITVMA.MIT.EDU on 10/04/87 at
14:06:30 EDT
Received: from SUNRISE.BITNET (KSWANSON) by MITVMA.MIT.EDU (Mailer
X1.25) with
BSMTP id 0627; Sun, 04 Oct 87 14:06:27 EDT
Date: Sun, 4 Oct 87 13:50 EST
From: <KSWANSON%SUNRISE.BITNET@MITVMA.MIT.EDU>
Subject: R↑3RS
To: scheme@mc.lcs.mit.edu
X-Original-To: scheme@mc.lcs.mit.edu
How can I get a copy of the R↑3RS definition of Scheme?
∂05-Oct-87 0936 @MC.LCS.MIT.EDU:RMACHUCA@SIMTEL20.ARPA Tex and Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 5 Oct 87 09:36:20 PDT
Received: from SIMTEL20.ARPA (TCP 3200000112) by MC.LCS.MIT.EDU 5 Oct 87 12:32:39 EDT
Date: Mon, 5 Oct 87 10:30:48 MDT
From: Raul Machuca <RMACHUCA@SIMTEL20.ARPA>
Subject: Tex and Scheme
To: scheme@MC.LCS.MIT.EDU
Message-ID: <12340084883.9.RMACHUCA@SIMTEL20.ARPA>
Does anyone know of some Tex ,Latex type program that can
be used to produce formatted and documented Scheme code.
-------
∂05-Oct-87 1941 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU R↑3RS
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 5 Oct 87 19:41:02 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 5 Oct 87 22:09:36 EDT
Date: Mon, 5 Oct 87 22:16:55 EDT
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: R↑3RS
To: KSWANSON%SUNRISE.BITNET@MITVMA.MIT.EDU
cc: scheme@MC.LCS.MIT.EDU
In-reply-to: Msg of Sun 4 Oct 87 13:50 EST from <KSWANSON%SUNRISE.BITNET at MITVMA.MIT.EDU>
Message-ID: <265032.871005.JAR@AI.AI.MIT.EDU>
Date: Sun, 4 Oct 87 13:50 EST
From: <KSWANSON%SUNRISE.BITNET at MITVMA.MIT.EDU>
To: scheme at mc.lcs.mit.edu
Re: R↑3RS
How can I get a copy of the R↑3RS definition of Scheme?
It's in SIGPLAN Notices 21(12), December 1986. It can also be ordered
from:
Elizabeth Heepe
Publications, Room NE43-818
MIT Artifical Intelligence Laboratory
545 Technology Square
Cambridge MA 02139
Ask for MIT AI Memo 848a, and enclose a check for $6.00 per copy (U.S.
funds) payable to the MIT Artificial Intelligence Laboratory.
It may also be available from the Indiana University CS Department, but
I don't have information on that.
∂06-Oct-87 0753 @MC.LCS.MIT.EDU:U04Z%CBEBDA3T.BITNET@MITVMA.MIT.EDU Re: TeX and Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 6 Oct 87 07:53:38 PDT
Received: from MITVMA.MIT.EDU (TCP 2227000003) by MC.LCS.MIT.EDU 6 Oct 87 10:49:14 EDT
Received: from (MAILER)MITVMA.BITNET by MITVMA.MIT.EDU on 10/06/87 at
10:07:04 EDT
Received: from CEARN.BITNET by MITVMA.MIT.EDU (Mailer X1.25) with BSMTP
id
6697; Tue, 06 Oct 87 10:07:01 EDT
Received: from CBEBDA3T.BITNET (U04Z) by CEARN.BITNET (Mailer X1.25)
with BSMTP
id 5122; Tue, 06 Oct 87 08:36:37 GVA
Date: 06 OCT 87 08:25 GMT
To: scheme@mc.lcs.mit.edu ,
rmachuca@simtel.arpa
From: U04Z%CBEBDA3T.BITNET@MITVMA.MIT.EDU (Igor Metz, Dept. of CS,
CH-Bern)
Subject: Re: TeX and Scheme
> Does anyone know of some Tex ,Latex type program that can
> be used to produce formatted and documented Scheme code.
If you have UNIX TeX try tgrind !
Igor
∂06-Oct-87 1808 @MC.LCS.MIT.EDU:RKIRCHNE%carleton.edu@RELAY.CS.NET R↑3RS
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 6 Oct 87 18:08:23 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 6 Oct 87 20:56:22 EDT
Received: from [128.89.1.80] by RELAY.CS.NET id ab01321; 6 Oct 87 20:24 EDT
Received: from carleton.edu by RELAY.CS.NET id ac11776; 6 Oct 87 20:19 EDT
Date: Tue, 6 Oct 87 05:59 CST
From: RKIRCHNE%carleton.edu@RELAY.CS.NET
Subject: R↑3RS
To: scheme@mc.lcs.mit.edu
X-VMS-To: IN%"scheme@mc.lcs.mit.edu"
R↑3RS is also included with the documentation for TI's PC Scheme version 3.
I just upgraded to it. Also included as one of several sample files is
Kent Dybvig's extend-syntax, which is described in his book and included
as a standard feature in Chez Scheme v 2. extend-syntax is incredibly
powerful for defining special forms -- all one has to do is describe
patterns.
Someone was looking for Scheme for a VAX. I highly recommend Chez Scheme
by Kent Dybvig (dybvig@indiana.csnet, I think) distributed by Cadence
Associates (or something like that). Academic pricing for VMS, other
versions is very reasonable. Someone with accurate info should respond.
Someone else was looking for a Scheme compiler for a Tandy 1000. I should
think TI's PC Scheme would work. It is really excellent.
PC Scheme v 3.0 uses #T and #F instead of #!TRUE and #!FALSE, the same as
Chez Scheme. That is much cleaner.
Quasiquote expressions can be nested, and UNQUOTE, UNQUOTE-SPLICING key
words have been added.
Graphics now supports EGA 640 x 350 resolution. That is the improvement
I was looking for. New graphics functions are GET-PEN-COLOR, GET-PEN-
POSITION, POINT-COLOR, and SET-CLIPPING-RECTANGLE. EGA 640 x 200 is also
supported. Also, GRAPHICS-WINDOW for creating graphics windows is
described in the release notes, but undocumented.
Transcendental functions are computed using a new feature which allows
programs compiled from C or Turbo Pascal to be called from Scheme. An
8087 (80287) is used if present.
READ-LINE now echos to the screen when used to read from the console or
a window.
There are lots of other improvements. There is a one change from conforming
to nonconforming with the Report. The form (DEFINE ( ... ) ...) no
longer expands to a NAMED-LAMBDA. But this can still be forced by setting
PCS-INTEGRATE-DEFINE to ().
Roger Kirchner rkirchne@carleton.edu.csnet
∂07-Oct-87 0031 NET-ORIGIN@MC.LCS.MIT.EDU Re: TeX and Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 7 Oct 87 00:30:58 PDT
Received: from EDDIE.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 7 OCT 87 03:28:11 EDT
Received: by EDDIE.MIT.EDU with UUCP with smail2.5 with sendmail-5.45/4.7 id <AA28375@EDDIE.MIT.EDU>; Wed, 7 Oct 87 03:24:24 EDT
Received: by xanth.cs.odu.edu (5.51/odu-gateway)
id AA23003; Wed, 7 Oct 87 03:17:07 EDT
To: mail-scheme@xanth.cs.odu.edu
Path: xanth!uucp
From: "Igor Metz, Dept. of CS,"-a news@xanth.cs.odu.edu
Newsgroups: mail.scheme
Subject: Re: TeX and Scheme
Message-Id: <2672@xanth.UUCP>
Date: 7 Oct 87 07:17:03 GMT
Sender: uucp@xanth.cs.odu.edu
Lines: 9
> Does anyone know of some Tex ,Latex type program that can
> be used to produce formatted and documented Scheme code.
If you have UNIX TeX try tgrind !
Igor
∂08-Oct-87 2114 @MC.LCS.MIT.EDU:dyb@iuvax.cs.indiana.edu Re: R↑3RS
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Oct 87 21:14:31 PDT
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 9 Oct 87 00:08:57 EDT
Date: Thu, 8 Oct 87 23:06:36 est
From: R. Kent Dybvig <dyb@iuvax.cs.indiana.edu>
To: scheme@mc.lcs.mit.edu
Subject: Re: R↑3RS
From: RKIRCHNE%carleton.edu@RELAY.CS.NET
Subject: R↑3RS
To: scheme@mc.lcs.mit.edu
R↑3RS is also included with the documentation for TI's PC Scheme version 3.
I just upgraded to it. Also included as one of several sample files is
Kent Dybvig's extend-syntax, which is described in his book and included
as a standard feature in Chez Scheme v 2. extend-syntax is incredibly
powerful for defining special forms -- all one has to do is describe
patterns.
Actually, extend-syntax is of Eugene Kohlbecker's design, and represents
part of his doctoral research here at Indiana. The implementation may
well be mine, however, as I did give one to TI along with permission to
distribute it.
Someone was looking for Scheme for a VAX. I highly recommend Chez Scheme
by Kent Dybvig (dybvig@indiana.csnet, I think) distributed by Cadence
Associates (or something like that). Academic pricing for VMS, other
versions is very reasonable. Someone with accurate info should respond.
If anyone desires information about Chez Scheme for VAX, Sun, or Apollo
computers, please send me electronic mail and I'll see that you are sent
some information (include your physical mailing address). Or contact:
Cadence Research Systems
620 Park Ridge Road
P.O. Box 5031
Bloomington, IN 47407
Kent
R. Kent Dybvig | arpa: dyb@iuvax.cs.indiana.edu
Computer Science Department | csnet: dyb@indiana
Indiana University | usenet: ...!ihnp4!iuvax!dyb
Bloomington, IN 47405 | phone: 812/335-6486
∂09-Oct-87 1738 @MC.LCS.MIT.EDU,@RELAY.CS.NET:RKIRCHNE@carleton.edu Some corrections
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Oct 87 17:37:09 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 9 Oct 87 20:34:42 EDT
Received: from relay2.cs.net by RELAY.CS.NET id ad13121; 9 Oct 87 20:05 EDT
Received: from carleton.edu by RELAY.CS.NET id aj02782; 9 Oct 87 20:04 EDT
Date: Fri, 9 Oct 87 05:35 CST
From: RKIRCHNE%carleton.edu@RELAY.CS.NET
Subject: Some corrections
To: scheme@mc.lcs.mit.edu
X-VMS-To: IN%"scheme@mc.lcs.mit.edu"
My note on TI's PC Scheme and Indiana's Chez Scheme had some errors.
1. From jinx@zurich.ai.mit.edu -- PC's Scheme's change with respect
to (define ( ... ) ...) expansion DOES conform to R↑3RS.
2. From Dan Friedman -- Eugene Kohlbecker created the remarkable
extend-syntax. Kent Dybvig implemented a version of it in Chez
Scheme.
3. From AI Magazine, Fall 87 p94 -- It is Cadence Research Systems,
P.O. 5031, Bloomington, Indiana 47402, not Cadence Associates that
distributes Chez Scheme. Sue Rykovich (812)333-9269 handles
marketing.
Version 2.0 runs on: VAX 4.2 BSD Unix, 4.3 BSD Unix, Ultrix and VMS,
Sun-3 SunOS, and Apollo Domain/IX. Educational price is 50% of $1500.
Roger Kirchner
∂13-Oct-87 1006 @MC.LCS.MIT.EDU:esosun!vor!jackson@sdcsvax.ucsd.edu Tao, Sues...
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 13 Oct 87 10:06:50 PDT
Received: from sdcsvax.UCSD.EDU (TCP 3201200003) by MC.LCS.MIT.EDU 13 Oct 87 12:07:42 EDT
Received: by sdcsvax.UCSD.EDU (5.57/5.0)
id AA03158 for scheme@MC.LCS.MIT.EDU; Tue, 13 Oct 87 08:04:22 PST
Received: from vor.esosun.uucp by esosun.uucp (3.2/SMI-3.0DEV3)
id AA08799; Tue, 13 Oct 87 08:45:44 PDT
Received: by vor.esosun.uucp (3.2/SMI-3.0DEV3)
id AA04566; Tue, 13 Oct 87 08:45:43 PDT
Date: Tue, 13 Oct 87 08:45:43 PDT
From: esosun!vor!jackson@sdcsvax.ucsd.edu (Jerry Jackson)
Message-Id: <8710131545.AA04566@vor.esosun.uucp>
To: sdcsvax!mc.lcs.mit.edu!scheme
Subject: Tao, Sues...
Cc: vor!jackson
I recently saw the languages Tao and Sues (strongly related to
scheme, I believe..) mentioned in an article in LISP Pointers.
Can anyone point me to any references?
--Thanks
∂14-Oct-87 1850 @MC.LCS.MIT.EDU,@RELAY.CS.NET:jmiller@BRANDEIS.CSNET MultiScheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 14 Oct 87 18:50:00 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 14 Oct 87 21:32:04 EDT
Received: from relay2.cs.net by RELAY.CS.NET id ag17856; 14 Oct 87 19:26 EDT
Received: from brandeis by csnet-relay.csnet id am05909; 14 Oct 87 19:23 EDT
Received: by brandeis.ARPA (5.51/4.7)
id AA10286; Wed, 14 Oct 87 16:13:06 EDT
Date: Wed, 14 Oct 87 16:13:06 EDT
From: James Miller <jmiller%brandeis.csnet@RELAY.CS.NET>
To: Scheme%MC.LCS.MIT.EDU@RELAY.CS.NET
Subject: MultiScheme
My dissertation, "MultiScheme: A Parallel Processing System Based on
MIT Scheme," is available from the MIT Lab for Computer Science
publications office (545 Technology Square, Cambridge, MA 02139), as
MIT/LCS/TR-402. It reports on an implementation of Scheme extended to
support the FUTURE construct and speculative computation. It has a
number of examples showing relationships to: embedding logic variables
in Scheme, McCarthy's AMB and fair merge, higher order streams
processing, data-flow parallelism, and so forth.
The current release of MIT CScheme contains a serial processor
implementation of the work reported in the thesis. BBN's Butterfly
Lisp product is based directly on the (truly parallel) implementation.
--Jim Miller
Brandeis University
∂16-Oct-87 0402 @MC.LCS.MIT.EDU,@RELAY.CS.NET:sasha@COLGATE.CSNET visit on 11/9?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 16 Oct 87 04:02:35 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 16 Oct 87 06:58:56 EDT
Received: from relay2.cs.net by RELAY.CS.NET id ab14385; 16 Oct 87 5:26 EDT
Received: from colgate by csnet-relay.csnet id ae15545; 16 Oct 87 5:24 EDT
Received: by colgate (5.51/)
id AA01195; Thu, 15 Oct 87 14:29:13 EDT
Date: Thu, 15 Oct 87 14:29:13 EDT
From: "A. Nakhimovsky" <sasha%colgate.csnet@RELAY.CS.NET>
To: scheme%mc.lcs.mit.edu@RELAY.CS.NET
Subject: visit on 11/9?
I'm teaching a course based on Abelson & Sussman cum scheme this coming
spring for the first time. I'll be in Cambridge Nov. 9: can I visit,
talk to the instructor, look at your syllabus, assignments etc? What
would be a good time?
A. Nakhimovsky (scnet: sasha@colgate)
∂17-Oct-87 2226 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu CScheme question
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 17 Oct 87 22:26:41 PDT
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 17 Oct 87 23:26:29 EDT
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA08392; Fri, 16 Oct 87 03:55:47 PDT
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 15 Oct 87 01:36:49 GMT
From: russell!evan@labrea.stanford.edu (Evan Kirshenbaum)
Organization: Center for the Study of Language and Information, Stanford U.
Subject: CScheme question
Message-Id: <430@russell.STANFORD.EDU>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I recently started using CScheme, and I have a question about the
efficiency of the compiler. When writing macros, a common idiom I use
is:
`(lambda ,args
(let (,@(and var1
`((,var1 ,(generate-uninterned-symbol))))
,@(and var2
`((,var2 ,(generate-uninterned-symbol))))
...)
...))
where temporary variables are gensymed only if they are needed. If no
variables are needed, what comes out is
(lambda (x y z)
(let ()
...))
Now in any other lisp/scheme the internal let binding would be
discarded. In CScheme, it would seem that the internal environment
would have to be created because of the way define works. I use this
idiom a lot, and wind up with functions that pp as (let () (let ()
...)). My question is: is the compiler smart enough to realize that
no defines occur in the body, and so no environment is needed, or do I
have to make macros condition on the presence/absence of temporary
variables?
---
Evan Kirshenbaum
Stanford University
evan@CSLI.STANFORD.EDU
...!{ucbvax,decvax}!decwrl!glacier!evan
If you think my opinions represent this university,
you haven't been on campus recently!
∂17-Oct-87 2324 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: MultiScheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 17 Oct 87 23:24:10 PDT
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 17 Oct 87 23:28:02 EDT
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA23830; Fri, 16 Oct 87 17:42:13 PDT
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 16 Oct 87 22:18:43 GMT
From: rich@eddie.mit.edu (Richard Caloggero)
Organization: MIT, EE/CS Computer Facilities, Cambridge, MA
Subject: Re: MultiScheme
Message-Id: <7184@eddie.MIT.EDU>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
In article <8710150621.AA02160@ucbvax.Berkeley.EDU> jmiller@brandeis.CSNET (James Miller) writes:
>My dissertation, "MultiScheme: A Parallel Processing System Based on
>MIT Scheme," is available from the MIT Lab for Computer Science
>publications office (545 Technology Square, Cambridge, MA 02139), as
>MIT/LCS/TR-402.
> .
> .
> .
>
>--Jim Miller
>Brandeis University
I am extremely interested in seeing a copy of this report.
The problem is that I am blind, and thus neesome kind of
on-line representation of the text
(alternatively, I guess, I could have it put on tape, but this could take ++forever++)!
Is there some way I could obtain a copy of the document?
I suspect copyrighting problems might get in the way -- don't know much
about the legal stuff ...
Can you, or someone out there help me out?
I alsk posted a general query for some sort of documentation on CSCHEME and/or yales T
implementation details.
Might anyone be able to help me with regards to this?
Thanx ...
∂19-Oct-87 1350 @MC.LCS.MIT.EDU:bartlett@decwrl.dec.com Type inference in Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 19 Oct 87 13:50:08 PDT
Received: from sonora.dec.com (TCP 20013200064) by MC.LCS.MIT.EDU 19 Oct 87 16:41:56 EDT
Received: from saturn.dec.com by sonora.dec.com (5.54.4/4.7.34)
id AA21938; Mon, 19 Oct 87 13:39:57 PDT
Received: by saturn.dec.com (5.54.3/4.7.34)
id AA21594; Mon, 19 Oct 87 13:41:53 PDT
From: bartlett@decwrl.dec.com (Joel Bartlett)
Message-Id: <8710192041.AA21594@saturn.dec.com>
Date: 19 Oct 1987 1341-PDT (Monday)
To: scheme@mc.lcs.mit.edu
Cc: bartlett@decwrl.dec.com
Subject: Type inference in Scheme
I am interested in using type inference to get faster code out of my
Scheme compiler. I'd greatly appreciate pointers to any existing work in
that area. I'll summarize and send out the replies (if any) that I get.
thanks,
Joel
∂20-Oct-87 0023 @MC.LCS.MIT.EDU,@RELAY.CS.NET:wand@corwin.ccs.northeastern.edu Type inference in Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 20 Oct 87 00:23:43 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 20 Oct 87 03:20:48 EDT
Received: from relay2.cs.net by RELAY.CS.NET id af19942; 20 Oct 87 0:22 EDT
Received: from northeastern.edu by RELAY.CS.NET id ai09803; 20 Oct 87 0:21 EDT
Received: from corwin.ccs.northeastern.edu by
nuhub.acs.northeastern.edu; Mon, 19 Oct 87 22:35 EDT
Received: by corwin.CCS.Northeastern.EDU (5.51/5.17)
id AA01690; Mon, 19 Oct 87 22:05:08 EDT
Date: Mon, 19 Oct 87 22:05:08 EDT
From: wand%corwin.ccs.northeastern.edu@RELAY.CS.NET
To: bartlett@decwrl.dec.com
Cc: scheme@mc.lcs.mit.edu
In-Reply-To: Joel Bartlett's message of 19 Oct 1987 1341-PDT (Monday)
Subject: Type inference in Scheme
From: Joel Bartlett <bartlett@decwrl.dec.com>
Date: 19 Oct 1987 1341-PDT (Monday)
To: scheme@mc.lcs.mit.edu
Cc: bartlett@decwrl.dec.com
Subject: Type inference in Scheme
I am interested in using type inference to get faster code out of my
Scheme compiler. I'd greatly appreciate pointers to any existing work in
that area. I'll summarize and send out the replies (if any) that I get.
thanks,
Joel
You should look at my SPS (Semantic Prototyping System) which includes, among
other things, an ML-style type inference system for a pretty good chunk of
Scheme. This is available for ftp at Indiana (write cth@iucs.cs.indiana.edu
for details), else I can send you a tape. A hardcopy writeup is in the
Proceedings of the 1984 SIGPLAN Compiler Construction Conference. If you send
me your address, I'll send you a copy.
Mitchell Wand
College of Computer Science
Northeastern University
360 Huntington Avenue #161CN
Boston, MA 02115
CSNet: wand@corwin.ccs.northeastern.edu
∂21-Oct-87 1244 @MC.LCS.MIT.EDU:chaynes@iuvax.cs.indiana.edu Scheme84 and SPS ftp
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 21 Oct 87 12:44:03 PDT
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 21 Oct 87 15:35:12 EDT
Date: Wed, 21 Oct 87 14:34:15 est
From: Chris Haynes <chaynes@iuvax.cs.indiana.edu>
To: scheme@mc.lcs.mit.edu
Cc: mw@iuvax.cs.indiana.edu
Subject: Scheme84 and SPS ftp
Scheme84 and SPS are available on iuvax.cs.indiana.edu via ftp (login:
anonymous, with any password) as /usr/ftp/pub/scheme84 and
/usr/ftp/pub/SPS, respectively.
∂21-Oct-87 1357 @MC.LCS.MIT.EDU,@RELAY.CS.NET:wand@corwin.ccs.northeastern.edu Semantic Prototyping System
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 21 Oct 87 13:57:43 PDT
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 21 Oct 87 16:41:21 EDT
Received: from relay2.cs.net by RELAY.CS.NET id ab17462; 21 Oct 87 16:19 EDT
Received: from northeastern.edu by RELAY.CS.NET id ag22181; 21 Oct 87 16:13 EDT
Received: from corwin.ccs.northeastern.edu by
nuhub.acs.northeastern.edu; Wed, 21 Oct 87 13:35 EDT
Received: by corwin.CCS.Northeastern.EDU (5.51/5.17)
id AA10753; Wed, 21 Oct 87 13:08:14 EDT
Date: Wed, 21 Oct 87 13:08:14 EDT
From: wand%corwin.ccs.northeastern.edu@RELAY.CS.NET
To: scheme@mc.lcs.mit.edu
Cc: bartlett@decwrl.dec.com, newton@CSVAX.CALTECH.EDU, mkatz@A.ISI.EDU,
laubsch%hpljl@hplabs.hp.com, sgr@SCRC-STONY-BROOK.ARPA,
tommy%colgate.csnet@RELAY.CS.NET, twleung@ATHENA.MIT.EDU,
finin@BIGBURD.PRC.UNISYS.COM, gudeman%arizona.edu@RELAY.CS.NET,
kanderso@WILMA.BBN.COM
Subject: Semantic Prototyping System
In response to numerous requests:
Scheme84 and SPS are available on iuvax.cs.indiana.edu via ftp (login:
anonymous, with any password) as /usr/ftp/pub/scheme84 and
/usr/ftp/pub/SPS, respectively.
Mitchell Wand
College of Computer Science
Northeastern University
360 Huntington Avenue #161CN
Boston, MA 02115
CSNet: wand@corwin.ccs.northeastern.edu
∂21-Oct-87 1831 @MC.LCS.MIT.EDU:bartlett@decwrl.dec.com Type Inference in Scheme Summary
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 21 Oct 87 18:31:37 PDT
Received: from sonora.dec.com (TCP 20013200064) by MC.LCS.MIT.EDU 21 Oct 87 21:27:06 EDT
Received: from saturn.dec.com by sonora.dec.com (5.54.4/4.7.34)
id AA14559; Wed, 21 Oct 87 18:25:18 PDT
Received: by saturn.dec.com (5.54.3/4.7.34)
id AA02608; Wed, 21 Oct 87 18:27:13 PDT
From: bartlett@decwrl.dec.com (Joel Bartlett)
Message-Id: <8710220127.AA02608@saturn.dec.com>
Date: 21 Oct 1987 1827-PDT (Wednesday)
To: scheme@mc.lcs.mit.edu
Cc:
Subject: Type Inference in Scheme Summary
The question:
I am interested in using type inference to get faster code out of my
Scheme compiler. I'd greatly appreciate pointers to any existing work in
that area...
Responses:
You should look at my SPS (Semantic Prototyping System) which includes, among
other things, an ML-style type inference system for a pretty good chunk of
Scheme. A hardcopy writeup is in the Proceedings of the 1984 SIGPLAN Compiler
Construction Conference.
Scheme84 and SPS are available on iuvax.cs.indiana.edu via ftp (login:
anonymous, with any password) as /usr/ftp/pub/scheme84 and
/usr/ftp/pub/SPS, respectively.
Mitchell Wand
College of Computer Science
Northeastern University
360 Huntington Avenue #161CN
Boston, MA 02115
CSNet: wand@corwin.ccs.northeastern.edu
--
Here is one of the definitive papers on Type Inference:
Robin Milner. "A Theory of Type Polymorphics in Programming"
_Journal of Computer and System Sciences_, 17 348-375 December 1978.
It describes his system of polymorphism in the language ML.
Jamey Hicks (jamey@xn.ll.mit.edu)
--
A type inference system for Common Lisp is described in "Lisp Pointers",
Vol 1, No. 2. The author is Randall D. Beer (beer%case@CSNET-RELAY.ARPA).
Thanks for the pointers,
jfb
∂22-Oct-87 2305 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Where can I get C-Scheme?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 22 Oct 87 23:05:13 PDT
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 23 Oct 87 01:29:53 EDT
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA22303; Thu, 22 Oct 87 22:18:09 PDT
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 22 Oct 87 17:34:32 GMT
From: gti%psuvm.bitnet@ucbvax.Berkeley.EDU (Leon Geesey)
Organization: The Pennsylvania State University - Computation Center
Subject: Where can I get C-Scheme?
Message-Id: <23060GTI@PSUVM>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I was wondering where I could get the source for C-Scheme?
I have FTP access and would like to get C-scheme up and
running on a PC.
leon geesey
∂23-Oct-87 0604 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: Where can I get C-Scheme?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Oct 87 06:03:57 PDT
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 23 Oct 87 08:59:38 EDT
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA29382; Fri, 23 Oct 87 05:52:16 PDT
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 23 Oct 87 11:31:17 GMT
From: fxgrp!ljz@ames.arpa (Lloyd Zusman)
Organization: FX Development Group, Inc., Mountain View, CA
Subject: Re: Where can I get C-Scheme?
Message-Id: <129@fxgrp.UUCP>
References: <23060GTI@PSUVM>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
In article <23060GTI@PSUVM> GTI@PSUVM.BITNET (Leon Geesey) writes:
>I was wondering where I could get the source for C-Scheme?
>I have FTP access and would like to get C-scheme up and
>running on a PC.
Same here. Respond via mail.
Thanks!
--
Lloyd Zusman, Master Byte Software, Los Gatos, California
"When your software gets hard, go Master Byte."
...!ames!fxgrp!ljz
∂23-Oct-87 1035 @MC.LCS.MIT.EDU:jinx@GENEVA.AI.MIT.EDU C Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Oct 87 10:35:40 PDT
Received: from geneva (TCP 2206400372) by MC.LCS.MIT.EDU 23 Oct 87 13:33:14 EDT
Received: by GENEVA.AI.MIT.EDU; Fri, 23 Oct 87 13:38:18 edt
Date: Fri, 23 Oct 87 13:38:18 edt
From: jinx@GENEVA.AI.MIT.EDU (Guillermo J. Rozas)
Message-Id: <8710231738.AA15403@geneva>
To: scheme@mc
Subject: C Scheme
Reply-To: jinx@zurich.ai.mit.edu
*** NOTE ***
Please do not send C Scheme specific questions to this mailing list
(scheme@mc.lcs.mit.edu).
Send them instead to info-cscheme%oz@mc.lcs.mit.edu .
If you have problems getting in touch, AS A LAST RESORT, send them to
scheme-request@mc.lcs.mit.edu. They'll be forwarded to the right
place.
Thank you.
∂23-Oct-87 2121 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Scheme in the real world
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Oct 87 21:21:44 PDT
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 23 Oct 87 23:49:58 EDT
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA15430; Fri, 23 Oct 87 20:02:43 PDT
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 23 Oct 87 18:50:08 GMT
From: tektronix!reed!percival!baer@ucbvax.Berkeley.EDU (Ken Baer)
Organization: Percy's UNIX, Portland, OR.
Subject: Scheme in the real world
Message-Id: <950@percival.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
(Hey LineEater, Cdr this!!!)
I went to Oberlin College, where Scheme was strongly emphasised. The Prof
who taught the Scheme courses (Rich Salter), went to Indiana U. Most of
the people I know of that use Scheme, are from there, or have a strong
connection. I am curious who else uses Scheme, especially in the real world
(read corporate and/or commercial world). Oberlin is producing some very
strong Scheme programmers, what companies out there could use these people?
How are these companies using Scheme? I know there's a group at Tektronix
using Scheme, there must be others.
BTW, Oberlin is on Usenet, but they're feed doesn't have this group.
Maybe someone could contact the postmaster there and work something out.
I'm glad to see this group here.
--
-Ken Baer.
"Press the button labeled 'Extreme Emergency' on the console" - The Doctor.
USENET - ...tektronix!reed!percival!baer OR baer@percival.pdx.com
"The Few, The Proud, The Criminally Insane - Oberlin Computer Science" - me.
∂25-Oct-87 1905 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: Scheme in the real world
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 25 Oct 87 19:05:00 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 25 Oct 87 22:02:08 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA22947; Sun, 25 Oct 87 18:53:50 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 24 Oct 87 23:49:49 GMT
From: psuvax1!vu-vlsi!swatsun!hirai@rutgers.edu (Eiji "A.G." Hirai)
Organization: Sun Lab, Swarthmore College PA
Subject: Re: Scheme in the real world
Message-Id: <1346@carthage.swatsun.UUCP>
References: <950@percival.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
In article <950@percival.UUCP> baer@percival.UUCP (Ken Baer) writes:
>
>I went to Oberlin College, where Scheme was strongly emphasised. The Prof
> ...
>connection. I am curious who else uses Scheme, especially in the real world
We use Scheme here at Swarthmore College in our Programming Languages
class. Our Professor is a devout Scheme evangelist and we are in the
process of being converted (from CommonLisp). Funny that two small liberal
arts collges like Swarthmore and Oberlin are Scheme places. I guess
Swartmore doesn't count as a real world place.
-AG Hirai
--
--
Eiji "A.G." Hirai @ Swarthmore College, Swarthmore PA 19081 | Tel. 215-543-9855
UUCP: {rutgers, ihnp4, cbosgd}!bpa!swatsun!hirai | "All Cretans are liars."
Inter: swatsun!hirai@bpa.bell-atl.com | -Epimenides
Bitnet: vu-vlsi!swatsun!hirai@psuvax1.bitnet | of Cnossus, Crete
∂26-Oct-87 0853 @MC.LCS.MIT.EDU:andy%hobbes@ADS.ARPA applicability of "syntax" constructs
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 26 Oct 87 08:53:11 PST
Received: from ADS.ARPA (TCP 20071200430) by MC.LCS.MIT.EDU 26 Oct 87 11:53:04 EST
Received: by ADS.ARPA (5.57/1.2)
id AA07538; Mon, 26 Oct 87 08:52:22 PST
Received: by hobbes.ads.arpa (3.2/SMI-3.2)
id AA03168; Mon, 26 Oct 87 08:49:51 PST
Date: Mon, 26 Oct 87 08:49:51 PST
From: andy%hobbes@ADS.ARPA (Andy Cromarty)
Message-Id: <8710261649.AA03168@hobbes.ads.arpa>
To: rrrs-authors@mc.lcs.mit.edu
Subject: applicability of "syntax" constructs
Reply-To: andy%hobbes@ads.arpa
[I haven't seen mail from RRRS-AUTHORS for a while; I assume this is
because the list has been dormant, rather than because of a mailer
problem.]
I'd like to solicit views on the question of application of
macros and their first- vs. second-class status in Scheme.
The popular evaluation model for "syntax," as I understand
it, implies that evaluation of (X a b c) will induce Scheme
to look for a "syntax" definition of X before looking for
a normal binding, whereas in (a X b c) the "syntax" definition
of X is not sought by the evaluator and the normal binding, if
any, is used.
Now consider the case where, for example, "a" above is "apply".
I find this troubling. (apply or '(#f #f #t)) "should work," from
the perspective of the programmer. This is true for two reasons:
1. Consistent treatment of operators as viewed from the perspective of
the programmer (vs. the implementor or language designer).
2. Inability to determine when objects may or may not be applied on
a practical basis.
Some time ago we discussed introducing APPLICABLE?; I believe this
was shelved in favor of PROCEDURE?, which of course is not quite the
same thing. I'm especially concerned about what happens once we
define a user-accessible macro capability and let the users loose
with it: in a large system, a given programmer only writes a small
part of the software, but for Scheme the standard interface specification of
a procedure someone else wrote no longer is adequate to tell you
how to use it---you also need to know whether or not it is APPLICABLE?.
Worse, in practice we learn how to use operators by looking at other
people's code rather than from an interface spec (if one even exists),
and even a programmer who is familiar with the principles of Dijkstra
short-circuit AND/OR constructs and so forth would find nothing in
looking at (or #t #f) to would indicate that (apply or '(#t #f))
would be improper.
Even given the availability of some predicate that distinguishes
between syntax and procedures, our code would become
tortuously cluttered if we have to insert checks for APPLICABLE?
throughout our programs whenever we wish to apply (what we hope is)
the procedure bound to a token someone else defined.
This line of reasoning seems to me to lead to a requirement for either
a "smart compiler" or the implementation of macros as first-class objects,
at which point we seem in essence to be talking about FEXPRS/NLAMBDAS.
I've only gotten into this issue far enough for it to bother me, not
far enough to see a clear design solution; perhaps others have more
insight to offer.
asc
∂26-Oct-87 1526 @MC.LCS.MIT.EDU:jinx@GENEVA.AI.MIT.EDU applicability of "syntax" constructs
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 26 Oct 87 15:25:57 PST
Received: from geneva (TCP 2206400372) by MC.LCS.MIT.EDU 26 Oct 87 17:37:57 EST
Received: by GENEVA.AI.MIT.EDU; Mon, 26 Oct 87 17:26:54 est
Date: Mon, 26 Oct 87 17:26:54 est
From: jinx@GENEVA.AI.MIT.EDU (Guillermo J. Rozas)
Message-Id: <8710262226.AA17162@geneva>
To: andy%hobbes@ads.arpa
Cc: rrrs-authors@mc.lcs.mit.edu
In-Reply-To: Andy Cromarty's message of Mon, 26 Oct 87 08:49:51 PST <8710261649.AA03168@hobbes.ads.arpa>
Subject: applicability of "syntax" constructs
Reply-To: jinx@zurich.ai.mit.edu
I'd like to solicit views on the question of application of
macros and their first- vs. second-class status in Scheme. ...
I suspect that the subject is highly controversial, but these are my
views on the matter:
1)
There is a traditional pun used in Lisp. The syntax for special forms
and combinations (procedure calls) is the same. This results in a a
fair amount of convenience, some power, and a great deal of confusion.
A perhaps wiser decision would have been to mark special forms with
square brackets (or squiggly braces, or something like that), rather
than the parentheses used for combinations, but the resulting language
would not be a Lisp.
Your problem arises from trying to view special forms as combinations
(due most likely to this pun), and therefore inquiring about the
status of their (nonexistent) operator.
(if <pred> <conseq> <alternative>)
is part of the syntax of the language. IF is not a "special" operator
which does something "strange". The whole expression (form) is special,
and the only thing in common between it and a combination is the
similarity in surface syntax.
In the same way that no C programmer would think of applying "while"
or "if" to arguments (let alone pass them around), no Scheme programmer
should think of invoking "if", "cond", "lambda", "or", or user defined
special form keywords. The keywords mean nothing by themselves, they
are as good as the parentheses that surround the form, and it makes as
much sense to talk about applying them as about applying parentheses,
semicolons, or spaces.
As far as I know, none of the major implementations of Scheme match
the popular evaluation model you suggest. IF, COND, OR, etc can be
viewed as part of the compiler or preprocessor, and are long gone by
the time the issue of where to find X arises.
In MIT Scheme, which is consistent with this philosophy, the question
of whether IF is APPLICABLE?/PROCEDURE? cannot arise. IF is
"nothing", and the expression
(procedure? if)
is in error, and in fact would cause something like
Error: Unbound variable IF
to be printed.
A different question altogether is whether special form keywords can
be valid variable identifiers, and if so, what happens in case of
conflict.
2)
The "unfortunate" fact of life is that Scheme is an applicative order
language, and some things which could be accomplished conveniently in
a normal order dialect cannot. For example, in the presence of
(define (if pred conseq alt)
(cond (pred conseq)
(else alt)))
the following expression is in error, although the intent was quite
different.
(let ((x 0))
(if (= x 0)
'INFINITY
(/ 1 x)))
To make up for this "deficiency" of the language, we "abuse" special
forms, and define a special form whose KEYWORD is "if" and
accomplishes the desired behavior, but is no substitute for a normal
order IF procedure.
Note that in your example
(apply or '(#f #f #t))
the answer is clear, but what should the answer be in
(let ((x 2))
(apply or (list (= x 2) (begin (write 4) (= x 3)))))
There are many possibilities. The main ones are:
a) 4 is never printed. This would be the case in a "normal order
Scheme". If you choose this one, you've just required APPLY to be a
normal order procedure, and similarly for most other high order
procedures. That is a valid language decision, different from that
made by Scheme's designers. While it has nicer properties than
applicative order, normal order also has some problems, not the least
of which is that no one (as far as I know) knows how to compile normal
order languages efficiently.
b) 4 is printed, and the correct "boolean" value is returned. This
leads to a very ugly semantics: For consistency, you would have
the following two expressions behave differently,
(or (= x 2) (begin (write 4) (= x 3)))
((begin or) (= x 2) (begin (write 4) (= x 3)))
which I think is worse than the original "problem".
3)
Assuming that we are happy with the fact that special forms have no
operators, (and therefore the notion of applying OR is confused), the
problem of distinguishing special form keywords from identifiers whose
values are procedures still remains. This is a matter of
readability/documentation, and a simple solution is the adoption of
conventions.
A suggestion along these lines is to use the same sort of convention
that is already informally followed for predicates (the last character
of their name is ?). For example, user defined special form keywords
could have $ as their first character. The built-in special forms
follow no such conventions, but there are few of them, and most
programmers probably remember them, so we can live with them the way
they are.
∂26-Oct-87 1544 @MC.LCS.MIT.EDU,@RELAY.CS.NET:willc@tekchips.tek.com Re: Scheme in the real world
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 26 Oct 87 15:43:51 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 26 Oct 87 17:38:42 EST
Received: from relay2.cs.net by RELAY.CS.NET id av17137; 26 Oct 87 17:01 EST
Received: from tektronix.tek.com by RELAY.CS.NET id bx08783; 26 Oct 87 16:04 EST
Received: by tektronix.TEK.COM (5.51/6.24)
id AA13246; Mon, 26 Oct 87 10:38:32 PST
Received: by tekchips.TEK.COM (5.51/6.24)
id AA04608; Mon, 26 Oct 87 10:37:48 PST
Date: Mon, 26 Oct 87 10:37:48 PST
From: Will Clinger <willc%tekchips.tek.com@RELAY.CS.NET>
Message-Id: <8710261837.AA04608@tekchips.TEK.COM>
To: scheme@mc.lcs.mit.edu
Subject: Re: Scheme in the real world
Cc: willc%tekchips.tek.com@RELAY.CS.NET
At Tektronix Laboratories, Scheme is viewed as a base language for
research in advanced programming languages and has begun to be used
as an implementation language for research projects such as a specification
environment based on CSP.
Peace,
William Clinger
∂27-Oct-87 0814 @MC.LCS.MIT.EDU:dyb@iuvax.cs.indiana.edu Re: applicability of "syntax" constructs
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 27 Oct 87 08:14:04 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 27 Oct 87 11:15:34 EST
Date: Tue, 27 Oct 87 11:13:10 est
From: R. Kent Dybvig <dyb@iuvax.cs.indiana.edu>
To: jinx%geneva.ai.mit.edu@RELAY.CS.NET
Subject: Re: applicability of "syntax" constructs
Cc: rrrs-authors@mc.lcs.mit.edu
Instead of using $ to mark syntactic keywords, why not use the
convention that keywords are capitalized (or in all-caps) and that
identifiers are in lower case?
∂27-Oct-87 0947 @MC.LCS.MIT.EDU:gls@Think.COM applicability of "syntax" constructs
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 27 Oct 87 09:47:17 PST
Received: from Think.COM (TCP 1201000006) by MC.LCS.MIT.EDU 27 Oct 87 12:48:20 EST
Return-Path: <gls@Think.COM>
Received: from kali.think.com by Think.COM; Tue, 27 Oct 87 12:44:44 EST
Received: by kali.think.com; Tue, 27 Oct 87 12:45:08 EST
Date: Tue, 27 Oct 87 12:45:08 EST
From: gls@Think.COM
Message-Id: <8710271745.AA09092@kali.think.com>
To: dyb@iuvax.cs.indiana.edu
Cc: jinx%geneva.ai.mit.edu@relay.cs.net, rrrs-authors@mc.lcs.mit.edu
In-Reply-To: R. Kent Dybvig's message of Tue, 27 Oct 87 11:13:10 est <8710271615.AA28649@Think.COM>
Subject: applicability of "syntax" constructs
Date: Tue, 27 Oct 87 11:13:10 est
From: R. Kent Dybvig <dyb@iuvax.cs.indiana.edu>
Instead of using $ to mark syntactic keywords, why not use the
convention that keywords are capitalized (or in all-caps) and that
identifiers are in lower case?
BECAUSE people hate mixed case AND think it is ugly.
WOULD you want TO use mixed case IN your code?
--Quux :-)
∂27-Oct-87 1039 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: Tao, Sues...
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 27 Oct 87 10:39:28 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 27 Oct 87 13:34:22 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA04338; Tue, 27 Oct 87 10:13:52 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 15 Oct 87 00:43:20 GMT
From: russell!evan@labrea.stanford.edu (Evan Kirshenbaum)
Organization: Center for the Study of Language and Information, Stanford U.
Subject: Re: Tao, Sues...
Message-Id: <428@russell.STANFORD.EDU>
References: <8710131545.AA04566@vor.esosun.uucp>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
TAO is described in a paper by Ikuo Takeuchi, Hiroshi Okuno and
Nobusayu Ohsatu of NTT called ``A List Processing Language TAO with
Multiple Programming Paradigms'' which appeared in New Generation
Computing 4(1986). It looks quite interesting. I'd be interested in
hearing whether anybody has come up with a way in Lisp or Scheme to do
self-assignment as it is done in TAO. It looks like it could be a
useful way to describe destructive operations.
---
Evan Kirshenbaum
Stanford University
evan@CSLI.STANFORD.EDU
...!{ucbvax,decvax}!decwrl!glacier!evan
If you think my opinions represent this university,
you haven't been on campus recently!
∂27-Oct-87 1259 @MC.LCS.MIT.EDU:jinx@GENEVA.AI.MIT.EDU applicability of "syntax" constructs
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 27 Oct 87 12:59:09 PST
Received: from geneva (TCP 2206400372) by MC.LCS.MIT.EDU 27 Oct 87 15:55:44 EST
Received: by GENEVA.AI.MIT.EDU; Tue, 27 Oct 87 15:57:52 est
Date: Tue, 27 Oct 87 15:57:52 est
From: jinx@GENEVA.AI.MIT.EDU (Guillermo J. Rozas)
Message-Id: <8710272057.AA17882@geneva>
To: dyb@iuvax.cs.indiana.edu
Cc: rrrs-authors@mc.lcs.mit.edu
In-Reply-To: "R. Kent Dybvig"'s message of Tue, 27 Oct 87 11:13:10 est <8710272047.AA17836@geneva>
Subject: applicability of "syntax" constructs
Reply-To: jinx@zurich.ai.mit.edu
Some implementations are case insensitive, and although the issue is
mostly one of readability and convention, and should not be depended
on by code, I'd hate to see some information that a program could not
use (heuristically, of course) to advantage. Otherwise that would be
fine.
∂27-Oct-87 1323 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU 1988 LISP & FUNCTIONAL PROGRAMMING - CALL FOR PAPERS
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 27 Oct 87 13:23:37 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 27 Oct 87 16:20:39 EST
Date: Tue, 27 Oct 87 16:21:13 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: 1988 LISP & FUNCTIONAL PROGRAMMING - CALL FOR PAPERS
To: scheme@MC.LCS.MIT.EDU
Message-ID: <275884.871027.JAR@AI.AI.MIT.EDU>
Date: Mon, 26 Oct 87 13:52:20 mst
From: kessler%cons@cs.utah.edu (Robert R. Kessler)
Message-Id: <8710262052.AA03833@cons.UTAH.EDU>
To: common-lisp@sail.stanford.edu
Subject: 1988 LISP & FUNCTIONAL PROGRAMMING - CALL FOR PAPERS
CALL FOR PAPERS
1988 ACM Conference on
LISP AND FUNCTIONAL PROGRAMMING
Snowbird, Utah, July 25-27, 1988
The 1988 ACM Conference on LISP and Functional Programming is the
fifth in a series of biennial conferences devoted to the theory,
design, and implementation of programming languages and systems
that support symbolic computation. The conference is jointly
sponsored by ACM SIGPLAN, SIGACT, and SIGART. Papers presented
at the conference must include new ideas or experimental results
that have not been previously published. The conference program
is not limited to topics discussed in previous conferences in the
series; authors are strongly encouraged to submit papers that in-
troduce important new topics that are relevant to functional pro-
gramming and symbolic computation. The major topics that have
been addressed at previous conferences include:
1) programming language concepts and facilities
2) implementation methods
3) machine architectures
4) semantic foundations
5) programming logics
6) program development environments
7) applications of symbolic computation Authors are invited to
submit 11 copies of a technical summary of a prospective confer-
ence paper to the program committee chairman. The length of the
summary should not exceed 3,000 words (10 pages double-spaced or
typeset 10-point on 16-point spacing). Since the committee ex-
pects to receive a large number of submissions, the summary
should be organized so that it is easily understood. It is im-
portant for the summary to identify what has been accomplished,
explain why it is significant, and compare it with previous work.
Submissions must be received by Jan 22, 1988. They should in-
clude a return postal address and an electronic mail address if
it is available. Authors will be notified of the acceptance or
rejection of their papers by March 11, 1988. Full versions of
the accepted papers must be received in camera-ready form by
April 22, 1988. Authors of accepted papers will be required to
sign ACM copyright release forms. Proceedings will be distribut-
ed at the conference and will later be available for purchase
from the ACM. The conference site at Snowbird, Utah is a resort
located in the rugged Wasatch mountain range approximately 35
miles from Salt Lake City. Summer activities include hiking,
climbing, swimming, tennis, and wildflower photography.
Program Committee Chairman Program Committee
Robert (Corky) Cartwright Harold Abelson, MIT
Attn: LFP 88 Richard Bird, Oxford University
Rice University Luca Cardelli, DEC Systems Res. Ctr.
Department of Computer Science Robert Cartwright, Rice University
P. O. Box 1892 Richard Gabriel, Lucid Inc.
Houston, TX 77251-1892 Christopher Haynes, Indiana University
(713) 527-4834 Gerard Huet, INRIA Rocquencourt
cork@rice.edu Gilles Kahn, INRIA Sophia Antipolis
David Moon, Symbolics Inc.
Guy Steele, Thinking Machines Corp.
Carolyn Talcott, Stanford University
General Chairman Local Arrangements Chairman
Jerome Chailloux Robert Kessler
INRIA University of Utah
Domaine de Voluceau-Rocquencourt Department of Computer Science
B.P. 105 3190 M.E.B.
Le Chesnay Cedex Salt Lake City, Utah 84112
France kessler@cs.utah.edu
chaillou@inria.inria.fr
∂27-Oct-87 1414 @MC.LCS.MIT.EDU:dyb@iuvax.cs.indiana.edu Re: applicability of "syntax" constructs
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 27 Oct 87 14:13:51 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 27 Oct 87 16:21:41 EST
Date: Tue, 27 Oct 87 16:19:04 est
From: R. Kent Dybvig <dyb@iuvax.cs.indiana.edu>
To: gls@Think.COM
Subject: Re: applicability of "syntax" constructs
Cc: rrrs-authors@mc.lcs.mit.edu
From: gls@Think.COM
Subject: applicability of "syntax" constructs
Date: Tue, 27 Oct 87 11:13:10 est
From: R. Kent Dybvig <dyb@iuvax.cs.indiana.edu>
Instead of using $ to mark syntactic keywords, why not use the
convention that keywords are capitalized (or in all-caps) and that
identifiers are in lower case?
BECAUSE people hate mixed case AND think it is ugly.
WOULD you want TO use mixed case IN your code?
--Quux :-)
$really! $it is obviously better to use dollar signs. $at least
$i think so. $don't you?
Seriously, I do not find the following terribly ugly:
(Define fumble
(Lambda (x)
(If (< x 0)
(fumble (- x))
x)))
or
(DEFINE fumble
(LAMBDA (x)
(IF (< x 0)
(- (fumble (- x)))
x)))
I would prefer to put keywords in bold face, but those with
upper-case only terminals wouldn't be the only ones left out in
the cold!
∂28-Oct-87 0937 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu FX-87 is born
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 28 Oct 87 09:37:26 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 28 Oct 87 12:35:13 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA02607; Wed, 28 Oct 87 09:10:42 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 28 Oct 87 14:27:41 GMT
From: mit-vax!jouvelot@eddie.mit.edu (Pierre Jouvelot)
Organization: MIT Laboratory for Computer Science, Cambridge
Subject: FX-87 is born
Message-Id: <2967@mit-vax.LCS.MIT.EDU>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
--
The FX-87 Programming Language and its Reference Manual are now available.
Quoting the abstract :
"The FX programming language is designed to support the parallel
implementation of applications that perform both symbolic and scientific
computations. Unlike previous languages, FX uses an effect system to
discover expression scheduling constraints. The effect system is part of
a kinded type system with three base kinds:
. types, which describe the value of an expression;
. effects, which describe the side-effects that an expression may have;
. regions, which describe the areas of the store in which side-effects
may occur.
Types, effects, and regions are collectively called descriptions.
FX expressions can be abstracted over any kind of description. This
permits type, effect, and region polymorphism. Unobservable side-effects
are masked by the effect system; an effect soundness property guarantees
that the effects computed statically by the effect system are a
conservative approximation of the actual side-effects that a given
expression may have.
Effect polymorphism and effect masking make the FX effect system
substantially more powerful than previous approaches to side-effect
analysis."
The "FX-87 Reference Manual (Edition 1.0)" is the MIT/LCS Technical Report
no.407 and can be ordered (for about $12) at the following address :
LCS Publications
Laboratory for Computer Science
Massachusetts Institute of Technology
545, Technology Square
Cambridge, MA 02139
U.S.A.
An experimental and sequential version of FX has been implemented in Scheme.
People interested in implementation issues can contact gifford@XX.LCS.MIT.EDU
for more information.
David K. Gifford
Pierre Jouvelot
John M. Lucassen
Mark A. Sheldon
--
Pierre Jouvelot
Room NE43-403 ARPA: jouvelot@xx.lcs.mit.edu
Lab for Computer Science USENET: decvax!mit-vax!jouvelot
MIT (or mcvax!litp!pj)
545, Technology Square TPH: (617) 253-0884
Cambridge, MA 02139
USA
∂28-Oct-87 1726 @MC.LCS.MIT.EDU,@RELAY.CS.NET:wand@corwin.ccs.northeastern.edu applicability of "syntax" constructs
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 28 Oct 87 17:26:35 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 28 Oct 87 19:41:04 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa10202; 28 Oct 87 12:56 EST
Received: from northeastern.edu by RELAY.CS.NET id af21255; 28 Oct 87 12:50 EST
Received: from corwin.ccs.northeastern.edu by
nuhub.acs.northeastern.edu; Wed, 28 Oct 87 09:37 EDT
Received: by corwin.CCS.Northeastern.EDU (5.51/5.17)
id AA11202; Wed, 28 Oct 87 09:25:57 EST
Date: Wed, 28 Oct 87 09:25:57 EST
From: wand%corwin.ccs.northeastern.edu@RELAY.CS.NET
To: dyb@iuvax.cs.indiana.edu
Cc: gls@THINK.COM, rrrs-authors@mc.lcs.mit.edu
In-Reply-To: "R. Kent Dybvig"'s message of Tue, 27 Oct 87 16:19:04 est
Subject: applicability of "syntax" constructs
How about making syntactic keywords start with the letters I through N, and
identifiers start with A-H and O-Z?
∂28-Oct-87 1834 @MC.LCS.MIT.EDU:ziggy@VX.LCS.MIT.EDU RE: applicability of "syntax" mumble
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 28 Oct 87 18:34:19 PST
Received: from VX.LCS.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 28 OCT 87 21:23:40 EST
Received: by VX.LCS.MIT.EDU with sendmail-4.12/4.8 id <AA11669@VX.LCS.MIT.EDU>; Wed, 28 Oct 87 20:42:45 est
Date: Wed, 28 Oct 87 20:42:45 est
From: Michael R. Blair <ziggy@VX.LCS.MIT.EDU>
To: rrrs-authors@mc
Subject: RE: applicability of "syntax" mumble
Why use annoying special charcters like $ or case? Why
not have the special form AND and the procedure CONJUNCTION...
OR DISJUNCTION...
IF PREDICATION...
...and the like.
Better yet, since fonts are the wave of the future, lets make
italics old-english indicate ... mumble mumble
Hey! Let's make syntax FIRST CLASS!!
~Ziggy
∂28-Oct-87 1857 @MC.LCS.MIT.EDU:ALAN@AI.AI.MIT.EDU CALL
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 28 Oct 87 18:57:19 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 28 Oct 87 21:42:39 EST
Date: Wed, 28 Oct 87 21:43:19 EST
From: Alan Bawden <ALAN@AI.AI.MIT.EDU>
Subject: CALL
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <276693.871028.ALAN@AI.AI.MIT.EDU>
We could also eliminate the confusion between keywords and procedure calls
by introducing a new keyword CALL, that would be used to indicate a
combination:
(DEFINE (FACT N)
(IF (CALL < N 2)
1
(CALL * N (CALL FACT (CALL - N 1)))))
To further strain your brains I recall an idea that Bill Rozas (I think)
once had. He suggested that instead of putting the keyword or procedure in
the CAR of an expression, we could use the CADR. Then we might have (with
renamings appropriate for infix keywords):
((N FACT) IS
((N < 2) THEN
1
(N * ((N - 1) FACT))))
Seriously, as long as you can -statically- determine what identifiers are
keywords, I don't see any reason to change the language.
∂28-Oct-87 1921 @MC.LCS.MIT.EDU:cph@KLEPH.AI.MIT.EDU Where can I get C-Scheme?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 28 Oct 87 19:21:24 PST
Received: from kleph (TCP 2206400254) by MC.LCS.MIT.EDU 28 Oct 87 22:17:42 EST
Received: by KLEPH.AI.MIT.EDU; Wed, 28 Oct 87 22:10:56 est
Date: Wed, 28 Oct 87 22:10:56 est
From: cph@KLEPH.AI.MIT.EDU (Chris Hanson)
Message-Id: <8710290310.AA05221@kleph>
To: fxgrp!ljz@ames.arpa
Cc: scheme@mc.lcs.mit.edu
In-Reply-To: (Lloyd Zusman's message of 23 Oct 87 11:31:17 GMT <129@fxgrp.UUCP>
Subject: Where can I get C-Scheme?
Reply-To: cph@mc.lcs.mit.edu
Date: 23 Oct 87 11:31:17 GMT
From: fxgrp!ljz@ames.arpa (Lloyd Zusman)
In article <23060GTI@PSUVM> GTI@PSUVM.BITNET (Leon Geesey) writes:
>I was wondering where I could get the source for C-Scheme?
>I have FTP access and would like to get C-scheme up and
>running on a PC.
Same here. Respond via mail.
Log into "prep.ai.mit.edu" as "scheme", password "scheme", and follow
the directions.
∂29-Oct-87 1003 @MC.LCS.MIT.EDU:JAR@ML.AI.MIT.EDU policy
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 29 Oct 87 10:02:57 PST
Received: from ML.AI.MIT.EDU (CHAOS 3133) by MC.LCS.MIT.EDU 29 Oct 87 12:57:25 EST
Date: Thu, 29 Oct 87 12:55:38 EST
From: Jonathan A Rees <JAR%ML.AI.MIT.EDU@MC.LCS.MIT.EDU>
Subject: policy
To: scheme@MC.LCS.MIT.EDU
Reply-to: scheme-request@mc.lcs.mit.edu
Message-ID: <5154.871029.JAR@ML.AI.MIT.EDU>
I've gotten tired of saying the same things over and over again, so I
have prepared a Scheme list "policy statement". I'll send this to every
new person who joins the list at MIT. Most of you have probably heard
all this before, so you can ignore it.
----------
General information about the Scheme mailing list:
- The list is not moderated. If you send mail to scheme@mc.lcs.mit.edu,
it will be forwarded to the hundreds (thousands?) of list members on the
ARPA Internet, CSNET, BITNET, Usenet, JUNET, etc. If you have any doubt
about the suitability of your message for this audience, send it to
scheme-request@mc.lcs.mit.edu instead, and your message will be either
answered or forwarded.
- Do not send messages concerning MIT's scheme implementation (C Scheme)
to the list; users of the many other Scheme implementations don't care
to see such messages. There is a separate list,
info-cscheme%oz@mc.lcs.mit.edu, for this purpose. To be added to that
list, send mail to info-cscheme-request%oz@mc.lcs.mit.edu.
- Send administrative requests to scheme-request@mc.lcs.mit.edu, NOT to
JAR. If your machine is scheduled to change its name or routing, or to
go off the net, or if you move, please send mail to scheme-request so
your entry can be changed.
- Every week, several addresses on the scheme list stop working, and
error reports are sent back to the message's sender or to
scheme-request. If a message you send gets bounced, forward the error
report to scheme-request. Bad addresses on the list can't be tolerated;
THEY WILL BE REMOVED FROM THE LIST WITHOUT NOTICE. Your address may
become invalid due to no fault of your own, and/or without your being
aware of it. For example, if your system becomes inaccessible from the
Internet for a week, of if it changes its name, messages to you will
bounce, and your entry will be removed from the list. If you don't get
any scheme messages for, say, three or four weeks, you might want to send
a message to scheme-request to verify that you're still on.
- If there's more than one person at your site who wants to be on the list,
please set up a local redistribution list.
- The list is archived in the following files:
LSPMAI; SCHEME MAIL1 on host AI.AI.MIT.EDU [oldest messages]
LSPMAI; SCHEME MAIL2 on host AI.AI.MIT.EDU
LSPMAI; SCHEME MAIL on host MC.LCS.MIT.EDU [newest messages]
Note that there are spaces in these filenames, so you may have to type
double quotes at your FTP program. If you don't have Internet FTP access,
tough luck.
- There is a file on host AI.AI.MIT.EDU, "LSPMAI; SCHEME IMPLS", that
has brief descriptions of available scheme implementations and how to
get them. If you want a copy of this file, but you don't have Internet
FTP access, send a request to scheme-request.
∂29-Oct-87 1654 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: Where can I get C-Scheme?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 29 Oct 87 16:54:31 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 29 Oct 87 19:51:45 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA10742; Thu, 29 Oct 87 16:32:26 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 29 Oct 87 21:48:10 GMT
From: fxgrp!ljz@ames.arpa (Lloyd Zusman)
Organization: FX Development Group, Inc., Mountain View, CA
Subject: Re: Where can I get C-Scheme?
Message-Id: <136@fxgrp.UUCP>
References: <129@fxgrp.UUCP>, <8710290310.AA05221@kleph>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
In article <8710290310.AA05221@kleph> cph@mc.lcs.mit.edu writes:
>>I was wondering where I could get the source for C-Scheme?
>Log into "prep.ai.mit.edu" as "scheme", password "scheme", and follow
>the directions.
Is there a dialup line into that machine? In general, how does one
log into a machine just by knowing its uucp address? Is there something
about the net I don't know?
Replying by email is OK, but perhaps others would like to know this, also.
--
Lloyd Zusman, Master Byte Software, Los Gatos, California
"We take things well in hand."
...!ames!fxgrp!ljz
∂30-Oct-87 1014 @MC.LCS.MIT.EDU,@MITVMA.MIT.EDU:EDH@HNYKUN52.BITNET portability of SCHEME
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 30 Oct 87 10:13:57 PST
Received: from MITVMA.MIT.EDU (TCP 2227000003) by MC.LCS.MIT.EDU 30 Oct 87 13:11:23 EST
Received: from MITVMA.MIT.EDU by MITVMA.MIT.EDU ; Fri, 30 Oct 87 13:10:01 EST
Received: from HNYKUN52.BITNET (EDH) by MITVMA.MIT.EDU (Mailer X1.25) with
BSMTP id 1104; Fri, 30 Oct 87 13:09:50 EST
Date: Fri, 30 Oct 87 17:18 N
From: <EDH%HNYKUN52.BITNET@MITVMA.MIT.EDU>
Subject: portability of SCHEME
To: SCHEME@MC.LCS.MIT.EDU
X-Original-To: SCHEME@MC.LCS.MIT.EDU, EDH
How portable is MIT's source?
We are trying to port the MIT Scheme source to a DOS machine. The documentation
warns that long integers must be 32 bits, but nothing is said about normal
integers.
It so happens that many macros expand to code containing forms like the
folowing:
..
long mask = 1 << 24;
..
Now, our C compilers - Manx 3.2, Lattice, as well as Microsoft - take 16 bits
for an integer, and default constants to the same. The value of 'mask' in the
expression just mentioned therefor will be 0 after the assignment.
Questions:
1) Has anyone met this problem and found a way to circumvent it,
and/or
2) Does someone know about a C compiler that does not show this phenomenon.
NB. We know it does not suffice to turn all integers into longs, since they may
cause problems when used as parameters in a function call.
Scheme-team Nijmegen,
the Netherlands.
∂30-Oct-87 1138 @MC.LCS.MIT.EDU:jdevries@ads.arpa Extend-Syntax for MacScheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 30 Oct 87 11:38:48 PST
Received: from ADS.ARPA (TCP 20071200430) by MC.LCS.MIT.EDU 30 Oct 87 14:33:29 EST
Received: by ADS.ARPA (5.57/1.2)
id AA16872; Fri, 30 Oct 87 11:33:19 PST
Date: Fri, 30 Oct 87 11:33:19 PST
From: Jeff De Vries <jdevries@ads.arpa>
Message-Id: <8710301933.AA16872@ADS.ARPA>
To: scheme@mc.lcs.mit.edu
Subject: Extend-Syntax for MacScheme
In the book "The Scheme Programming Language", Kent Dybvig describes
a powerful tool for syntactic extension called extend-syntax. Basically,
it allows you to specify transformations from input representations to
the corresponding code to be executed. For a quick example, consider
we wish to implement the LET syntactic form. This could be done with
extend-syntax as follows:
(extend-syntax (PIGLET)
((PIGLET ((x v) ...) e1 e2 ...)
(andmap symbol? '(x ...))
((lambda (x ...) e1 e2 ...) v ...)))
This would define a new syntactic form (i.e. macro) named PIGLET that
translates things of the form (PIGLET ((x v) ...) e1 e2 ...) to the
corresponding LAMBDA form after verifying that all the x's are
symbols. Notice the powerful pattern matching abilities provided by
using the ellipsis (...). There is a *LOT* more to extend-syntax than
this example would indicate. For the full glories, (defstruct in about
20 lines of code, objects (as in OOP) in about the same), see the book.
Well, I coveted the power of extend-syntax and desired it greatly, so
I asked Kent Dybvig if he would part with the necessary incantations...
Behold! I had Mail! (thanks kent!)
I am running MacScheme Version 1.22 and have converted the extend-syntax
code to work under such. If you would like a copy, send me e-mail to
that effect and I'll see that a copy is sent to you. If I get swamped
with requests, I might just post the whole thing to here.
Jeff De Vries (ARPA: jdevries@ads.arpa)
Usual Disclaimers Apply.
∂30-Oct-87 1407 @MC.LCS.MIT.EDU:sas@bfly-vax.bbn.com Extend-Syntax for MacScheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 30 Oct 87 14:07:41 PST
Received: from BFLY-VAX.BBN.COM (TCP 20026200235) by MC.LCS.MIT.EDU 30 Oct 87 17:05:05 EST
To: jdevries@ads.ARPA
CC: scheme@mc.lcs.mit.edu
In-reply-to: Jeff De Vries's message of Fri, 30 Oct 87 11:33:19 PST
Subject: Extend-Syntax for MacScheme
Date: 30 Oct 87 16:55:30 EST (Fri)
From: sas@bfly-vax.bbn.com
Yes, please send me a copy of Kent Dybvig's extend-syntax package and
whatever else you've got.
Thanks,
Seth
∂31-Oct-87 1650 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Revised(3) report: could MIT post tex source for it ??
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 31 Oct 87 16:50:46 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 31 Oct 87 19:49:02 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA29449; Sat, 31 Oct 87 16:40:51 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 28 Oct 87 17:08:32 GMT
From: clyde!watmath!utgpu!utzoo!yetti!oz@rutgers.edu
Organization: York U. Computer Science
Subject: Revised(3) report: could MIT post tex source for it ??
Message-Id: <180@yetti.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Is it possible for MIT folk to post the tex source for the
revised (3) report on scheme ?? The version I have from the
Cscheme distribution is out of date, and also, the special MIT
TeX macros used in the report are not included. So, it is not
TeXable. A good place to post would be comp.sources.doc.
thnx.. oz
--
You see things, and you say "WHY?" Usenet: [decvax|ihnp4]!utzoo!yetti!oz
But I dream things that never were; ......!seismo!mnetor!yetti!oz
and say "WHY NOT?" Bitnet: oz@[yusol|yulibra|yuyetti]
[Back To Methuselah] Bernard Shaw Phonet: [416] 736-5257 x 3976
∂01-Nov-87 0928 @MC.LCS.MIT.EDU:jinx@GENEVA.AI.MIT.EDU Revised(3) report: could MIT post tex source for it ??
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 1 Nov 87 09:28:08 PST
Received: from geneva (TCP 2206400372) by MC.LCS.MIT.EDU 1 Nov 87 12:27:40 EST
Received: by GENEVA.AI.MIT.EDU; Sun, 1 Nov 87 12:30:39 est
Date: Sun, 1 Nov 87 12:30:39 est
From: jinx@GENEVA.AI.MIT.EDU (Guillermo J. Rozas)
Message-Id: <8711011730.AA21105@geneva>
To: clyde!watmath!utgpu!utzoo!yetti!oz@rutgers.edu
Cc: scheme@mc.lcs.mit.edu
In-Reply-To: clyde!watmath!utgpu!utzoo!yetti!oz@rutgers.edu's message of 28 Oct 87 17:08:32 GMT <180@yetti.UUCP>
Subject: Revised(3) report: could MIT post tex source for it ??
Reply-To: jinx@zurich.ai.mit.edu
Is it possible for MIT folk to post the tex source for the
revised (3) report on scheme ?? The version I have from the
Cscheme distribution is out of date, and also, the special MIT
TeX macros used in the report are not included. So, it is not
TeXable. A good place to post would be comp.sources.doc.
The sources for r3rs are available by internet/arpanet ftp from host
prep.ai.mit.edu . They are contained in the file /scheme/r3rs.tar, and
you can log in as user scheme (password scheme).
The current MIT CScheme distribution contains these sources as well.
The previous release (release 4) contained rrrs instead, since r3rs
was not yet out.
∂02-Nov-87 1048 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu documentation?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 2 Nov 87 10:48:06 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 2 Nov 87 13:46:41 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA01149; Mon, 2 Nov 87 10:29:56 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 2 Nov 87 15:15:21 GMT
From: super.upenn.edu!eecae!lawitzke@rutgers.edu (John Lawitzke)
Organization: Mich. State Univ., Electronics R&D Laboratory
Subject: documentation?
Message-Id: <3623@eecae.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Is there any sort of reference to learn scheme from?
--
j UUCP: ...ihnp4!msudoc!eecae!lawitzke
"And it's just a box of rain..." ARPA: lawitzke@eecae.ee.msu.edu (35.8.8.151)
∂03-Nov-87 1812 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Source for Scheme?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 3 Nov 87 18:11:25 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 3 Nov 87 20:56:36 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA14206; Tue, 3 Nov 87 05:32:44 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 3 Nov 87 02:42:32 GMT
From: ihnp4!occrsh!uokmax!rjray@ucbvax.Berkeley.EDU (Randy J Ray)
Organization: University of Oklahoma, Norman, OK
Subject: Source for Scheme?
Message-Id: <825@uokmax.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Unfortunately, here at the University, we are without Scheme at all. Is
there a PD version of Scheme that can be put up or mailed to me? We
are using BSD 4.23 (doesn't everyone?). The source is preferred in C, if
possible, but we will accept that which we can get . . .
Randy J. Ray
rjray@uokmax.uucp
∂03-Nov-87 2205 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA Tigger on Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 3 Nov 87 22:05:32 PST
Received: from mitre-bedford.ARPA (TCP 3200600102) by MC.LCS.MIT.EDU 4 Nov 87 00:12:39 EST
Posted-From: The MITRE Corp., Bedford, MA
Received: from darwin.sun.uucp by linus.research (3.2/4.7)
id AA21735; Tue, 3 Nov 87 09:54:07 EST
Posted-Date: Tue, 3 Nov 87 09:48:51 EST
Received: by darwin.sun.uucp (3.2/SMI-3.0DEV3)
id AA03451; Tue, 3 Nov 87 09:48:51 EST
Date: Tue, 3 Nov 87 09:48:51 EST
From: ramsdell%linus@mitre-bedford.ARPA
Message-Id: <8711031448.AA03451@darwin.sun.uucp>
To: scheme@mc.lcs.mit.edu
Subject: Tigger on Scheme
Posted-Date: Mon, 6 Jul 87 07:46:39 EDT
Date: Mon, 6 Jul 87 07:46:39 EDT
From: Tigger@Hundred-Acre-Wood.Milne.Disney
To: ramsdell@linus.uucp
Subject: Scheme
The wonderful thing about Scheme is:
Scheme is a wonderful thing.
Complex procedural ideas
Are expressed via simple strings.
It's clear semantics, and lack of pedantics,
Help make programs run, run, RUN!
But the most wonderful thing about Scheme is:
Programming in it is fun,
Programming in it is FUN!
------------------------------------------------------
The scheme poem was a take-off on the poem explaining the wonderful
thing about about Tiggers. I mistakenly though that Tigger's poem was
from A. A. Milnes' "House At Pooh Corner", but it was created by
Disney in their animated film on Pooh. Thus, I changed Tigger's
return address. Please destroy old copies of the poem.
John
∂04-Nov-87 1702 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Tigger on Scheme / correction
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 4 Nov 87 17:01:53 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 4 Nov 87 19:51:39 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA07151; Wed, 4 Nov 87 16:36:40 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 4 Nov 87 19:41:25 GMT
From: necntc!linus!ramsdell@ames.arpa (John D. Ramsdell)
Organization: The MITRE Corporation, Bedford MA
Subject: Tigger on Scheme / correction
Message-Id: <16715@linus.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Posted-Date: Mon, 6 Jul 87 07:46:39 EDT
Date: Mon, 6 Jul 87 07:46:39 EDT
From: Tigger@Hundred-Acre-Wood.Milne.Disney
To: ramsdell@linus.uucp
Subject: Scheme
The wonderful thing about Scheme is:
Scheme is a wonderful thing.
Complex procedural ideas
Are expressed via simple strings.
Its clear semantics, and lack of pedantics,
Help make programs run, run, RUN!
But the most wonderful thing about Scheme is:
Programming in it is fun,
Programming in it is FUN!
------------------------------------------------------
Just correcting the English. Thanks to those who noticed the mistake.
John
∂05-Nov-87 0426 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA Tigger on Scheme / correction
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 5 Nov 87 04:26:07 PST
Received: from mitre-bedford.ARPA (TCP 3200600102) by MC.LCS.MIT.EDU 5 Nov 87 07:25:13 EST
Posted-From: The MITRE Corp., Bedford, MA
Received: from darwin.sun.uucp by linus.research (3.2/4.7)
id AA21799; Thu, 5 Nov 87 07:24:10 EST
Posted-Date: Thu, 5 Nov 87 07:18:54 EST
Received: by darwin.sun.uucp (3.2/SMI-3.0DEV3)
id AA01327; Thu, 5 Nov 87 07:18:54 EST
Date: Thu, 5 Nov 87 07:18:54 EST
From: ramsdell%linus@mitre-bedford.ARPA
Message-Id: <8711051218.AA01327@darwin.sun.uucp>
To: scheme@mc.lcs.mit.edu
Subject: Tigger on Scheme / correction
Posted-Date: Mon, 6 Jul 87 07:46:39 EDT
Date: Mon, 6 Jul 87 07:46:39 EDT
From: Tigger@Hundred-Acre-Wood.Milne.Disney
To: ramsdell@linus.uucp
Subject: Scheme
The wonderful thing about Scheme is:
Scheme is a wonderful thing.
Complex procedural ideas
Are expressed via simple strings.
Its clear semantics, and lack of pedantics,
Help make programs run, run, RUN!
But the most wonderful thing about Scheme is:
Programming in it is fun,
Programming in it is FUN!
------------------------------------------------------
Just correcting the English. Thanks to those who noticed the mistake.
John
∂06-Nov-87 0655 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Need refs for low-level (c/pascal) implementation of scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 6 Nov 87 06:55:04 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 6 Nov 87 07:16:06 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA20724; Fri, 6 Nov 87 03:49:17 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 3 Nov 87 05:03:52 GMT
From: mnetor!utzoo!yetti!oz@uunet.uu.net
Organization: York U. Computer Science
Subject: Need refs for low-level (c/pascal) implementation of scheme
Message-Id: <181@yetti.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I am working on a subset scheme implementation in C, to run
everything in S&IoCP and LittleLisper. Are there any good
references for low-level (C/pascal) implementation of Scheme ?
All I have is Allen's extraordinary but (sigh) slightly
out-of-date book for concrete (i.e. non-meta-circular)
implementation details. [Oh, sure I have Cscheme, but reading
that code gives me migranes every time :-)]
Alternatively, any partial source code for subset/toy schemes
are appreciated.
I already have the reader, cons, gc and lotsa prims, but I am
somewhat stuck at the symbol table/oblist/environment list
level. I have the global oblist allright, but I am getting all
confused as to using it for primitive-environment scheme needs.
If I am missing something, hit me with it... It is all this
late-night hacking slowly eroding my neurons...
oz
--
You see things, and you say "WHY?" Usenet: [decvax|ihnp4]!utzoo!yetti!oz
But I dream things that never were; ......!seismo!mnetor!yetti!oz
and say "WHY NOT?" Bitnet: oz@[yusol|yulibra|yuyetti]
[Back To Methuselah] Bernard Shaw Phonet: [416] 736-5257 x 3976
∂07-Nov-87 1221 @MC.LCS.MIT.EDU,@AI.AI.MIT.EDU,@REAGAN.AI.MIT.EDU,@BU-CS.BU.EDU:gjc@bucsf.bu.edu low level "how to scheme"
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 7 Nov 87 12:21:43 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 7 Nov 87 15:20:18 EST
Received: from REAGAN.AI.MIT.EDU (CHAOS 13065) by AI.AI.MIT.EDU 7 Nov 87 15:17:25 EST
Received: from bu-cs.BU.EDU (BU-CS.BU.EDU) by REAGAN.AI.MIT.EDU via INTERNET with SMTP id 72230; 7 Nov 87 14:54:17 EST
Received: from bucsf (128.197.2.9) by bu-cs.BU.EDU (3.2/4.7)
id AA22685; Sat, 7 Nov 87 14:44:16 EST
Return-Path: <gjc@bucsf.bu.edu>
Received: by bucsf (4.12/4.7)
id AA16059; Sat, 7 Nov 87 14:48:58 est
Date: Sat, 7 Nov 87 14:48:58 est
From: gjc@bucsf.bu.edu (George J. Carrette)
Message-Id: <8711071948.AA16059@bucsf>
To: scheme@ai.ai.mit.edu
Subject: low level "how to scheme"
the best guide is in Structure and Interpretation of Computer Programs.
I have known more that one person who has taken the techniques
directly and written interpreters for scheme in various assembly
languages.
∂08-Nov-87 0241 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: low level "how to scheme"
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Nov 87 02:41:01 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 8 Nov 87 05:16:36 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA04120; Sun, 8 Nov 87 01:35:49 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 8 Nov 87 06:29:19 GMT
From: pattis@june.cs.washington.edu (Richard Pattis)
Organization: U of Washington, CSCI, Seattle
Subject: Re: low level "how to scheme"
Message-Id: <3558@uw-june.UUCP>
References: <8711071948.AA16059@bucsf>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I was told that George Springer (at Indiana?) is writing an introduction to
Scheme book that takes a more gentle approach to teaching the subject. Does
anyone out there know how to contact him on the net? I'd be interested in
hearing more about this project, and others like it.
Rich Pattis
∂08-Nov-87 1737 @MC.LCS.MIT.EDU:springer@iuvax.cs.indiana.edu Re: low level "how to scheme"
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Nov 87 17:36:52 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 8 Nov 87 20:34:05 EST
Date: Sun, 8 Nov 87 20:30:29 est
From: George Springer <springer@iuvax.cs.indiana.edu>
To: scheme@mc.lcs.mit.edu
Subject: Re: low level "how to scheme"
George Springer can be reached with
springer@iuvax.cs.indiana.edu
He is writing a text that is being used by freshmen as an introductory
course in programming. The first 11 weeks are spent in Scheme and the
last four weeks introduce them to C. It is being used for the second
year and seems to be successful. Notes for the course are being written
and should be finished in a few months.
∂09-Nov-87 0112 @MC.LCS.MIT.EDU:mcvax!tcdcs!omahony@uunet.UU.NET Solution to Exercise 1.9
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Nov 87 01:11:57 PST
Received: from uunet.UU.NET (TCP 30003106601) by MC.LCS.MIT.EDU 9 Nov 87 04:11:24 EST
Received: from mcvax.UUCP by uunet.UU.NET (5.54/1.14) with UUCP
id AA11178; Mon, 9 Nov 87 04:07:48 EST
Received: by mcvax.cwi.nl; Mon, 9 Nov 87 09:52:45 +0100 (MET)
Received: from tcdcs by kestrel.Ukc.AC.UK with UUCP id aa18057;
9 Nov 87 7:59 GMT
Received: from csvax1 by csclnb.tcdcs.uucp id aa09172; 7 Nov 87 17:55 EST
Date: Sat, 7 Nov 87 17:55 GMT
From: "Donal O'Mahony - omahony@tcdcs.uucp" <mcvax!tcdcs!OMAHONY@uunet.UU.NET>
Subject: Solution to Exercise 1.9
To: scheme@mc.lcs.mit.edu
X-Vms-To: OMAHONY,IN"scheme@mc.lcs.mit.edu"
Message-Id: <8711071755.aa09172@csclnb.tcdcs.uucp>
Does anybody out there have a good solution to Exercise 1.9 on pg 39
of Structure & Interpretation of Computer Programs. It involves
writing a procedure that evolves an iterative process for solving
the count change problem.
I've tried a few times with no success.
Donal O'Mahony omahony@tcdcs.uucp
Computer Science Dept.,
Trinity College,
Dublin,
Ireland
∂09-Nov-87 0151 @MC.LCS.MIT.EDU:trainor@CS.UCLA.EDU Re: Solution to Exercise 1.9
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Nov 87 01:51:40 PST
Received: from lanai.cs.ucla.edu (TCP 20030216034) by MC.LCS.MIT.EDU 9 Nov 87 04:41:50 EST
Return-Path: <trainor@CS.UCLA.EDU>
Received: by lanai.cs.ucla.edu (Sendmail 5.57.2/1.13)
id AA29785; Mon, 9 Nov 87 01:35:13 PST
Message-Id: <8711090935.AA29785@lanai.cs.ucla.edu>
To: "Donal O'Mahony - omahony@tcdcs.uucp" <mcvax!tcdcs!OMAHONY@uunet.UU.NET>
Cc: scheme@mc.lcs.mit.edu
Subject: Re: Solution to Exercise 1.9
In-Reply-To: Your message of Sat, 07 Nov 87 17:55:00 +0000.
<8711071755.aa09172@csclnb.tcdcs.uucp>
Date: Mon, 09 Nov 87 01:35:12 PST
From: Vulture of Light <trainor@CS.UCLA.EDU>
>Does anybody out there have a good solution to Exercise 1.9 on pg 39
>of Structure & Interpretation of Computer Programs.
Yes.
>I've tried a few times with no success.
Keep trying.
∂09-Nov-87 1033 @MC.LCS.MIT.EDU,@AI.AI.MIT.EDU:dan@mitre-bedford.ARPA Removal from mailing list
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Nov 87 10:33:29 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 9 Nov 87 13:06:28 EST
Received: from mitre-bedford.ARPA (TCP 3200600102) by AI.AI.MIT.EDU 9 Nov 87 08:45:00 EST
Full-Name: Willhite
Message-Id: <8711091314.AA02071@mitre-bedford.ARPA>
Posted-From: The MITRE Corp., Bedford, MA
To: scheme@ai.ai.mit.edu
From: dan@mitre-bedford.ARPA
Subject: Removal from mailing list
Date: Mon, 09 Nov 87 08:14:29 EST
Sender: dan@mitre-bedford.ARPA
Please remove me from the scheme mailing list.
Thank you,
Daniel Willhite
The MITRE Corporation
dan@mitre-bedford.arpa
∂09-Nov-87 1920 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Scheme Text
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Nov 87 19:20:28 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 9 Nov 87 22:19:56 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA11052; Mon, 9 Nov 87 19:00:03 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 9 Nov 87 20:07:49 GMT
From: PT.CS.CMU.EDU!cadre!pitt!cisunx!adbst@cs.rochester.edu (Andrew D. Bowen)
Organization: Univ. of Pittsburgh, Comp & Info Sys
Subject: Scheme Text
Message-Id: <5141@cisunx.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
If you are science oriented, then the book, Structure and Interpretation
of Computer Programs by Abelson and Sussman is very good. It is
published by the MIT press.
Andy Bowen
Dept. of Electrical Engineering
University of Pittsburgh
∂10-Nov-87 0953 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Wanted: SCOOPS info
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 10 Nov 87 09:53:18 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 10 Nov 87 12:52:20 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.27)
id AA26261; Tue, 10 Nov 87 09:19:28 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 10 Nov 87 03:34:00 GMT
From: render@b.cs.uiuc.edu
Subject: Wanted: SCOOPS info
Message-Id: <189900001@uiucdcsb>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I'm relatively new to scheme, and I have taken on a class project which
I plan to implement in SCOOPS. The version we have (for Cscheme) is
apparently incorrect as it doesn't accept simple requests to create
instances. Does anyone know of a recent public domain version which
might have corrected these bugs? Thanks for any info.
Hal Render
University of Illinois at Urbana-Champaign
render@a.cs.uiuc.edu (ARPA)
{seismo,pur-ee}!uiucdcs!render (USENET)
∂10-Nov-87 2257 @MC.LCS.MIT.EDU:lls@mimsy.umd.edu Please remove me from the mailing list
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 10 Nov 87 22:57:41 PST
Received: from mimsy.umd.edu (TCP 20002100010) by MC.LCS.MIT.EDU 11 Nov 87 01:56:23 EST
Received: by mimsy.umd.edu (5.58/4.7)
id AA19763; Tue, 10 Nov 87 07:45:27 EST
Date: Tue, 10 Nov 87 07:45:27 EST
From: Lauren L. Smith <lls@mimsy.umd.edu>
Message-Id: <8711101245.AA19763@mimsy.umd.edu>
To: scheme@mc.lcs.mit.edu
Subject: Please remove me from the mailing list
I sent a request to scheme-request@mc.lcs.mit.edu to be deleted from
the mailing list - However, I'm still getting mail. Could you please
delete (lls@mimsy.umd.edu)? I prefer using the bboard on the net.
Thank you,
Lauren Smith
∂12-Nov-87 2255 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu What is Scheme?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 12 Nov 87 22:52:13 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 12 Nov 87 10:25:19 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA27604; Thu, 12 Nov 87 07:18:16 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 9 Nov 87 16:01:22 GMT
From: necntc!linus!philabs!hhb!lee@ames.arpa (lee daniels)
Organization: HHB Systems, Mahwah, NJ
Subject: What is Scheme?
Message-Id: <696@hhb.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
What is Scheme, anyway?
Lee Daniels
HHB Systems
1000 Wyckoff Avenue
Mahwah, N.J. 07430
∂15-Nov-87 0159 NET-ORIGIN@MC.LCS.MIT.EDU Extend-Syntax for Everybody!
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 15 Nov 87 01:59:39 PST
Received: from EDDIE.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 14 NOV 87 07:56:00 EST
Received: by EDDIE.MIT.EDU with UUCP with smail2.5 with sendmail-5.45/4.7 id <AA15539@EDDIE.MIT.EDU>; Sat, 14 Nov 87 07:51:07 EST
Received: by xanth.cs.odu.edu (5.51/odu-gateway)
id AA25053; Sat, 14 Nov 87 03:51:34 EST
To:
Path: xanth!mcnc!gatech!hao!ames!ucbcad!zodiac!jdevries
From: jdevries@zodiac.ads.com (Jeff De Vries)
Newsgroups: comp.lang.lisp,mail.scheme
Subject: Extend-Syntax for Everybody!
Message-Id: <898@zodiac.UUCP>
Date: 13 Nov 87 21:44:20 GMT
Sender: news@zodiac.UUCP
Reply-To: jdevries@ADS.ARPA (Jeff De Vries)
Distribution: world
Organization: Advanced Decision Systems, Mt. View, CA (415) 941-3912
Lines: 377
By popular demand I have decided to go ahead and post the code for the
MacScheme version of extend-syntax. I had (have?) over 40 requests,
(some of which I can't seem to respond to due to always getting bounced),
plus other indicators that some people are just waiting for me to post it.
To those of you who have no interest in this, I apologize for the long
posting, (just hit your 'junk' key, if you have one).
But first, a few words:
The theoretical work and basic design behind extend-syntax was the work of
Eugene Kohlbecker. It was part of his Ph.D. dissertation, "Syntactic
Extensions in the Programming Language LISP", (Indiana University, 1986).
The enhanced version of the code that I used for the MacScheme version was
written by R. Kent Dybvig, and made available by him.
A more complete description of Kent's book is:
The Scheme Programming Language
R. Kent Dybvig
Prentice-Hall, Englewood Cliffs, New Jersey, 07632 (1987)
Library of Congress Catalog Card Number 86-63489
If you are using a version of Scheme other than MacScheme, you should be
able to convert this to whatever you are using. The main thing to change
is the way macros are defined. There are two macros, (extend-syntax and
extend-syntax/code), plus the macro defining form embedded inside of
extend-syntax. You may have to add (or delete) a support function or two.
ENJOY!!! :-)
Jeff
------------------------distribution starts here------------------------
Here is the code for extend-syntax. It includes the code for:
when
unless
andmap
syntax-match?
extend-syntax
extend-syntax/code
To load it, just enter
(load "extend.sch")
It takes a while to load and will print out:
when
unless
andmap
syntax-match?
extend-syntax/code
(note: extend-syntax gets compiled even though its name doesn't get
printed. It doesn't get printed because it's inside the LET)
After you load it, you may want to do a (dumpheap) See the MacScheme
manual for details.
The documentation for extend-syntax is in "The Scheme Programming
Language" by R. Kent Dybvig. Buy the book. (No, I don't get any
kickbacks). extend-syntax/code returns the source for the
lambda expression that would have been bound to the macro, which is
helpful during debugging and for getting a feel for how extend-syntax
works. You might try (pretty-print (extend-syntax/code --- etc. if
you want to be able to read it easily. Note that the output isn't
directly useable because of gensym'ed variables and how MacScheme
prints quasiquotes, etc. Use extend-syntax to make the macros.
If you have any comments or problems, feel free to contact me. I won't
promise anything, but I'll give it a look. If you port the code to another
version of Scheme, I would be interested in hearing about it.
Jeff De Vries
(ARPA: jdevries@ads.arpa)
DISCLAIMER: All the usual stuff...
-----------------------------snip here---------------------------------
;;; extend.sch
;;; Copyright (C) 1987 Cadence Research Systems
;;; Permission to copy this software, in whole or in part, to use this
;;; software for any lawful noncommercial purpose, and to redistribute
;;; this software is granted subject to the restriction that all copies
;;; made of this software must include this copyright notice in full.
;;; Cadence makes no warranties or representations of any kind, either
;;; express or implied, including but not limited to implied warranties
;;; of merchantability or fitness for any particular purpose.
;;; The basic design of extend-syntax is due to Eugene Kohlbecker. See
;;; "E. Kohlbecker: Syntactic Extensions in the Programming Language Lisp",
;;; Ph.D. Dissertation, Indiana University, 1986." The structure of "with"
;;; pattern/value clauses, the method for compiling extend-syntax into
;;; Scheme code, and the actual implementation are due to Kent Dybvig.
;;; Made available courtesy R. Kent Dybvig
;;; MacScheme conversion by Jeff De Vries
;;; note: requires the use of MacScheme Version 1.2 or greater
;;; the following routines are provided for compatibility with TSPL:
(macro when
(lambda (args)
`(if ,(cadr args)
(begin ,@(cddr args))
#f)))
(macro unless
(lambda (args)
`(if ,(cadr args)
#t
(begin ,@(cddr args)))))
(define (andmap p . args)
;; use "first-finish" rule
(let andmap ((args args) (value #t))
(if (let any-at-end? ((ls args))
(and (pair? ls)
(or (not (pair? (car ls)))
(any-at-end? (cdr ls)))))
value
(let ((value (apply p (map car args))))
(and value (andmap (map cdr args) value))))))
;;; syntax-match? is used by extend-syntax to choose among clauses and
;;; to check for syntactic errors. It is also available to the user.
(define syntax-match?
(lambda (keys pat exp)
(cond
((symbol? pat) (if (memq pat keys) (eq? exp pat) #t))
((pair? pat)
(if (equal? (cdr pat) '(...))
(let f ((lst exp))
(or (null? lst)
(and (pair? lst)
(syntax-match? keys (car pat) (car lst))
(f (cdr lst)))))
(and (pair? exp)
(syntax-match? keys (car pat) (car exp))
(syntax-match? keys (cdr pat) (cdr exp)))))
(else (equal? exp pat)))))
;;; The main code!
(let ()
(define id
(lambda (name access control)
(list name access control)))
(define id-name car)
(define id-access cadr)
(define id-control caddr)
(define loop
(lambda ()
(list '())))
(define loop-ids car)
(define loop-ids! set-car!)
(define c...rs
`((car caar . cdar)
(cdr cadr . cddr)
(caar caaar . cdaar)
(cadr caadr . cdadr)
(cdar cadar . cddar)
(cddr caddr . cdddr)
(caaar caaaar . cdaaar)
(caadr caaadr . cdaadr)
(cadar caadar . cdadar)
(caddr caaddr . cdaddr)
(cdaar cadaar . cddaar)
(cdadr cadadr . cddadr)
(cddar caddar . cdddar)
(cdddr cadddr . cddddr)))
(define add-car
(lambda (access)
(let ((x (and (pair? access) (assq (car access) c...rs))))
(if (null? x)
`(car ,access)
`(,(cadr x) ,@(cdr access))))))
(define add-cdr
(lambda (access)
(let ((x (and (pair? access) (assq (car access) c...rs))))
(if (null? x)
`(cdr ,access)
`(,(cddr x) ,@(cdr access))))))
(define parse
(lambda (keys pat acc cntl ids)
(cond
((symbol? pat)
(if (memq pat keys)
ids
(cons (id pat acc cntl) ids)))
((pair? pat)
(if (equal? (cdr pat) '(...))
(let ((x (gensym)))
(parse keys (car pat) x (id x acc cntl) ids))
(parse keys (car pat) (add-car acc) cntl
(parse keys (cdr pat) (add-cdr acc) cntl ids))))
(else ids))))
(define gen
(lambda (keys exp ids loops)
(cond
((symbol? exp)
(let ((id (lookup exp ids)))
(if (null? id)
exp
(begin
(add-control! (id-control id) loops)
(list 'unquote (id-access id))))))
((pair? exp)
(cond
((eq? (car exp) 'with)
(unless (syntax-match? '(with) '(with ((p x) ...) e) exp)
(error 'extend-syntax "invalid 'with' form" exp))
(list 'unquote
(gen-with
keys
(map car (cadr exp))
(map cadr (cadr exp))
(caddr exp)
ids
loops)))
((and (pair? (cdr exp)) (eq? (cadr exp) '...))
(let ((x (loop)))
(make-loop
x
(gen keys (car exp) ids (cons x loops))
(gen keys (cddr exp) ids loops))))
(else
(let ((a (gen keys (car exp) ids loops))
(d (gen keys (cdr exp) ids loops)))
(if (and (pair? d) (eq? (car d) 'unquote))
(list a (list 'unquote-splicing (cadr d)))
(cons a d))))))
(else exp))))
(define gen-with
(lambda (keys pats exps body ids loops)
(if (null? pats)
(make-quasi (gen keys body ids loops))
(let ((p (car pats)) (e (car exps)) (g (gensym)))
`(let ((,g ,(gen-quotes keys e ids loops)))
(if (syntax-match? '() ',p ,g)
,(gen-with
keys
(cdr pats)
(cdr exps)
body
(parse '() p g '() ids)
loops)
(error ',(car keys)
"does not fit 'with' pattern"
,g
',p)))))))
(define gen-quotes
(lambda (keys exp ids loops)
(cond
((syntax-match? '(quote) '(quote x) exp)
(make-quasi (gen keys (cadr exp) ids loops)))
((pair? exp)
(cons (gen-quotes keys (car exp) ids loops)
(gen-quotes keys (cdr exp) ids loops)))
(else exp))))
(define lookup
(lambda (sym ids)
(let loop ((ls ids))
(cond
((null? ls) #f)
((eq? (id-name (car ls)) sym) (car ls))
(else (loop (cdr ls)))))))
(define add-control!
(lambda (id loops)
(unless (null? id)
(when (null? loops)
(error 'extend-syntax "missing ellipsis in expansion"))
(let ((x (loop-ids (car loops))))
(unless (memq id x)
(loop-ids! (car loops) (cons id x))))
(add-control! (id-control id) (cdr loops)))))
(define make-loop
(lambda (loop body tail)
(let ((ids (loop-ids loop)))
(when (null? ids)
(error 'extend-syntax "extra ellipsis in expansion"))
(cond
((equal? body (list 'unquote (id-name (car ids))))
(if (null? tail)
(list 'unquote (id-access (car ids)))
(cons (list 'unquote-splicing (id-access (car ids)))
tail)))
((and (null? (cdr ids))
(syntax-match? '(unquote) '(unquote (f x)) body)
(eq? (cadadr body) (id-name (car ids))))
(let ((x `(map ,(caadr body) ,(id-access (car ids)))))
(if (null? tail)
(list 'unquote x)
(cons (list 'unquote-splicing x) tail))))
(else
(let ((x `(map (lambda ,(map id-name ids) ,(make-quasi body))
,@(map id-access ids))))
(if (null? tail)
(list 'unquote x)
(cons (list 'unquote-splicing x) tail))))))))
(define make-quasi
(lambda (exp)
(if (and (pair? exp) (eq? (car exp) 'unquote))
(cadr exp)
(list 'quasiquote exp))))
(define make-clause
(lambda (keys cl x)
(cond
((syntax-match? '() '(pat fender exp) cl)
(let ((pat (car cl)) (fender (cadr cl)) (exp (caddr cl)))
(let ((ids (parse keys pat x '() '())))
`((and (syntax-match? ',keys ',pat ,x)
,(gen-quotes keys fender ids '()))
,(make-quasi (gen keys exp ids '()))))))
((syntax-match? '() '(pat exp) cl)
(let ((pat (car cl)) (exp (cadr cl)))
(let ((ids (parse keys pat x '() '())))
`((syntax-match? ',keys ',pat ,x)
,(make-quasi (gen keys exp ids '()))))))
(else
(error 'extend-syntax "invalid clause" cl)))))
(define make-syntax
(let ((x (gensym "x")))
(lambda (keys clauses)
`(lambda (,x)
(cond
,@(map (lambda (cl) (make-clause keys cl x)) clauses)
(else
(error ',(car keys) "invalid syntax" ,x)))))))
(macro extend-syntax
(lambda (x)
(cond
((and
(syntax-match?
'(extend-syntax)
'(extend-syntax (key1 key2 ...) clause ...)
x)
(andmap symbol? `(,(caadr x) ,@(cdadr x))))
(let
((f (make-syntax `(,(caadr x) ,@(cdadr x)) (cddr x))))
(if (syntax-match? '() 'proc f)
`(macro ,(caadr x) ,f)
(error 'extend-syntax
"does not fit 'with' pattern"
f
'proc))))
(else (error 'extend-syntax "invalid syntax" x)))))
(macro extend-syntax/code
(lambda (x)
(cond
((and
(syntax-match?
'(extend-syntax/code)
'(extend-syntax/code (key1 key2 ...) clause ...)
x)
(andmap symbol? `(,(caadr x) ,@(cdadr x))))
(let
((f (make-syntax `(,(caadr x) ,@(cdadr x)) (cddr x))))
(if (syntax-match? '() 'proc f)
`',f
(error 'extend-syntax/code
"does not fit 'with' pattern"
f
'proc))))
(else (error 'extend-syntax/code "invalid syntax" x)))))
) ;;; end of let
;;; end extend.sch
∂23-Nov-87 1739 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU [net%TUB.BITNET: Pretty printer]
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Nov 87 17:39:19 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 23 Nov 87 20:40:03 EST
Date: Mon, 23 Nov 87 20:38:17 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: [net%TUB.BITNET: Pretty printer]
To: scheme@MC.LCS.MIT.EDU
Message-ID: <290381.871123.JAR@AI.AI.MIT.EDU>
[I have already sent him the pretty-printer from T, but I thought
I'd give other people a chance to reply. --JAR]
Date: Mon, 23 Nov 87 19:48:07 +0100
From: Oliver Laumann <net%TUB.BITNET at MITVMA.MIT.EDU>
To: scheme-request at mc.lcs.mit.edu
Re: Pretty printer
I'm looking for a (possibly simple-minded) Scheme pretty printer that
is available for free. I have (almost) completed the implementation of
a Scheme interpreter, and it seems to work quite well so far, but
unfortunately I haven't ever been exposed to Lisp and similar languages
before, so the (probably trivial) task of writing something like a
pretty printer would certainly take me a day or longer. For certain
reasons I can't use the pretty printer that comes with CScheme.
Any help is appreciated.
--
Regards,
Oliver Laumann, Technical University of Berlin, Germany.
...!pyramid!tub!net or net@TUB.BITNET
∂23-Nov-87 1816 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU [net%TUB.BITNET: Questions]
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Nov 87 18:16:43 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 23 Nov 87 20:41:48 EST
Date: Mon, 23 Nov 87 20:40:07 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: [net%TUB.BITNET: Questions]
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <290382.871123.JAR@AI.AI.MIT.EDU>
Could the responsible parties please answer these questions, and post
the questions and answers to the scheme mailing list? Thanks.
-Jonathan
Date: Mon, 23 Nov 87 19:28:38 +0100
From: Oliver Laumann <net%TUB.BITNET at MITVMA.MIT.EDU>
To: scheme-request at mc.lcs.mit.edu
Re: Questions
I have two minor questions about the Revised↑3 Report of Scheme.
1) The report mentions two procedures (close-input-port <port>) and
(close-output-port <port>). I don't see why it is necessary to
have two procedures to close ports. Wouldn't it be sufficient
to have something like "close-port" that can be applied to both
types of ports?
2) What is the exact difference between (write-char <char>) and
(display <char>)? "write-char" seems to be redundant. Is "display"
supposed to terminate its output by a space or newline or something
like this?
I'm sorry if the answers are obvious; I'm relatively new to Scheme.
--
Regards,
Oliver Laumann, Technical University of Berlin, Germany.
...!pyramid!tub!net or net@TUB.BITNET
∂24-Nov-87 0006 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu SICP Sources
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 24 Nov 87 00:06:44 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 24 Nov 87 02:13:05 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA18776; Mon, 23 Nov 87 22:50:46 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 24 Nov 87 05:52:07 GMT
From: iris!windley@ucdavis.ucdavis.edu (Phil Windley)
Organization: U.C. Davis - College of Engineering
Subject: SICP Sources
Message-Id: <564@ucdavis.ucdavis.edu>
References: <290381.871123.JAR@AI.AI.MIT.EDU>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Is the code in SICP (Sussman and Abelson) available electronically? I
seeme to remember hearing it was on prep once, but I couldn't find it.
I'm especially interested in chapters 4 & 5 since I will be doing
those next quarter. Thanks.
Phil Windley
Robotics Research Lab
University of California, Davis
Phil Windley
Robotics Research Lab
University of California, Davis
∂24-Nov-87 0415 @MC.LCS.MIT.EDU:cph@KLEPH.AI.MIT.EDU [net%TUB.BITNET: Questions]
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 24 Nov 87 04:14:53 PST
Received: from kleph (TCP 2206400254) by MC.LCS.MIT.EDU 24 Nov 87 07:18:00 EST
Received: by KLEPH.AI.MIT.EDU; Mon, 23 Nov 87 21:53:31 est
Date: Mon, 23 Nov 87 21:53:31 est
From: cph@KLEPH.AI.MIT.EDU (Chris Hanson)
Message-Id: <8711240253.AA21474@kleph>
To: net%TUB.BITNET@MITVMA.MIT.EDU
Cc: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: Jonathan A Rees's message of Mon, 23 Nov 87 20:40:07 EST <290382.871123.JAR@AI.AI.MIT.EDU>
Subject: [net%TUB.BITNET: Questions]
Reply-To: cph@mc.lcs.mit.edu
Date: Mon, 23 Nov 87 19:28:38 +0100
From: Oliver Laumann <net%TUB.BITNET at MITVMA.MIT.EDU>
I'll answer your second question and leave the first for someone else.
2) What is the exact difference between (write-char <char>) and
(display <char>)? "write-char" seems to be redundant. Is "display"
supposed to terminate its output by a space or newline or something
like this?
There are two reasons for this. First is the historical development
of the standard. Originally, when `display' was defined, its action
on characters was defined to be the same as `write'. So at that time
`write-char' was not redundant. Later `display' was changed to treat
characters specially, creating the redundancy.
Second, `display' is a generic operation, in the sense that it will
print any object. It recursively prints compound structures, treating
any imbedded strings and characters specially. Because of this, it is
a moderately expensive operation to perform, since it potentially will
have to do quite a bit of work. On the other hand, `write-char' is a
very simple operation, in fact the simplest output operation (all of
the other output procedures could be defined in terms of it). Because
of this it can be very efficiently implemented.
Finally, there is my own personal bias -- MIT Scheme has a
non-standard output procedure called `write-string', which accepts a
single string argument and prints it exactly as `display' would.
Using `write-char', `write-string', and `write', I've found that I
never need to use `display'. This is because all of the instances
where I would have used `display', I actually mean `write-string', so
I use the latter instead.
∂24-Nov-87 1018 @MC.LCS.MIT.EDU:dyb@iuvax.cs.indiana.edu Re: [net%TUB.BITNET: Questions]
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 24 Nov 87 10:18:50 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 24 Nov 87 13:19:44 EST
Date: Tue, 24 Nov 87 13:14:07 est
From: R. Kent Dybvig <dyb@iuvax.cs.indiana.edu>
To: cph%kleph.ai.mit.edu@RELAY.CS.NET
Subject: Re: [net%TUB.BITNET: Questions]
Cc: rrrs-authors@mc.lcs.mit.edu
From: Chris Hanson <cph%kleph.ai.mit.edu@RELAY.CS.NET>
To: net%TUB.BITNET@MITVMA.MIT.EDU
Cc: rrrs-authors@mc.lcs.mit.edu
Subject: [net%TUB.BITNET: Questions]
Date: Mon, 23 Nov 87 19:28:38 +0100
From: Oliver Laumann <net%TUB.BITNET at MITVMA.MIT.EDU>
I'll answer your second question and leave the first for someone else.
2) What is the exact difference between (write-char <char>) and
(display <char>)? "write-char" seems to be redundant. Is "display"
supposed to terminate its output by a space or newline or something
like this?
Second, `display' is a generic operation, in the sense that it will
print any object. It recursively prints compound structures, treating
any imbedded strings and characters specially. Because of this, it is
a moderately expensive operation to perform, since it potentially will
have to do quite a bit of work. On the other hand, `write-char' is a
very simple operation, in fact the simplest output operation (all of
the other output procedures could be defined in terms of it). Because
of this it can be very efficiently implemented.
There is a more important reason related to the fact that "display" is a
generic operation. Character objects are not guaranteed to be distinct
from other objects, although they are in some implementations. So, for
example, it is possible to represent them as a range of integers or as
unit-length strings. Since display will always choose to print integers
as integers and strings as strings, the procedure "write-char" is needed
to force a character so represented to be treated as a character.
∂24-Nov-87 1414 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU [dyb: [net%TUB.BITNET: Questions]]
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 24 Nov 87 14:14:36 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 24 Nov 87 17:04:24 EST
Date: Tue, 24 Nov 87 17:02:22 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: [dyb: [net%TUB.BITNET: Questions]]
To: net%TUB.BITNET@MITVMA.MIT.EDU
cc: scheme@MC.LCS.MIT.EDU
Message-ID: <290866.871124.JAR@AI.AI.MIT.EDU>
Date: Tue, 24 Nov 87 13:14:07 est
From: R. Kent Dybvig <dyb at iuvax.cs.indiana.edu>
...
Date: Mon, 23 Nov 87 19:28:38 +0100
From: Oliver Laumann <net%TUB.BITNET at MITVMA.MIT.EDU>
To: scheme-request@mc.lcs.mit.edu
What is the exact difference between (write-char <char>) and
(display <char>)? "write-char" seems to be redundant. Is "display"
supposed to terminate its output by a space or newline or something
like this?
... Character objects are not guaranteed to be distinct
from other objects, although they are in some implementations. So, for
example, it is possible to represent them as a range of integers or as
unit-length strings. Since display will always choose to print integers
as integers and strings as strings, the procedure "write-char" is needed
to force a character so represented to be treated as a character.
∂27-Nov-87 2137 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu SCHEME interpreter in Common Lisp?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 27 Nov 87 21:37:17 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 28 Nov 87 00:37:03 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA15661; Fri, 27 Nov 87 21:27:31 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 28 Nov 87 05:08:26 GMT
From: stever@EDDIE.MIT.EDU (Stephen Robbins)
Organization: MIT EE/CS Computer Facility, Cambridge, MA
Subject: SCHEME interpreter in Common Lisp?
Message-Id: <7516@eddie.MIT.EDU>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Hi,
I'm looking for a SCHEME interpreter/compiler written in Common Lisp,
for instructional use on Symbolics LISPMs. My main concern is that it
be properly tail-recursive. Speed isn't much of a priority, since
I'll be using it mainly for teaching.
What I've done in the interim is to write a Common Lisp function
which uses a giant TAGBODY and follows the interpreter given in
Structure and Interpretation of Computer Programs. Thanks to the
TAGBODY, I can get tail recursion by using (GO). But this requires
implementing an interpreter, rather than having a way to compile
SCHEME to Common Lisp.
Does anyone have an implementation that might help me?
- Stephen
P.S. If anyone is interested in a copy of my little hack, I'll be
glad to pass it along. I'm probably going to continue expanding it in
my spare time...
--
We live in a society that has replaced wisdom with knowledge, and
is trying to replace knowledge with information. My goal is wisdom.
∂30-Nov-87 1451 @MC.LCS.MIT.EDU:MUSE@XX.LCS.MIT.EDU PC Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 30 Nov 87 14:50:53 PST
Received: from XX.LCS.MIT.EDU (CHAOS 2420) by MC.LCS.MIT.EDU 30 Nov 87 17:51:43 EST
Date: Mon 30 Nov 87 17:46:31-EST
From: Tom Cloney <MUSE@XX.LCS.MIT.EDU>
Subject: PC Scheme
To: scheme@MC.LCS.MIT.EDU
Message-ID: <12354833344.31.MUSE@XX.LCS.MIT.EDU>
F
-------
∂01-Dec-87 1234 @MC.LCS.MIT.EDU,@ZERMATT.LCS.MIT.EDU:MUSE@OZ.AI.MIT.EDU PC Scheme hardware interfacing
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 1 Dec 87 12:33:55 PST
Received: from ZERMATT.LCS.MIT.EDU (CHAOS 17316) by MC.LCS.MIT.EDU 1 Dec 87 15:34:27 EST
Received: from ENIAC.LCS.MIT.EDU by ZERMATT.LCS.MIT.EDU via CHAOS with CHAOS-MAIL id 98874; Tue 1-Dec-87 15:28:22 EST
Date: Tue, 1 Dec 87 15:28 EST
From: Tom Cloney <MUSE@OZ.AI.MIT.EDU>
Subject: PC Scheme hardware interfacing
To: scheme@MC.LCS.MIT.EDU
Message-ID: <871201152828.1.MUSE@ENIAC.LCS.MIT.EDU>
What are good places to look (and people to ask) about details of
the PC Scheme implementation, such as how ports are constructed,
whether there are existing primitives for reading and writing memory
locations, and what useful code is floating around locally?
I am trying to interest people in my research group in using Scheme
for what hacking is done on the IBMPC, but the existing documentation
doesn't say much about hardware interfacing unless it is done through
interrupts or XLI.
I am particularly interested in anything specific to the T3100, such as
COM1 and parallel port drivers.
Please add me to the mailing list.
Thanks,
Tom Cloney (Muse@Oz)
∂01-Dec-87 1510 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu The mini-SCHEME interpreter I've sent to some people
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 1 Dec 87 15:10:10 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 1 Dec 87 18:09:23 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA29211; Tue, 1 Dec 87 14:06:31 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 1 Dec 87 19:27:13 GMT
From: stever@EDDIE.MIT.EDU (Stephen Robbins)
Organization: MIT EE/CS Computer Facility, Cambridge, MA
Subject: The mini-SCHEME interpreter I've sent to some people
Message-Id: <7554@eddie.MIT.EDU>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Several people in this mailing list have requested copies of my
little SCHEME interpreter. I sent out several which had a
rather severe bug.
I'm afraid I've lost the list of people who requested copies. If
you received a buggy copy, please let me know and I'll mail a new one.
Thank you,
Stephen
--
We live in a society that has replaced wisdom with knowledge, and
is trying to replace knowledge with information. My goal is wisdom.
∂01-Dec-87 1610 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Lisp is Crisp! Lisp is Crisp! Lisp is Crisp! Lisp is Crisp!
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 1 Dec 87 16:10:08 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 1 Dec 87 19:11:36 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA01857; Tue, 1 Dec 87 15:58:44 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 1 Dec 87 20:36:05 GMT
From: mind!apoorva@princeton.edu (Apoorva Muralidhara)
Organization: Cognitive Science, Princeton University
Subject: Lisp is Crisp! Lisp is Crisp! Lisp is Crisp! Lisp is Crisp!
Message-Id: <1409@mind.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Any fellow applicativists out there?
--Apoorva/Applicativist Revolutionary Underground
[Death to the side effects!]
∂01-Dec-87 1645 @MC.LCS.MIT.EDU,@RELAY.CS.NET:willc@tekchips.tek.com two questions
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 1 Dec 87 16:45:44 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 1 Dec 87 19:24:43 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa15361; 1 Dec 87 18:54 EST
Received: from tektronix.tek.com by RELAY.CS.NET id as20460; 1 Dec 87 18:48 EST
Received: by tektronix.TEK.COM (5.51/6.24)
id AA04487; Tue, 1 Dec 87 15:22:48 PST
Received: by tekchips.TEK.COM (5.51/6.24)
id AA27353; Tue, 1 Dec 87 15:21:07 PST
Message-Id: <8712012321.AA27353@tekchips.TEK.COM>
To: scheme@mc.lcs.mit.edu
Cc: net%tub.bitnet@RELAY.CS.NET
Subject: two questions
Date: 01 Dec 87 15:21:05 PST (Tue)
From: willc%tekchips.tek.com@RELAY.CS.NET
>Could the responsible parties please answer these questions, and post
>the questions and answers to the scheme mailing list? Thanks.
>-Jonathan
Maybe that should be "irresponsible parties". I guess someone has to take
the rap, so here are my excuses.
1) The report mentions two procedures (close-input-port <port>) and
(close-output-port <port>). I don't see why it is necessary to
have two procedures to close ports. Wouldn't it be sufficient
to have something like "close-port" that can be applied to both
types of ports?
Yes, and I would not be surprised if most Scheme implementations do it
that way internally. OPEN-INPUT-FILE and OPEN-OUTPUT-FILE need to be
distinct, and I guess it seemed more symmetric for them to have distinct
"inverses".
2) What is the exact difference between (write-char <char>) and
(display <char>)? "write-char" seems to be redundant. Is "display"
supposed to terminate its output by a space or newline or something
like this?
Chris Hanson noted the historical fact that DISPLAY originally acted like
WRITE on characters, so WRITE-CHAR was once necessary for that reason. He
noted also that DISPLAY, being generic, is likely to be much less efficient
than WRITE-CHAR. Kent Dybvig pointed out that characters are not guaranteed
to be distinct from other data types, say small integers or strings of one
character, so WRITE-CHAR is the only portable way you can write a character
itself as opposed to some representation of the character. Thus WRITE-CHAR
remains necessary.
Peace,
William Clinger
∂02-Dec-87 1640 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: (Lisp is Crisp!)↑4
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 2 Dec 87 16:40:46 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 2 Dec 87 19:42:10 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA00440; Wed, 2 Dec 87 15:55:54 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 2 Dec 87 18:40:42 GMT
From: umich!dwt@umix.cc.umich.edu (David West)
Organization: University of Michigan EECS Dept. Ann Arbor
Subject: Re: (Lisp is Crisp!)↑4
Message-Id: <584@zippy.eecs.umich.edu>
References: <1409@mind.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
In article <1409@mind.UUCP> apoorva@mind.UUCP (Apoorva Muralidhara) writes:
>
>Any fellow applicativists out there?
> --Apoorva/Applicativist Revolutionary Underground
>
>[Death to the side effects!]
Applicativity has its advantages, but it needs
1) a more humanly-comprehensible syntax than LISP; Miranda (TM) is excellent
in this respect, but the (TM) will probably doom it, as apparently was the
case with COMIT (TM).
2) Some syntactic means for preventing argumentsfrom getting unreadably
numerous just to pass something down to where it's finally used.
3) a public domain portable optimizing implementation (though all three of
these attributes together is perhaps too much to hope for.) The thing
that made Pascal fly was the availability of the Zurich P-compiler
initially, then Turbo. What the world needs now is GNU Miranda or (ok,
I'll be more reasonable) GNU ML. (Richard is probably too busy, though...)
Turbo ML?
-David West dwt@zippy.eecs.umich.edu
[Nested parentheses - just say no]
∂02-Dec-87 1858 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu data structures <--> functions
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 2 Dec 87 18:58:23 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 2 Dec 87 21:57:45 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA03603; Wed, 2 Dec 87 18:21:31 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 2 Dec 87 19:14:11 GMT
From: johnson@mimsy.umd.edu (Greg Johnson)
Organization: U of Maryland, Dept. of Computer Science, Coll. Pk., MD 20742
Subject: data structures <--> functions
Message-Id: <9597@mimsy.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
In Lisp(s), one is able to build a list whose `car' is the atom `lambda',
and then apply this object as a function to arguments:
(setq add2 '(lambda (x) (+ 2 x)))
(lambda (x) (+ 2 x))
(add2 45)
47
Scheme seems to lack this property. So does ML. In short, the pun that
exists in classic lisps between data structures and functions seems to have
been abandoned. Unless you write an interpreter subroutine, you cannot have
a program build a data structure and then use it as an executable function.
Is there some `sanctioned' way that a data structure that `looks' like a
lambda abstraction can be turned into a closure? I tried opening a file for
writing, writing the object out, closing the file, opening it for reading,
and reading the object in using various read primitives, but that didn't
work.
The C Scheme interpreter I have (release 4.1.1) has an undocumented function
named `eval' (surprise!) that appears to take two arguments, an object
to be interpreted and an environment relative to which the interpretation
should take place. By reading Scheme source code, functions to create
and manipulate environments can be found.
A more general question, for those well imbued in the Lisp culture: how
much of a loss is it (or rather, `would it be' if there is in fact some
sanctioned, clean, efficient way to do the above) not to have a mechanism
for lisp programs to build their own functions?
- Greg Johnson
johnson@mimsy.umd.edu
∂02-Dec-87 1953 @MC.LCS.MIT.EDU:gjc@bucsf.bu.edu in reply to "nested parens - just say no"
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 2 Dec 87 19:53:18 PST
Received: from bu-it.BU.EDU (TCP 20061201050) by MC.LCS.MIT.EDU 2 Dec 87 22:53:53 EST
Received: from bucsf (128.197.2.9) by bu-it.BU.EDU (3.2/4.7)
id AA04875; Wed, 2 Dec 87 22:41:34 EST
Return-Path: <gjc@bucsf.bu.edu>
Received: by bucsf (4.12/4.7)
id AA17544; Wed, 2 Dec 87 22:46:12 est
Date: Wed, 2 Dec 87 22:46:12 est
From: gjc@bucsf.bu.edu (George J. Carrette)
Message-Id: <8712030346.AA17544@bucsf>
To: scheme@mc.lcs.mit.edu
Subject: in reply to "nested parens - just say no"
Ah, its messages like this that lighten my day.
But seriously folks, one thing I may be famous or damned for was
porting CGOL (based on a theory of parsing presented in: Pratt,
Vaughan R., ``Top Down Operator Precedence,'' ACM Symposium on
Principles of Programming Languages Boston, MA; October, 1973.
Yes, 14 years ago kiddies) from maclisp to the MIT lispmachine environment,
(so I probably did the port around 1981).
In short, this makes for an efficient way to extend the lisp syntax
toward the post algol abortions of the sixities and seventies, without
going through all the grammar compilation parsing hair that compiler
books of the same era where famous for spending 99% of their discourse
alotment on.
Others have moved this port of CGOL to at least the Symbolics, LMI,
and TI systems, so although it did not seem to show up in the franz
lisp distribution (unlike most of the other "maclisp extensions" at
the time) the code has not died.
Challenge: PORT CGOL to Scheme.
Hint: Its written in CGOL, not lisp.
∂02-Dec-87 2130 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU data structures <--> functions
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 2 Dec 87 21:30:16 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 3 Dec 87 00:07:38 EST
Date: Thu, 3 Dec 87 00:04:53 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: data structures <--> functions
To: johnson@MIMSY.UMD.EDU
cc: scheme@MC.LCS.MIT.EDU
In-reply-to: Msg of 2 Dec 87 19:14:11 GMT from johnson at mimsy.umd.edu (Greg Johnson)
Message-ID: <293963.871203.JAR@AI.AI.MIT.EDU>
Date: 2 Dec 87 19:14:11 GMT
From: johnson at mimsy.umd.edu (Greg Johnson)
I tried opening a file for writing, writing the object out, closing
the file, opening it for reading, and reading the object in using
various read primitives, but that didn't work.
Try something like
(define evaluate
(lambda (expression)
(call-with-output-file "temp"
(lambda (port)
(write `(define temp ,expression) port)))
(load "temp")
temp))
if you can manage to do so without making yourself ill.
∂03-Dec-87 1405 @MC.LCS.MIT.EDU:carr%car@cs.utah.edu scheme benchmarks
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 3 Dec 87 14:04:56 PST
Received: from cs.utah.edu (TCP 1200000004) by MC.LCS.MIT.EDU 3 Dec 87 17:03:52 EST
Received: by cs.utah.edu (5.54/utah-2.0-cs)
id AA28109; Thu, 3 Dec 87 14:55:57 MST
Received: by car.UTAH.EDU (4.30/4.40.2)
id AA19980; Thu, 3 Dec 87 14:56:37 mst
Date: Thu, 3 Dec 87 14:56:37 mst
From: carr%car@cs.utah.edu (Harold Carr)
Message-Id: <8712032156.AA19980@car.UTAH.EDU>
To: scheme@mc.lcs.mit.edu
Subject: scheme benchmarks
Is there a collection of results of scheme implementations running
significant benchmarks (something at least of the order of the Gabriel
benchmarks)?
I would be especially interested in how MacScheme, PC Scheme,
Chez Scheme, T, Vincennes Scheme and Cscheme compare with each other,
and against various Common Lisps running the same benchmarks.
Thanks,
Harold
∂03-Dec-87 1534 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Applicative languages? Anyone?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 3 Dec 87 15:33:58 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 3 Dec 87 18:32:24 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA28209; Thu, 3 Dec 87 15:01:44 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 3 Dec 87 17:40:17 GMT
From: hp-pcd!uoregon!markv@hplabs.hp.com (Mark VandeWettering)
Organization: University of Oregon, Computer Science, Eugene OR
Subject: Applicative languages? Anyone?
Message-Id: <1202@uoregon.UUCP>
References: <1409@mind.UUCP>, <584@zippy.eecs.umich.edu>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
In article <584@zippy.eecs.umich.edu> dwt@zippy.eecs.umich.edu (David West) writes:
>Applicativity has its advantages, but it needs
>1) a more humanly-comprehensible syntax than LISP; Miranda (TM) is excellent
> in this respect, but the (TM) will probably doom it, as apparently was the
> case with COMIT (TM).
I have just recently become interested in functional/applicative
prramming. Having read several essays on Miranda, I am amazed
at the high level that programs can be described in Miranda.
While suffering from some problems (as noted by Dave West),
Miranda seems excellent for simple and not-so-simple programming
jobs.
>2) Some syntactic means for preventing argumentsfrom getting unreadably
> numerous just to pass something down to where it's finally used.
I have seen an extension to prolog for object-oriented
programming that works in much this way. Normally, object state
is represented by a structure which is passed and has fields
(corresponding to instance-vars) bound to new values as the
object changes state. This allows you to backtrack through
object changes, which would be hard to do if we used real
assignment. But passing these objects around is tedious, so
"syntactic sugar" is developped to carry the object state
around. For more info, see University of Oregon Tech Report
-TR-87-09, "Object Oriented Programming with First Order Logic",
by John S. Conery.
>3) a public domain portable optimizing implementation (though all three of
> these attributes together is perhaps too much to hope for.) The thing
> that made Pascal fly was the availability of the Zurich P-compiler
> initially, then Turbo. What the world needs now is GNU Miranda or (ok,
> I'll be more reasonable) GNU ML. (Richard is probably too busy, though...)
> Turbo ML?
Hmmm, not a bad idea. I have just acquired "Implementation of
Functional Programming Languages by Simon L. Peyton Jones, and
am much impressed by the depth/level of the text. Seeing as I
have to do a final thesis/project sometime :-) I might be
tempted to try a hand at an ML interpreter/compiler. I would
like to hear from anyone who is trying/has tried similar
projects.
markv@uoregon.edu \ Mark Terrence VandeWettering
University of Oregon \ ..!tektronix!uoregon!markv
Computer Science Dept. \
∂04-Dec-87 0219 @MC.LCS.MIT.EDU,@RELAY.CS.NET:csnet@bernina.uucp Re: (Lisp is Crisp!)↑4
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 4 Dec 87 02:19:09 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 4 Dec 87 05:18:38 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa28512; 4 Dec 87 5:05 EST
Received: from switzerland by RELAY.CS.NET id ak08082; 4 Dec 87 4:53 EST
Received: from ean by SWITZERLAND.CSNET id a015061; 3 Dec 87 17:07 MET
Date: 3 Dec 87 17:07 +0100
From: David West <umich!dwt@UMIX.CC.UMICH.EDU>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Message-ID: <584@zippy.eecs.umich.edu>
References: <1409@mind.UUCP>
Subject: Re: (Lisp is Crisp!)↑4
>Organization: University of Michigan EECS Dept. Ann Arbor
In article <1409@mind.UUCP> apoorva@mind.UUCP (Apoorva Muralidhara) writes:
>
>Any fellow applicativists out there?
> --Apoorva/Applicativist Revolutionary Underground
>
>[Death to the side effects!]
Applicativity has its advantages, but it needs
1) a more humanly-comprehensible syntax than LISP; Miranda (TM) is excellent
in this respect, but the (TM) will probably doom it, as apparently was the
case with COMIT (TM).
2) Some syntactic means for preventing argumentsfrom getting unreadably
numerous just to pass something down to where it's finally used.
3) a public domain portable optimizing implementation (though all three of
these attributes together is perhaps too much to hope for.) The thing
that made Pascal fly was the availability of the Zurich P-compiler
initially, then Turbo. What the world needs now is GNU Miranda or (ok,
I'll be more reasonable) GNU ML. (Richard is probably too busy, though...)
Turbo ML?
-David West dwt@zippy.eecs.umich.edu
[Nested parentheses - just say no]
∂04-Dec-87 0254 @MC.LCS.MIT.EDU,@RELAY.CS.NET:csnet@bernina.uucp in reply to "nested parens - just say no"
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 4 Dec 87 02:53:53 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 4 Dec 87 05:21:53 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa28546; 4 Dec 87 5:10 EST
Received: from switzerland by RELAY.CS.NET id ao08082; 4 Dec 87 4:55 EST
Received: from ean by SWITZERLAND.CSNET id a015317; 3 Dec 87 17:12 MET
Date: 3 Dec 87 17:12 +0100
From: "George J. Carrette" <gjc%bucsf.bu.edu@RELAY.CS.NET>
To: scheme@mc.lcs.mit.edu
Message-ID: <8712030346.AA17544@bucsf>
Subject: in reply to "nested parens - just say no"
Ah, its messages like this that lighten my day.
But seriously folks, one thing I may be famous or damned for was
porting CGOL (based on a theory of parsing presented in: Pratt,
Vaughan R., ``Top Down Operator Precedence,'' ACM Symposium on
Principles of Programming Languages Boston, MA; October, 1973.
Yes, 14 years ago kiddies) from maclisp to the MIT lispmachine environment,
(so I probably did the port around 1981).
In short, this makes for an efficient way to extend the lisp syntax
toward the post algol abortions of the sixities and seventies, without
going through all the grammar compilation parsing hair that compiler
books of the same era where famous for spending 99% of their discourse
alotment on.
Others have moved this port of CGOL to at least the Symbolics, LMI,
and TI systems, so although it did not seem to show up in the franz
lisp distribution (unlike most of the other "maclisp extensions" at
the time) the code has not died.
Challenge: PORT CGOL to Scheme.
Hint: Its written in CGOL, not lisp.
∂04-Dec-87 0327 @MC.LCS.MIT.EDU,@RELAY.CS.NET:csnet@bernina.uucp data structures <--> functions
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 4 Dec 87 03:27:48 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 4 Dec 87 05:22:00 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa28547; 4 Dec 87 5:10 EST
Received: from switzerland by RELAY.CS.NET id an08082; 4 Dec 87 4:55 EST
Received: from ean by SWITZERLAND.CSNET id a015179; 3 Dec 87 17:09 MET
Date: 3 Dec 87 17:09 +0100
From: Greg Johnson <johnson@mimsy.umd.edu>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Message-ID: <9597@mimsy.UUCP>
Subject: data structures <--> functions
>Organization: U of Maryland, Dept. of Computer Science, Coll. Pk., MD 20742
In Lisp(s), one is able to build a list whose `car' is the atom `lambda',
and then apply this object as a function to arguments:
(setq add2 '(lambda (x) (+ 2 x)))
(lambda (x) (+ 2 x))
(add2 45)
47
Scheme seems to lack this property. So does ML. In short, the pun that
exists in classic lisps between data structures and functions seems to have
been abandoned. Unless you write an interpreter subroutine, you cannot have
a program build a data structure and then use it as an executable function.
Is there some `sanctioned' way that a data structure that `looks' like a
lambda abstraction can be turned into a closure? I tried opening a file for
writing, writing the object out, closing the file, opening it for reading,
and reading the object in using various read primitives, but that didn't
work.
The C Scheme interpreter I have (release 4.1.1) has an undocumented function
named `eval' (surprise!) that appears to take two arguments, an object
to be interpreted and an environment relative to which the interpretation
should take place. By reading Scheme source code, functions to create
and manipulate environments can be found.
A more general question, for those well imbued in the Lisp culture: how
much of a loss is it (or rather, `would it be' if there is in fact some
sanctioned, clean, efficient way to do the above) not to have a mechanism
for lisp programs to build their own functions?
- Greg Johnson
johnson@mimsy.umd.edu
∂04-Dec-87 0401 @MC.LCS.MIT.EDU,@RELAY.CS.NET:csnet@bernina.uucp data structures <--> functions
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 4 Dec 87 04:00:53 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 4 Dec 87 05:22:07 EST
Received: from relay2.cs.net by RELAY.CS.NET id ab28546; 4 Dec 87 5:10 EST
Received: from switzerland by RELAY.CS.NET id ap08082; 4 Dec 87 4:56 EST
Received: from ean by SWITZERLAND.CSNET id a015364; 3 Dec 87 17:12 MET
Date: 3 Dec 87 17:12 +0100
From: Jonathan A Rees <JAR@mc.lcs.mit.edu>
To: johnson@mimsy.umd.edu
Cc: scheme@mc.lcs.mit.edu
In-Reply-To: <Msg of 2 Dec 87 19:14:11 GMT from johnson at mimsy.umd.edu (Greg Johnson)>
Message-ID: <293963.871203.JAR@AI.AI.MIT.EDU>
Subject: data structures <--> functions
Date: 2 Dec 87 19:14:11 GMT
From: johnson at mimsy.umd.edu (Greg Johnson)
I tried opening a file for writing, writing the object out, closing
the file, opening it for reading, and reading the object in using
various read primitives, but that didn't work.
Try something like
(define evaluate
(lambda (expression)
(call-with-output-file "temp"
(lambda (port)
(write `(define temp ,expression) port)))
(load "temp")
temp))
if you can manage to do so without making yourself ill.
∂04-Dec-87 0911 @MC.LCS.MIT.EDU:reddy@b.cs.uiuc.edu Applicative languages? Anyone?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 4 Dec 87 09:11:30 PST
Received: from b.cs.uiuc.edu (TCP 30001242402) by MC.LCS.MIT.EDU 4 Dec 87 12:09:17 EST
Received: by b.cs.uiuc.edu (UIUC-5.52/9.7)
id AA16314; Fri, 4 Dec 87 11:05:26 CST
Date: Fri, 4 Dec 87 11:05:26 CST
From: reddy@b.cs.uiuc.edu (Uday S. Reddy)
Message-Id: <8712041705.AA16314@b.cs.uiuc.edu>
To: scheme@mc.lcs.mit.edu
Subject: Applicative languages? Anyone?
>2) Some syntactic means for preventing argumentsfrom getting unreadably
> numerous just to pass something down to where it's finally used.
This is an interesting issue. I can think of two solutions right
away:
1. Package up all the arguments into a data structure (say an
association-list or an object), and then you only need to pass around
one data structure. (A good way to implement this data structure
would be as a "frame" a la Abelson and Sussman. I have tried earlier
to lobby for a "make-frame" primitive, like the "make-environment"
primitive, but was unsuccessful).
2. If this passing around of arguments is happening internal to a
function, use lexical scoping. Say f is a function that needs n
arguments. Define it as
(define (f x1 x2 ... xn)
(define (local-function1) ...)
...
(define (local-functionk) ...)
...)
The arguments x1,...,xn need not be passed to every local-function.
What is wrong with these solutios? Perhaps there is a different
problem that you have in mind, but haven't stated precisely yet.
Uday Reddy
University of Illinois
∂04-Dec-87 1400 @MC.LCS.MIT.EDU:sullivan@marge.math.binghamton.edu ML
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 4 Dec 87 13:58:52 PST
Received: from marge.math.binghamton.edu (TCP 20070401001) by MC.LCS.MIT.EDU 4 Dec 87 16:32:23 EST
Received: by marge.math.binghamton.edu (5.54)
id AA11927; Fri, 4 Dec 87 16:26:03 EST
From: fred sullivan <sullivan@marge.math.binghamton.edu>
Message-Id: <8712042126.AA11927@marge.math.binghamton.edu>
To: scheme@mc.lcs.mit.edu
Date: Fri, 4 Dec 87 16:26:01 EST
Subject: ML
X-Mailer: Elm [version 1.5]
I have heard rumors of a public domain (or free) ML interpreter. Does
anyone know about this? I have a VAX running Ultrix.
Thanks,
Fred Sullivan
Department of Mathematical Sciences
State University of New York at Binghamton
Binghamton, New York 13903
Email: sullivan@marge.math.binghamton.edu
∂04-Dec-87 1455 @MC.LCS.MIT.EDU,@XX.LCS.MIT.EDU,@MITVMA.MIT.EDU:PS33@MCGILLA.NETNORTH
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 4 Dec 87 14:55:10 PST
Received: from XX.LCS.MIT.EDU (CHAOS 2420) by MC.LCS.MIT.EDU 4 Dec 87 17:08:47 EST
Received: from MITVMA.MIT.EDU by XX.LCS.MIT.EDU with TCP/SMTP; Fri 4 Dec 87 17:01:19-EST
Received: from MITVMA.MIT.EDU by MITVMA.MIT.EDU ; Fri, 04 Dec 87 16:47:10 EST
Received: from MCGILL.NETNORTH.CA by MITVMA.MIT.EDU (Mailer X1.25) with BSMTP
id 9786; Fri, 04 Dec 87 16:47:08 EST
Received: by MCGILL1 (Mailer X1.24) id 9181; Fri, 04 Dec 87 16:42:16 EST
Date: FRI DEC 04, 1987 16.41.57
From: PS33%MCGILLA.BITNET@MITVMA.MIT.EDU
To: SCHEME@MC.LCS.MIT.EDU
From: Tom Shultz, Dept. of Psychology, McGill Univ.
ps33@mcgilla.bitnet
Subject: data structures <--> functions
Comments: To: Jonathan A Rees <JAR@mc.lcs.mit.edu>
Comments: cc: scheme@mc.lcs.mit.edu
In-Reply-To: <Msg of 3 Dec 87 17:12>
>>>Try something like
>>> (define evaluate
>>> (lambda (expression)
>>> (call-with-output-file "temp"
>>> (lambda (port)
>>> (write `(define temp ,expression) port)))
>>> (load "temp")
>>> temp))
>>>if you can manage to do so without making yourself ill.
One of the problems with this approach is that both "load"
and "eval" are supposed to be avoided by MacScheme users
wanting to take advantage of selective linking. Another problem
is the slowness of accessing an external file.
There really should be a better solution for this general problem
of having a program build a data structure and then execute it as
a function.
Any ideas?
∂04-Dec-87 1544 @MC.LCS.MIT.EDU:NIKHIL@XX.LCS.MIT.EDU ML implementations
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 4 Dec 87 15:44:20 PST
Received: from XX.LCS.MIT.EDU (CHAOS 2420) by MC.LCS.MIT.EDU 4 Dec 87 17:51:10 EST
Date: Fri 4 Dec 87 17:45:15-EST
From: Rishiyur S. Nikhil <NIKHIL@XX.LCS.MIT.EDU>
Subject: ML implementations
To: scheme@MC.LCS.MIT.EDU
Message-ID: <12355881689.66.NIKHIL@XX.LCS.MIT.EDU>
There are several implementations of ML in existence, differing in syntax
and semantics. I can name at least the following:
Edinburgh LCF: the ``original'' ML, circa late 1970's. Implemented in
Lisp, I believe, running on Dec-10s.
Unix ML: implemented by Luca Cardelli, Edinburgh, Bell Labs, and now
with DEC. Circa 1983. Syntax substantally influenced by the language
HOPE (Burstall and MacQueen). Compiles to FAM code (Luca's Functional
Abstract Machine) and thence to Vax native code.
LML: ``lazy ML''. Chalmers, Goteborg, Sweden (Tom Johnsson, Lennart
Augustsson, et. al.) Circa early 80's through today. LCF-like
syntax. No side-effects. Normal-order semantics. Compiles to abstract
machine, and then to Vax code (I think). They distribute it.
ML on Poly: David Mathews, Cambridge U. I don't know much about this
at all, except that it is implemented in the language Poly (Mathews'
language), incorporates persistence, and was in existence by 1985.
CAML: ``ML on the Categorical Abstract Machine''. Pierre Curien, et.
al., Univ of Paris. Circa 1986 through today. Subset of SML.
Compiles into CAM code, which I think is then translated into code for
the abstract machine developed by the ``Le Lisp'' folks.
And, perhaps, others. Apologies for omissions/inaccuracies in the
above list.
Beginning about 3-4 years ago, there was a major trans-Atlantic effort
to standardize ML. The result was SML: ``Standard ML''. Over the
last year or so, Dave MacQueen has been leading an effort at ATT Bell
Labs Murray Hill to implement a full SML compiler, written in SML
itself. This Monday (Nov 30), I learned from Dave that the compiler
is now available in beta-test, with sources, under license from ATT.
They're not trying to make money on it, so it's available cheap. It
runs on Vax/Unix at least, and maybe other machines. For details,
Dave can be contacted at
dbm%research.att.com@relay.cs.net
Rishiyur Nikhil (nikhil@xx.lcs.mit.edu)
-------
∂05-Dec-87 0210 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: data structures <--> functions
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 5 Dec 87 02:10:03 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 5 Dec 87 05:05:49 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA07454; Sat, 5 Dec 87 02:02:53 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 4 Dec 87 09:14:50 GMT
From: clyde!watmath!utgpu!jarvis.csri.toronto.edu!utai!jeem@rutgers.edu (Jim des Rivieres)
Organization: CSRI, University of Toronto
Subject: Re: data structures <--> functions
Message-Id: <4171@utai.UUCP>
References: <9597@mimsy.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
In article <9597@mimsy.UUCP>, Greg Johnson asks how much of a loss would it be
to not have a mechanism for a lisp program to build a data structure and then
use it as an executable function?
An analogous question: How much of a loss would it be if all of a standard
stored-program computer's instructions had to reside in read-only memory?
The answer in both cases is that, while the vast majority of programmers would
not be directly inconvenienced by the lack of meta-level facilities , it would
be absolutely crippling to the system programmers that have to supply the
editors, compilers, linkers, and debuggers for that system.
∂05-Dec-87 1042 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU data structures <--> functions
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 5 Dec 87 10:41:51 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 5 Dec 87 13:31:22 EST
Date: Sat, 5 Dec 87 13:34:17 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: data structures <--> functions
To: net%TUB.BITNET@MITVMA.MIT.EDU
cc: SCHEME@AI.AI.MIT.EDU, johnson@MIMSY.UMD.EDU
In-reply-to: Msg of Sat 5 Dec 87 14:06:59 +0100 from Oliver Laumann <net%TUB.BITNET at MITVMA.MIT.EDU>
Message-ID: <295045.871205.JAR@AI.AI.MIT.EDU>
Date: Sat, 5 Dec 87 14:06:59 +0100
From: Oliver Laumann <net%TUB.BITNET at MITVMA.MIT.EDU>
To: scheme-request at mc.lcs.mit.edu
In Scheme you can easily achieve this by first evaluating the list and then
applying the result (a procedure) to the argument 45. Try the following:
(define add2 '(lambda (x) (+ 2 x)))
((eval add2 (the-environment)) 45) --> 47
There is some disagreement here over what exactly "Scheme" means. The
Revised↑3 Report has no EVAL procedure, and no (THE-ENVIRONMENT) special
form, but most Scheme implementations, apparently including the one
you're referring to, do have some kind of EVAL.
There were several reasons for excluding EVAL from the report, including
(a) there is no general agreement among Scheme designers as to what
environment EVAL should evaluate expressions with respect to, or
whether EVAL should take an explicit environment object as an
argument;
(b) it is not clear how to give a formal semantics to EVAL;
(c) EVAL interacts poorly with selective linking.
On the other hand, EVAL is undeniably useful in particular special
situations. (Most of the time that one would be tempted to use EVAL in
ancient Lisps, procedures or ad-hoc interpreters will serve in Scheme.)
EVAL will probably continue to be supported as an unofficial extension in
most implementations for the foreseeable future, and it will probably
continue to not be standardized for a while. The same is true of
macros. This is what happens when a standard is created by a committee.
∂07-Dec-87 2309 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: ML
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 7 Dec 87 23:09:27 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 7 Dec 87 11:35:38 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA23411; Mon, 7 Dec 87 08:31:50 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 7 Dec 87 09:36:00 GMT
From: otter!kers@hplabs.hp.com (Christopher Dollin)
Organization: hplabs-brc Bristol,UK.
Subject: Re: ML
Message-Id: <1510002@otter.HP.COM>
References: <8712042126.AA11927@marge.math.binghamton.edu>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Well it's far from free but ...
If you buy Poplog from System's Designers, you get Sussex University's Poplog
environment with Pop11, Common Lisp, and Prolog. For not a lot extra you can
also have Poplog ML which an implementation of Standard ML, integrated into
Poplog in "the usual" way (ie integrated editor, on-line help).
Poplog also runs on Suns and HP 9000/300s and various other things.
Regards,
Kers (and will it put in my .signature too?)
∂07-Dec-87 2309 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: ML
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 7 Dec 87 23:09:40 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 7 Dec 87 11:36:03 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA23459; Mon, 7 Dec 87 08:33:09 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 7 Dec 87 09:36:39 GMT
From: otter!kers@hplabs.hp.com (Christopher Dollin)
Organization: hplabs-brc Bristol,UK.
Subject: Re: ML
Message-Id: <1510003@otter.HP.COM>
References: <8712042126.AA11927@marge.math.binghamton.edu>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
/ otter:comp.lang.scheme / kers@otter.HP.COM (Christopher Dollin) / 9:36 am Dec 7, 1987 /
Well it's far from free but ...
If you buy Poplog from System's Designers, you get Sussex University's Poplog
environment with Pop11, Common Lisp, and Prolog. For not a lot extra you can
also have Poplog ML which an implementation of Standard ML, integrated into
Poplog in "the usual" way (ie integrated editor, on-line help).
Poplog also runs on Suns and HP 9000/300s and various other things.
Regards,
Kers (and will it put in my .signature too?)
∂08-Dec-87 1620 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU data structures <--> functions
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 8 Dec 87 16:20:43 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 8 Dec 87 19:19:14 EST
Date: Tue, 8 Dec 87 19:23:30 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: data structures <--> functions
To: gjs@ZOHAR.AI.MIT.EDU
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Sun 6 Dec 87 01:51:10 est from gjs at ZOHAR.AI.MIT.EDU (Gerald Jay Sussman)
Message-ID: <296594.871208.JAR@AI.AI.MIT.EDU>
Date: Sun, 6 Dec 87 01:51:10 est
From: gjs at ZOHAR.AI.MIT.EDU (Gerald Jay Sussman)
To: JAR at AI.AI.MIT.EDU
Re: data structures <--> functions
I really feel the need for EVAL (or ENCLOSE) quite seriously.
In particular I find the need to execute code that my programs write.
I wish this would be somehow solved.
How about if we put a meta-circular evaluator into the scheme library
that only knows about the standard R↑3RS global variables? Then if you
wanted to evaluate (+ (EXPT 2 23) 7), you could do
(LOAD "scheme-library/eval") ;or whatever
(EVAL-IN-R↑3RS-ENV '(+ (EXPT 2 23) 7))
Then, although particular implementations could choose to do "efficient"
implementations of this library routine, the beast is implementable in
R↑3 Scheme, so no one could complain about its semantics or any
threat to change the language definition itself.
The only problem is, what if the expression E has free variables (e.g.
FOO) that are defined in the current environment, but not in the R↑3RS
global environment? Well, if FOO isn't going to be assigned, how about
((EVAL-IN-R↑3RS-ENV '(LAMBDA (FOO ...) E))
FOO
...)
or, if it is going to be assigned, something more complicated, like
((EVAL-IN-R↑3RS-ENV '(LAMBDA (GET-FOO SET-FOO! ...) E'))
(LAMBDA () FOO)
(LAMBDA (VAL) (SET! FOO VAL))
...)
where E' = E with (GET-FOO) substituted for FOO and SET-FOO! substituted
for SET! FOO. Or, another entry point to the interpreter could be created
that would do substitutions of this kind automagically.
I think this would serve moderately well.
I'd be happy to submit such a package to the library (name and arguments
negotiable) if there's interest. This could at least hold us until we
can come to agreement over something that would give real level-crossing
access to environments.
∂09-Dec-87 0932 @MC.LCS.MIT.EDU:cph@KLEPH.AI.MIT.EDU data structures <--> functions
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 9 Dec 87 09:32:51 PST
Received: from kleph (TCP 2206400254) by MC.LCS.MIT.EDU 9 Dec 87 12:08:19 EST
Received: by KLEPH.AI.MIT.EDU; Wed, 9 Dec 87 12:08:55 est
Date: Wed, 9 Dec 87 12:08:55 est
From: cph@KLEPH.AI.MIT.EDU (Chris Hanson)
Message-Id: <8712091708.AA13269@kleph>
To: JAR@AI.AI.MIT.EDU
Cc: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: Jonathan A Rees's message of Tue, 8 Dec 87 19:23:30 EST <296594.871208.JAR@AI.AI.MIT.EDU>
Subject: data structures <--> functions
Reply-To: cph@mc.lcs.mit.edu
Date: Tue, 8 Dec 87 19:23:30 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Date: Sun, 6 Dec 87 01:51:10 est
From: gjs at ZOHAR.AI.MIT.EDU (Gerald Jay Sussman)
To: JAR at AI.AI.MIT.EDU
Re: data structures <--> functions
I really feel the need for EVAL (or ENCLOSE) quite seriously.
As I recall, the original problem with EVAL was just the decision
about whether or not there would be a second argument. We were unable
to come to concensus because there was no compatible way to solve the
problem without using optional arguments, which no one wanted to do.
Since everyone has EVAL, it seems silly to be tied up on this one
point. Maybe we should adopt a different procedure, perhaps called
STANDARD-EVAL or GLOBAL-EVAL, which took just one argument. This
would be identical to EVAL on systems without first-class
environments, and would supply a default environment on the others.
∂10-Dec-87 0750 @MC.LCS.MIT.EDU:bruggema@iuvax.cs.indiana.edu Request for MacScheme source for SCOOPS
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 10 Dec 87 07:50:07 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 10 Dec 87 10:43:06 EST
Date: Thu, 10 Dec 87 10:42:22 est
From: Carl Bruggeman <bruggema@iuvax.cs.indiana.edu>
To: scheme@mc.lcs.mit.edu
Subject: Request for MacScheme source for SCOOPS
Does anyone know if there is a version of SCOOPS available
for MacScheme? If you have one, could you email me the
source or tell me where I can access it thru ftp.
Thanks in advance,
Carl Bruggeman
bruggema@iuvax.cs.indiana.edu
∂10-Dec-87 1152 @MC.LCS.MIT.EDU:bruggema@iuvax.cs.indiana.edu Request for MacScheme source for SCOOPS
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 10 Dec 87 11:52:12 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 10 Dec 87 10:43:06 EST
Date: Thu, 10 Dec 87 10:42:22 est
From: Carl Bruggeman <bruggema@iuvax.cs.indiana.edu>
To: scheme@mc.lcs.mit.edu
Subject: Request for MacScheme source for SCOOPS
Does anyone know if there is a version of SCOOPS available
for MacScheme? If you have one, could you email me the
source or tell me where I can access it thru ftp.
Thanks in advance,
Carl Bruggeman
bruggema@iuvax.cs.indiana.edu
∂14-Dec-87 2214 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: Applicative languages? Anyone?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 14 Dec 87 22:14:41 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 15 Dec 87 00:40:38 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA28397; Mon, 14 Dec 87 20:35:40 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 8 Dec 87 12:40:13 GMT
From: mcvax!ukc!its63b!csnjr@uunet.uu.net (Nick Rothwell)
Organization: LFCS, University of Edinburgh
Subject: Re: Applicative languages? Anyone?
Message-Id: <819@its63b.ed.ac.uk>
References: <1409@mind.UUCP>, <584@zippy.eecs.umich.edu>, <1202@uoregon.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
In article <1202@uoregon.UUCP> markv@drizzle.UUCP (Mark VandeWettering) writes:
>In article <584@zippy.eecs.umich.edu> dwt@zippy.eecs.umich.edu (David West) writes:
>>Applicativity has its advantages, but it needs
>>1) ...
>>2) Some syntactic means for preventing argumentsfrom getting unreadably
>> numerous just to pass something down to where it's finally used.
>
> Hmmm, not a bad idea. I have just acquired "Implementation of
> Functional Programming Languages by Simon L. Peyton Jones, and
> am much impressed by the depth/level of the text. Seeing as I
> have to do a final thesis/project sometime :-) I might be
> tempted to try a hand at an ML interpreter/compiler. I would
> like to hear from anyone who is trying/has tried similar
> projects.
ML gives you objects with modifiable state, so that you don't need to
pass a state structure around with you. The disadvantage, of course, is
that you smash the applicative behaviour of the language -
whether it's worth it depends what you're trying to do.
Another way around this is to use type abstraction. That way, your
state structure is an abstract object with a few access functions to get
at the bits you need. I've always used the former approach, so I don't know
how far the latter approach gets you. It's quite possible to take non-
applicative features like assignment and abstract over them to build
structured objects with varying state, a la Smalltalk perhaps. This isn't
"dirty" functional programming - it's just using a functional language as if
it were a language of a different kind. I recently dedicated a lecture to the
structured use of side-effects in ML.
By the way, I have various little typecheckers and interpreters for tiny
functional languages lying around on-line somewhere, if you're interested.
All written in ML, of course.
--
Nick Rothwell, Laboratory for Foundations of Computer Science, Edinburgh.
nick%lfcs.ed.ac.uk@nss.cs.ucl.ac.uk
<Atlantic Ocean>!mcvax!ukc!lfcs!nick
~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~
"Nothing's forgotten. Nothing is ever forgotten." - Herne
∂14-Dec-87 2316 @MC.LCS.MIT.EDU,@RELAY.CS.NET:scheme-request@mc.lcs.mit.edu Re: Applicative languages? Anyone?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 14 Dec 87 23:16:06 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 15 Dec 87 01:52:54 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa10391; 15 Dec 87 1:46 EST
Received: from switzerland by RELAY.CS.NET id aa05175; 15 Dec 87 1:41 EST
Received: from ean by SWITZERLAND.CSNET id a009814; 15 Dec 87 7:34 MET
Date: 15 Dec 87 7:33 +0100
From: Nick Rothwell <mcvax!ukc!its63b!csnjr@uunet.uu.net>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Message-ID: <819@its63b.ed.ac.uk>
References: <1409@mind.UUCP>, <584@zippy.eecs.umich.edu>, <1202@uoregon.UUCP>
Subject: Re: Applicative languages? Anyone?
>Organization: LFCS, University of Edinburgh
In article <1202@uoregon.UUCP> markv@drizzle.UUCP (Mark VandeWettering) writes:
>In article <584@zippy.eecs.umich.edu> dwt@zippy.eecs.umich.edu (David West) writes:
>>Applicativity has its advantages, but it needs
>>1) ...
>>2) Some syntactic means for preventing argumentsfrom getting unreadably
>> numerous just to pass something down to where it's finally used.
>
> Hmmm, not a bad idea. I have just acquired "Implementation of
> Functional Programming Languages by Simon L. Peyton Jones, and
> am much impressed by the depth/level of the text. Seeing as I
> have to do a final thesis/project sometime :-) I might be
> tempted to try a hand at an ML interpreter/compiler. I would
> like to hear from anyone who is trying/has tried similar
> projects.
ML gives you objects with modifiable state, so that you don't need to
pass a state structure around with you. The disadvantage, of course, is
that you smash the applicative behaviour of the language -
whether it's worth it depends what you're trying to do.
Another way around this is to use type abstraction. That way, your
state structure is an abstract object with a few access functions to get
at the bits you need. I've always used the former approach, so I don't know
how far the latter approach gets you. It's quite possible to take non-
applicative features like assignment and abstract over them to build
structured objects with varying state, a la Smalltalk perhaps. This isn't
"dirty" functional programming - it's just using a functional language as if
it were a language of a different kind. I recently dedicated a lecture to the
structured use of side-effects in ML.
By the way, I have various little typecheckers and interpreters for tiny
functional languages lying around on-line somewhere, if you're interested.
All written in ML, of course.
--
Nick Rothwell, Laboratory for Foundations of Computer Science, Edinburgh.
nick%lfcs.ed.ac.uk@nss.cs.ucl.ac.uk
<Atlantic Ocean>!mcvax!ukc!lfcs!nick
~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~ ~~
"Nothing's forgotten. Nothing is ever forgotten." - Herne
∂14-Dec-87 2354 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: Request for MacScheme source for SCOOPS
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 14 Dec 87 23:54:17 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 15 Dec 87 02:11:18 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA01244; Mon, 14 Dec 87 22:59:41 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 12 Dec 87 07:32:39 GMT
From: jh@ohio-state.arpa (Juha Hein{nen)
Organization: Tampere University of Technology, Finland
Subject: Re: Request for MacScheme source for SCOOPS
Message-Id: <2108@korppi.tut.fi>
References: <8712101554.AA15940@ucbvax.Berkeley.EDU>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
MacScheme doesn't have enviroments (atleast my version doesn't). It
would be straightforward to port SCOOPS if somebody first provides
environments. The hacks provided with MacScheme distribution are not
enough.
--
Juha Heinanen
Tampere Univ. of Technology
Finland
jh@tut.fi (Internet), tut!jh (UUCP)
∂15-Dec-87 1839 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Looking for C-Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 15 Dec 87 18:39:09 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 15 Dec 87 21:35:20 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA24174; Tue, 15 Dec 87 18:07:53 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 14 Dec 87 17:23:00 GMT
From: hp-pcd!hpcvlx!keith@hplabs.hp.com (Keith Taylor)
Organization: Hewlett-Packard Co., Corvallis, OR, USA
Subject: Looking for C-Scheme
Message-Id: <530001@hpcvlx.HP.COM>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Anybody know where I can get a copy of C-Scheme (I assume that's how it's
spelled). I'm interested in something that will run on HP 9000/300s or
HP 9000/800s (running HP-UX).
Thanks,
Keith M. Taylor
Hewlett-Packard
Corvallis, Oregon
hp-pcd!hpcvxkt!keith
∂17-Dec-87 0430 @MC.LCS.MIT.EDU:bruggema@iuvax.cs.indiana.edu Re: SCOOPS for MacScheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 17 Dec 87 04:30:19 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 16 Dec 87 18:27:44 EST
Date: Wed, 16 Dec 87 09:28:50 est
From: Carl Bruggeman <bruggema@iuvax.cs.indiana.edu>
To: scheme@mc.lcs.mit.edu
Subject: Re: SCOOPS for MacScheme
Last week I asked if anyone had ported SCOOPS to MacScheme.
I have received about half a dozen requests of the form,
"When you find them can you send me a copy". I finally
received an offer of source code but it may take some time
since I need to send a disk thru U.S. mail. Because only six
people have asked me for the sources, I currently plan to
distribute them via email rather than posting to this group.
If I receive more than a couple more requests after posting
this message I will assume there is enough interest in this
group to justify posting the sources here.
Carl Brugeman
bruggema@iuvax.cs.indiana.edu
∂17-Dec-87 0642 @MC.LCS.MIT.EDU,@CUNYVM.CUNY.EDU:ZZZO@DHVRRZN1.BITNET NOTE from ZZZO
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 17 Dec 87 06:42:51 PST
Received: from CUNYVM.CUNY.EDU (TCP 20071000402) by MC.LCS.MIT.EDU 17 Dec 87 09:27:54 EST
Received: from DHVRRZN1.BITNET by CUNYVM.CUNY.EDU ; Thu, 17 Dec 87 09:26:34 EST
Date: Thu, 17 Dec 87 13:04:10 MEZ
To: scheme@mc.lcs.mit.EDU
From: ZZZO%DHVRRZN1.BITNET@CUNYVM.CUNY.EDU
Subject: NOTE from ZZZO
Date: 17 December 1987, 12:56:12 MEZ
From: Wolfgang Zocher (0511) 762-3684 ZZZO at DHVRRZN1
To: SCHEME at MC.LCS.MIT.EDU
Subject: CScheme on 68000 system
I'm just trying to install CScheme on an 68000 system (Atari running
OS-9) with 1MB memory. The microcode compiled very good, but the run-
time system will not load. When I try to make the bare-system, loading
stackp.bin. will cause an error and scheme says: bogus error vector...
and finished loading.
Is there anybody out there, who can help me with own experiences in
installing Cscheme on small 68000 systems??
Any idea is welcome
Wolfgang Zocher (ZZZO at DHVRRZN1.BITNET)
∂17-Dec-87 0958 @MC.LCS.MIT.EDU:brando%linus@mitre-bedford.ARPA SCOOPS for MacScheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 17 Dec 87 09:58:18 PST
Received: from mitre-bedford.ARPA (TCP 3200600102) by MC.LCS.MIT.EDU 17 Dec 87 12:54:40 EST
Posted-From: The MITRE Corp., Bedford, MA
Received: by linus.research (3.2/4.7)
id AA03255; Thu, 17 Dec 87 12:53:34 EST
Date: Thu, 17 Dec 87 12:53:34 EST
From: Thom Brando <brando%linus@mitre-bedford.ARPA>
Posted-Date: Thu, 17 Dec 87 12:53:34 EST
Message-Id: <8712171753.AA03255@linus.research>
To: bruggema@iuvax.cs.indiana.edu
Cc: scheme@mc.lcs.mit.edu
In-Reply-To: Carl Bruggeman's message of Wed, 16 Dec 87 09:28:50 est <8712170059.AA04028@mitre-bedford.ARPA>
Subject: SCOOPS for MacScheme
Yes, please post the sources to the scheme mailing list. If you don't please
email to me. Thanks.
∂17-Dec-87 1215 @MC.LCS.MIT.EDU:Esler.Opus@BCO-MULTICS.ARPA "box" data type in Chez Scheme.
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 17 Dec 87 12:14:55 PST
Received: from BCO-MULTICS.ARPA (TCP 1200600037) by MC.LCS.MIT.EDU 17 Dec 87 15:11:01 EST
Date: Thu, 17 Dec 87 14:47 EST
From: Esler@BCO-MULTICS.ARPA
Subject: "box" data type in Chez Scheme.
Message-ID: <871217194738.501942@BCO-MULTICS.ARPA>
I was looking through the code for a small operating system, posted by
Chris Haynes recently. I found the functions "box", "set-box!", and
"swap-box!" used as primitives. Could someone familiar with Chez Scheme
explain what these do ? Equivalent functions written in standard (R↑3)
Scheme would be helpful.
Kevin Esler, Honeywell Bull Inc, Billerica, MA.
∂18-Dec-87 0715 @MC.LCS.MIT.EDU,@MITVMA.MIT.EDU:NETWORK@FRSAC11.BITNET Byte code speed.
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 18 Dec 87 07:15:36 PST
Received: from MITVMA.MIT.EDU (TCP 2227000003) by MC.LCS.MIT.EDU 18 Dec 87 09:58:24 EST
Received: from MITVMA.MIT.EDU by MITVMA.MIT.EDU ; Fri, 18 Dec 87 09:57:48 EST
Received: from FRSAC11.BITNET (NETWORK) by MITVMA.MIT.EDU (Mailer X1.25) with
BSMTP id 9458; Fri, 18 Dec 87 09:57:46 EST
Date: Fri, 18 Dec 87 15:47:25 GMT
To: scheme@mc.lcs.MIT.EDU
From: NETWORK%FRSAC11.BITNET@MITVMA.MIT.EDU
Subject: Byte code speed.
Date: 18 December 1987, 15:38:49 GMT
From: NETWORK at FRSAC11
To: SCHEME at MC.LCS
A while ago there was some mail about benchmarking Scheme, what's
new about that ?
Using the very simplistic (fib 20) test I was surprised to get very
good results on my M24 running TI PC Scheme 2.0, and quite good one
for MacScheme. This compared to straight interpreters. (Lisp interpreters,
vs Byte code interpreters).
My question is: Where can I get description of the byte code used by
TI PC scheme ? How about the compiler and the byte code interpreter ?
(I was quite surprised to see that my 8Mz 8086 run at the same speed than
the IBM 3090-150 cpu, the difference beeing TI PC Scheme on the tiny
box, and CScheme 5.3 on the big blue one) (around 5 sec for (fib 20)
on each).
Happy new year.
Jean-Pierre H. Dumas
network@frsac11 (bitnet)
network%frsac11.bitnet@mitvma.mit.edu (arpanet)
dumas@sumex-aim.stanford.edu (arpanet)
∂18-Dec-87 0830 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU [ericson: MacScheme]
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 18 Dec 87 08:30:24 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 18 Dec 87 11:14:12 EST
Date: Fri, 18 Dec 87 11:11:48 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: [ericson: MacScheme]
To: scheme@MC.LCS.MIT.EDU
Message-ID: <301537.871218.JAR@AI.AI.MIT.EDU>
Date: Wed, 16 Dec 87 14:38:19 EST
From: Lars Ericson <ericson at csd16.nyu.edu>
... I'd like
to hear from anybody who has tried to implement major T facilities (namely:
object/operation facility) in MacScheme.
Thank you,
Lars Ericson
ericson@csd16.nyu.edu
∂18-Dec-87 1024 @MC.LCS.MIT.EDU,@MITVMA.MIT.EDU:NETWORK@FRSAC11.BITNET Speed
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 18 Dec 87 10:24:00 PST
Received: from MITVMA.MIT.EDU (TCP 2227000003) by MC.LCS.MIT.EDU 18 Dec 87 13:06:57 EST
Received: from MITVMA.MIT.EDU by MITVMA.MIT.EDU ; Fri, 18 Dec 87 13:06:18 EST
Received: from FRSAC11.BITNET (NETWORK) by MITVMA.MIT.EDU (Mailer X1.25) with
BSMTP id 0855; Fri, 18 Dec 87 13:06:14 EST
Date: Fri, 18 Dec 87 19:06:36 GMT
To: scheme@mc.lcs.MIT.EDU
From: NETWORK%FRSAC11.BITNET@MITVMA.MIT.EDU
Subject: Speed
+Date: Fri, 18 Dec 87 12:36:10 est
+From: gjs@ZOHAR.AI.MIT.EDU (Gerald Jay Sussman)
+To: NETWORK%FRSAC11.BITNET@MITVMA.MIT.EDU
+n-Reply-To: NETWORK%FRSAC11.BITNET@MITVMA.MIT.EDU's message of Fri, 18 Dec 87
+ 15:47:25 GMT <8712181549.AA15413@zohar>
+Subject: Byte code speed.
+
+great... TI PC Scheme 3.0 is still faster!
+But on big problems (~100 pages of code) CScheme beats the
+PC scheme by a large amount.
Why on larger code ? (memory management ?)
As far as I have observed PC Scheme GC somewhat less than CSCheme,
From old popular wisdom (here, in France) it is said that the speed
of an interpreter is strongly related to the use of "CONS" for the
own use of the interpreter itself, and I have the feeling that
PC Scheme "conses" less than CScheme too. (I am surely wrong, it
is just a feeling. But the popular wisdom seems solid.)
(CScheme is somewhat more clever than some other Lisp I have on
my system, but around twice as slow, I am strongly thinking that
the difference between then is the fact that the other interpreter
does not "cons" at all)
Comments ?
Again my question: where can I find documents related to the
byte coding used in the popular Scheme (PC, Mac, C) ?
Extended question: I think that Scheme could be implemented with
incredible efficiency on modern Forth 32 bit chips, with stack
cache. Am I wrong ?
Regards,
Jean-Pierre H. Dumas
network@frsac11 (bitnet)
network%frsac11.bitnet@mitvma.mit.edu (arpanet)
dumas@sumex-aim.stanford.edu (arpanet)
∂18-Dec-87 1401 @MC.LCS.MIT.EDU,@RELAY.CS.NET:bartley@home.csc.ti.com Byte code speed
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 18 Dec 87 14:01:17 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 18 Dec 87 16:44:18 EST
Received: from relay2.cs.net by RELAY.CS.NET id ab19578; 18 Dec 87 16:13 EST
Received: from csc.ti.com by RELAY.CS.NET id ak29887; 18 Dec 87 16:07 EST
Received: from home by tilde id AA12877; Fri, 18 Dec 87 14:45:26 CST
Received: by home id AA05200; Fri, 18 Dec 87 14:44:28 CST
Date: Fri, 18 Dec 87 14:44:28 CST
From: David Bartley <bartley%home.csc.ti.com@RELAY.CS.NET>
Message-Id: <8712182044.AA05200@home>
To: Scheme@mc.lcs.mit.edu
Cc: network%frsac11.bitnet@MITVMA.MIT.EDU,
Bartley%home.csc.ti.com@RELAY.CS.NET
Subject: Byte code speed
> From: NETWORK%FRSAC11.BITNET@mitvma.mit.edu
> A while ago there was some mail about benchmarking Scheme, what's
> new about that ?
> Using the very simplistic (fib 20) test I was surprised to get very
> good results on my M24 running TI PC Scheme 2.0, and quite good one
> for MacScheme. This compared to straight interpreters. (Lisp interpreters,
> vs Byte code interpreters).
>
> My question is: Where can I get description of the byte code used by
> TI PC scheme ? How about the compiler and the byte code interpreter ?
> [...]
> Jean-Pierre H. Dumas
The only description of our work in the open literature is the paper
entitled ``The Implementation of PC Scheme'' in the proceedings of the
1986 ACM Conference on Lisp and Functional Programming, pp 86-93.
Although it doesn't disclose nitty-gritty details, the paper explains
the general nature of our byte-threaded-coded virtual machine and
gives some examples of its instruction set. It also has an overview
of the compiler and a listing of the 8088 code for the 5-instruction
``next'' operation of the emulator.
> As far as I have observed PC Scheme GC somewhat less than CSCheme,
> From old popular wisdom (here, in France) it is said that the speed
> of an interpreter is strongly related to the use of "CONS" for the
> own use of the interpreter itself, and I have the feeling that
> PC Scheme "conses" less than CScheme too. (I am surely wrong, it
> is just a feeling. But the popular wisdom seems solid.)
Our emulator does no consing on its own except to extend the stack
when it overflows. Until release 3.0, PC Scheme had no interpreter at
all. It now mixes interpretive and compiled execution in the
following way: An S-expression given to EVAL will be interpreted until
a subproblem is encountered which involves variable binding (e.g., a
LAMBDA, LET, or LETREC). The subproblem is then compiled and executed.
As a result, simple expressions like (DEFINE X 3) and X are interpret-
ed, but the procedure in (DEFINE F (LAMBDA (X) ...)) is always compiled.
Regards,
David Bartley
∂19-Dec-87 0739 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Speed
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 19 Dec 87 07:39:27 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 19 Dec 87 10:35:17 EST
Date: Sat, 19 Dec 87 10:32:57 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Sender: JAR0@AI.AI.MIT.EDU
Subject: Speed
To: NETWORK%FRSAC11.BITNET@MITVMA.MIT.EDU
cc: scheme@MC.LCS.MIT.EDU
In-reply-to: Msg of Fri 18 Dec 87 19:06:36 GMT from NETWORK%FRSAC11.BITNET at MITVMA.MIT.EDU
Message-ID: <301942.871219.JAR0@AI.AI.MIT.EDU>
Date: Fri, 18 Dec 87 19:06:36 GMT
From: NETWORK%FRSAC11.BITNET at MITVMA.MIT.EDU
Again my question: where can I find documents related to the
byte coding used in the popular Scheme (PC, Mac, C) ?
The byte code interpreter and compiler used in MacScheme are described in
not much detail in a paper by Will Clinger in the 1984 Lisp and FP
Symposium proceedings, "The Scheme 311 compiler: An exercise in
denotational semantics."
∂19-Dec-87 0932 @MC.LCS.MIT.EDU:bruggema@iuvax.cs.indiana.edu MacScheme SCOOPS Update
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 19 Dec 87 09:32:24 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 19 Dec 87 12:27:08 EST
Date: Sat, 19 Dec 87 12:26:02 est
From: Carl Bruggeman <bruggema@iuvax.cs.indiana.edu>
To: scheme@mc.lcs.mit.edu
Subject: MacScheme SCOOPS Update
MacScheme SCOOPS Update:
1. I have received almost 40 requests for MacScheme SCOOPS
which means the sources should be posted rather than
mailed out.
2. John Ulrich is the person who did the implementation.
(I forgot to mention that in the last posting)
3. Will Clinger (of Semantic Microsystems) informed me that
a version of SCOOPS supplied by John Ulrich (same author)
is distributed with MacScheme starting with version 1.5
He also mentioned that it was not based on the TI source
and was not currently supported by Semantic Microsystems.
It seems to me the next step should be that someone with version
1.5 of MacScheme should post the sources (I don't have it). In order
to prevent multiple postings, it would be best if those who have the
ability to upload and post the sources to the net, send me mail to that
effect and I will give the OK to the first one who replies.
Due to the holiday, I will be off the net while out of town from
Dec 22 to Dec 27. Hopefully, the sources will be posted the week of
the 28th.
I would like to thank John Ulrich and William Clinger for their
help and information.
Carl Bruggeman
bruggema@iuvax.cs.indiana.edu
∂19-Dec-87 1310 @MC.LCS.MIT.EDU:chaynes@iuvax.cs.indiana.edu Scheme Standard
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 19 Dec 87 13:10:12 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 19 Dec 87 15:55:20 EST
Date: Sat, 19 Dec 87 15:54:15 est
From: Chris Haynes <chaynes@iuvax.cs.indiana.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: Scheme Standard
The Microprocessor Standards Committee (MSC) of the IEEE Computer
Society is proposing formation of a working group for the purpose of
developing an IEEE Scheme standard. Some of the merits of such
a move follow:
PRO:
(1) An official standard will demonstrate the LEGITIMACY of Scheme in
the eyes of many. I expect this will frequently make the difference
in decisions by businesses and educators to adopt Scheme.
(2) It will increase Scheme's VISIBILITY. Word of standards
travels in many quarters where Scheme is hardly known.
(3) It will add MOTIVATION and DISCIPLINE to efforts at refining
Scheme. The last Scheme meeting we had indicated some need for more
discipline, and perhaps the lack of activity in this newsgroup of late
indicates need for more motivation.
(4) It will improve code portability (and publication uniformity).
The force of this point is reduced greatly by the existing Report,
which satisfies much of this need.
CON:
(5) Changes could be made that would be unreasonably expensive for
existing Scheme implementations to incorporate.
(6) Unnecessary and technically flawed features could be added.
(7) The specification could make Scheme rigid, cutting off
experimentation and research.
(8) Participants would be forced to cope with administrative hassles
and the time and monetary costs of travel to meetings.
The PROs speak for themselves, though comments that expand or
reinforce them are welcome. Let me address the CONs.
I believe (5) and (6) are the most serious concerns. They express
fear that the authors of the existing Report, who have been very
conservative in these respects, will "lose control" of the
standardization process. The best strategy for avoiding this is to
act promptly. By acting now, I believe the Report authors and others
of like mind will prevail both in voting numbers and administrative
matters. If we delay, others will almost certainly initiate the
standardization process (and thereby assume administrative control).
Also, the longer we wait the larger the Scheme community becomes. An
increasing number of converts to Scheme are apt to be defectors from
Common Lisp who want something simpler, but are also attached to all
sorts of things that we'd rather not see in Scheme. Many of these
folks will be from industry, with travel money and agendas that will
bring them to standards meetings.
Working group attendance is open to the public. Voting rights are
based on attendance at recent meetings, using a formula determined by
the Chair and acceptable to the MSC. A reasonable formula would give
voting rights initially to attendees of the previous Scheme Report
meetings and exclude others at their first meeting, and perhaps also
their second.
Official standardization may contribute a bit to the rigidity of a
language, but I believe this contribution will be much less than is
feared by some. Standards are typically revised every two years or
so, at least for the first few revisions, and it is certainly possible
to reverse earlier decisions. The best known standards are for the
best known languages, and the standards process for these languages
reflects the inertia already present as a result of long tradition.
A standard inevitably costs time and money, but I believe this can be
kept to tolerable levels. Though active working groups typically
meet about four times a year, by continuing our tradition of extensive
discussions on the net it should be possible to reduce this number to
two per year.
In balance, I feel the advantages of a standard clearly outweigh the
disadvantages, at least if we act reasonably soon so it does not get
out of control.
The MSC will consider the formation of a Scheme standardization
working group at its meeting on January 7th. I am being considered
for Chair, with Will Clinger for Vice-Chair. I have no "hidden
agenda". In the first year or so I would like to see the working
group endeavor to ratify approximately what we already have in the
R3RALS, with some clarifications and improvements that were intended
for a R4RALS in the same time frame. Standardization is a means to
consolidate and gain recognition for progress that has been made. It
draws upon and facilitates (rather than precludes) progress by less
institutionalized groups.
Comments are welcome.
-- Chris Haynes
∂19-Dec-87 1453 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Common Lisp in Scheme?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 19 Dec 87 14:53:22 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 19 Dec 87 17:44:05 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA27719; Sat, 19 Dec 87 14:37:04 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 19 Dec 87 18:30:26 GMT
From: hplabsz!kempf@hplabs.hp.com (Jim Kempf)
Organization: Hewlett-Packard Laboratories
Subject: Common Lisp in Scheme?
Message-Id: <1252@hplabsz.HPL.HP.COM>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I know about Jonathan Reese's Scheme in Common Lisp, but has anybody
implemented the opposite, Common Lisp in Scheme? Although I like the
clean semantics of Scheme, reality sometimes intrudes. I'm trying to
decide what Lisp to purchase for my AT, and TI's PC Scheme looks
attractive, especially compared to the overpriced AT Common Lisps
available. There is currently a port of Kyoto Common Lisp
underway, but it may take awhile and might end up not being any
cheaper than the already available crop, besides requiring a C
compiler.
Before I start hacking, anybody done it yet? Thanx!
Jim Kempf kempf@hplabs.hp.com
∂23-Dec-87 1553 @MC.LCS.MIT.EDU,@MITVMA.MIT.EDU:U09254@UICVM.BITNET Scheme on CMS?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Dec 87 15:53:23 PST
Received: from MITVMA.MIT.EDU (TCP 2227000003) by MC.LCS.MIT.EDU 20 Dec 87 15:21:54 EST
Received: from MITVMA.MIT.EDU by MITVMA.MIT.EDU ; Sun, 20 Dec 87 15:21:05 EST
Received: from UICVM.BITNET by MITVMA.MIT.EDU (Mailer X1.25) with BSMTP id
7428; Sun, 20 Dec 87 15:21:02 EST
Received: by UICVM (Mailer X1.24) id 8785; Sun, 20 Dec 87 14:20:07 CST
Date: Sun, 20 Dec 87 14:20:04 CST
From: Richard G Larson <U09254%UICVM.BITNET@MITVMA.MIT.EDU>
To: SCHEME@MC.LCS.MIT.EDU
Subject: Scheme on CMS?
I am looking for an implementation of Scheme which will run under IBM's
CMS operating system, and would be at least adequate for instructional use.
Various people have told me about Scheme front-ends for LISP, and about
C source for Scheme, but what I'd really like to know is whether anyone
has a MODULE file, etc which I can just drop in on CMS and have students
run it. (If such doesn't exist, I may have to do some work!)
∂23-Dec-87 1554 @MC.LCS.MIT.EDU:Pavel.pa@Xerox.COM Quasiquotation
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Dec 87 15:54:23 PST
Received: from Xerox.COM (TCP 1500006350) by MC.LCS.MIT.EDU 21 Dec 87 12:46:16 EST
Received: from Cabernet.ms by ArpaGateway.ms ; 21 DEC 87 09:45:53 PST
Date: Mon, 21 Dec 87 09:44:58 PST
From: Pavel.pa@Xerox.COM
Subject: Quasiquotation
To: Scheme@mc.lcs.mit.edu
Message-ID: <871221-094553-5271@Xerox>
In the Revised↑3 Report, the grammar for quasiquotation expressions contains the
following production:
<list template D> ::= '<quasiquotation D>
Shouldn't this be
<list template D> ::= '<template D>
If not, why not? Also, why is there not a formal description of the semantics
of quasiquotation? I expected to find a precise definition in the section
giving the meanings of the other derived expression types, but there's nothing
there.
Pavel
∂23-Dec-87 1555 @MC.LCS.MIT.EDU,@RELAY.CS.NET:adams@tekchips.tek.com Object oriented programming in Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Dec 87 15:54:37 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 21 Dec 87 16:51:29 EST
Received: from relay2.cs.net by RELAY.CS.NET id ab02945; 21 Dec 87 16:08 EST
Received: from tektronix.tek.com by RELAY.CS.NET id bs09431; 21 Dec 87 15:54 EST
Received: by tektronix.TEK.COM (5.51/6.24)
id AA16300; Mon, 21 Dec 87 12:16:59 PST
Received: by tekchips.TEK.COM (5.51/6.24)
id AA06929; Mon, 21 Dec 87 12:15:32 PST
Date: Mon, 21 Dec 87 12:15:32 PST
From: Norman Adams <adams%tekchips.tek.com@RELAY.CS.NET>
Message-Id: <8712212015.AA06929@tekchips.TEK.COM>
Subject: Object oriented programming in Scheme
To: Lars Ericson <ericson%csd16.nyu.edu@RELAY.CS.NET>
Cc: scheme@mc.lcs.mit.edu
... I'd like
to hear from anybody who has tried to implement major T facilities (namely:
object/operation facility) in MacScheme.
Lars Ericson
ericson@csd16.nyu.edu
We have been experimenting with an object system based on T's. We have a
prototype implementation which we are evaluating, and we hope to have
something interesting to say in a few months. If all goes well, there is
some chance we will make source available for a sample implementation.
For those not familiar with the T object system: I eschew zealotry, but I
find the T approach (roughly closures + dispatch) more in the Scheme spirit
than anything in the Flavors family. Our changes to the T object system
are intended to make reasonably fast implementions possible. I would
consider an implementation reasonably fast if time to send a message, do
the method lookup, and pass control to the method, is less than the cost of
2 procedure calls in the worst case.
Our prototype is almost portable Scheme. We also have a faster version
that is quite specific to MacScheme. In a single, simple-minded benchmark,
compared to Ulrich's SCOOPS for MacScheme: the slow version is 20% the
speed, the faster version 2 or 3 times the speed (that's 5 procedure call
times). I would guess that, a few lines of assembly code, in a few key
places, are needed to make the MacScheme version "reasonably fast."
Norman Adams
Computer Research Lab
Tektronix Labs
-------
∂23-Dec-87 1555 @MC.LCS.MIT.EDU:jeff%aiva.edinburgh.ac.uk@NSS.Cs.Ucl.AC.UK Re: Object oriented programming in Scheme
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Dec 87 15:55:08 PST
Received: from NSS.Cs.Ucl.AC.UK (TCP 20012204403) by MC.LCS.MIT.EDU 21 Dec 87 22:09:19 EST
Received: from aiva.edinburgh.ac.uk by NSS.Cs.Ucl.AC.UK via Janet with NIFTP
id aa01076; 22 Dec 87 3:04 GMT
From: Jeff Dalton <jeff%aiva.edinburgh.ac.uk@NSS.Cs.Ucl.AC.UK>
Date: Tue, 22 Dec 87 02:54:02 gmt
Message-Id: <5821.8712220254@aiva.ed.ac.uk>
To: adams <@relay.cs.net:adams@tekchips.tek.com>, scheme@mc.lcs.mit.edu
Subject: Re: Object oriented programming in Scheme
> Date: Mon, 21 Dec 87 12:15:32 PST
> From: Norman Adams <adams%com.tek.tekchips@net.cs.relay>
> We have been experimenting with an object system based on T's. [...]
> For those not familiar with the T object system: I eschew zealotry, but I
> find the T approach (roughly closures + dispatch) more in the Scheme spirit
> than anything in the Flavors family. Our changes to the T object system
> are intended to make reasonably fast implementions possible. I would
> consider an implementation reasonably fast if time to send a message, do
> the method lookup, and pass control to the method, is less than the cost of
> 2 procedure calls in the worst case.
This is interesting. If you don't mind saying something about your
implementation short of posting the source, I'd like to hear more.
It seems that you'll always have to do two procedure calls: one for
the operation and another for the method; three if you must also call a
handler that returns the method. And that still leaves the method lookup
itself. Flavors are about the same: one for the generic function, one
for the method, and about a call's worth (let's say) for looking up the
method. So, generic operations should have 2-3 times the overhead of an
equivalent function. But...
I recently implemented a T-like system in a completely straightforward
way in Common Lisp. I expected an operation to take 3 calls (operation,
handler, method), and timing with KCL on a VAX more or less confirmed
this. Here procedure calls were pretty expensive because they used
CALLS. I reasoned that they might be less dominant on a Sun, so I tried
again on a 3/260. To make this even less meaningful, I used Sun Common
Lisp this time. Calling a (generic) operation on an object with just one
method that returned the square of its arguement (this is what I was
doing) took 1.9 times longer then an equivalent function when both were
adjusted to take out the time required to square in-line. The total
time (10000 iterations) was still pretty small, though, so the results
may not be very meaningful. Why was the factor 1.9 instead of, say, 3?
I don't know.
In any case, it's difficult to implement T objects exactly. T objects
can be used as functions, and it's difficult to get most Lisp systems to
accept new kinds of function objects. So, since I couldn't do
(OBJECT fn . clauses)
I just implemented
(OBJECT . clauses)
I also had operation lookup based on the name of the operation. That
is, the dispatch function had (cond ((eq request 'op)) ...) instead of
(cond ((eq request op)) ...).
There's a certain elegance to this system that I didn't fully appreciate
until I'd used it for a while. Now I even miss the objects-as-functions.
Nonetheless, it is somewhat inflexible. You can't add new methods
incrementally (they must all be there in the OBJECT body), for example.
Jeff Dalton, JANET: J.Dalton@uk.ac.ed
AI Applications Institute, ARPA: J.Dalton%uk.ac.ed@nss.cs.ucl.ac.uk
Edinburgh University. UUCP: ...!ukc!ed.ac.uk!J.Dalton
∂23-Dec-87 1555 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: Scheme on CMS?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Dec 87 15:55:24 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 22 Dec 87 02:15:36 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA13746; Mon, 21 Dec 87 22:49:37 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 21 Dec 87 17:43:41 GMT
From: ihnp4!alberta!calgary!jameson@ucbvax.Berkeley.EDU (Kevin Jameson)
Organization: U. of Calgary, Calgary, Ab.
Subject: Re: Scheme on CMS?
Message-Id: <1267@vaxb.calgary.UUCP>
References: <8712202027.AA12866@ucbvax.Berkeley.EDU>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Several of the previous transactions appear to be seeking info on Scheme
implementations (and source) for various purposes. There appear to be
implementations of Scheme in Common Lisp and C, and maybe Common Lisp
implementations in Scheme, Scoops in Scheme, etc. etc.
I am also looking for an implementation (for a pc).
Could someone in the know please summarize what implementations are available,
for what machines, and if source is available at what cost?
I'd be happy to write the summary if someone will send me the info, but
it might be faster if somone more knowledgeable posted it directly.
As a fail safe, I'll summarize and post whatever I receive, whether or
not a knowledgeable sumary is posted.
Kevin ...{ihnp4,ubcvision}!alberta!calgary!vaxb!jameson
∂23-Dec-87 1556 @MC.LCS.MIT.EDU,@RELAY.CS.NET:willc@tekchips.tek.com Re: Byte code speed
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Dec 87 15:55:57 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 22 Dec 87 09:13:07 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa07692; 22 Dec 87 9:02 EST
Received: from tektronix.tek.com by RELAY.CS.NET id bc13377; 22 Dec 87 8:49 EST
Received: by tektronix.TEK.COM (5.51/6.24)
id AA23859; Mon, 21 Dec 87 18:22:04 PST
Received: by tekchips.TEK.COM (5.51/6.24)
id AA11558; Mon, 21 Dec 87 18:20:35 PST
Date: Mon, 21 Dec 87 18:20:35 PST
From: Will Clinger <willc%tekchips.tek.com@RELAY.CS.NET>
Message-Id: <8712220220.AA11558@tekchips.TEK.COM>
To: scheme@mc.lcs.mit.edu
Subject: Re: Byte code speed
David Bartley of TI wrote concerning PC Scheme:
Our emulator does no consing on its own except to extend the stack
when it overflows.
In the sense intended by David this is true of MacScheme 1.5 also, but
it depends on what is meant by "on its own". Besides the byte codes that
obviously allocate storage, such as cons and make-vector, there are byte
codes such as + that allocate storage on occasion. Of more interest are
the byte codes that create closures, that allocate lists for rest arguments,
and that allocate heap storage for variables that are closed over by lambda
expressions (unless this is done by the byte codes that create closures).
Clearly both PC Scheme and MacScheme have such byte codes.
I think the French wisdom is that fast interpreters do not allocate
garbage-collected storage for argument lists, implicit temporaries,
or continuations. This is true of PC Scheme and MacScheme 1.5, but older
versions of MacScheme were significantly slower than Version 1.5 in part
because they allocated continuations on the heap. It's interesting that
the original design back in 1983 called for stack-allocated continuations,
but the heap-allocated continuations that were used as a temporary
measure during the bootstrap ran fast enough (because of a fairly fast
garbage collector) that there wasn't much pressure to change it until the
native code compiler was added this spring (by Eric Ost and Anne Hartheimer).
Peace, Will Clinger
∂23-Dec-87 1556 @MC.LCS.MIT.EDU:RPG@SAIL.Stanford.EDU Some Remarks on Standardization (by someone who has been there)
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Dec 87 15:56:28 PST
Received: from SAIL.Stanford.EDU (TCP 4425400302) by MC.LCS.MIT.EDU 22 Dec 87 15:13:41 EST
Date: 22 Dec 87 0956 PST
From: Dick Gabriel <RPG@SAIL.Stanford.EDU>
Subject: Some Remarks on Standardization (by someone who has been there)
To: rrrs-authors@MC.LCS.MIT.EDU
Ladies and Gentlemen:
I have heard from my friend Will Clinger and read in a message from
Chris Haynes that the Scheme group is considering pursuing an IEEE
standard for Scheme. I made some remarks to Will about this by phone,
but I would like to address them to the group as a whole. Let me say at the
outset that I do not have any deep feelings about the matter, though I
cannot guarantee that I won't present strong arguments on one side or the
other in this message. The rest of this message largely follows the
outline of Chris Haynes's (Strunk and White) message:
1) Is a Standard Necessary?
Chris Haynes points out that some businesses and educators would adopt
Scheme if it were a standard language. The Europeans believe this is true
for Lisp in Europe. I do not believe it is true in the US. The problem
with adoption of Scheme and Lisp in the US by industry is that they are
too closely associated with AI, that it is difficult or impossible to have
Scheme/Lisp-written code be linkable into an executable image along with
other code, and that the speed of code is unacceptable. I think each of
these can be attacked, I think that solving the second reduces the
importance of the third, and that none of this has to do with
standarization.
Like it or not, Scheme is a dialect of Lisp. And right now Common Lisp is
regarded as the only Lisp worth considering. Now as you may know, I am not
a huge supporter of Common Lisp as a language - note my Critique paper with
Rod Brooks and my attempt with Will Clinger to push for a cleaner language
(in fact Scheme) at the ISO level (which attempt has not yet failed); note also
my recent interview with Unix Review. On the other hand, I am a supporter
of Common Lisp as a tool for legitimizing Lisp and for getting a decent standard
for Lisp. The strategy I use is that standarization is a two step process: first
you convince people there ought to be a standard; second, you convince them that
if there is to be a standard, it ought to be a good one. Common Lisp as a
defacto standard achieves the first of these. I was trying, with Will's help,
to achieve the second.
Splitting up Common Lisp from Scheme has some desirable and some undesirable
effects. A desirable effect is that this sends the message that Scheme is so
unlike Common Lisp that if you had doubts about Common Lisp because of
weird features, Scheme don't have 'em. An undesirable effect is that the
people you hope to convince of Scheme - industry - don't see Common Lisp
and Scheme as very different at all: maybe one is smaller than the other.
In the old days, one excuse I heard about why people didn't use Lisp was that
the ``Lisp community cannot get it together,'' by which was meant that
the various quarters could not agree on a single Lisp. An ANSI Common Lisp and
an IEEE Scheme reinforces that. I would not want to rule out the possibility
of an ANSI Scheme as a standard within the Lisp family, including Common Lisp.
I don't believe that an IEEE standard will increase the visibility of
Scheme significantly. Remember, there are ANSI and IEEE standards for all
sorts of bizarre languages (and I don't mean ADA). These remain as
anonymous to everyone I know as they were before they were standardized.
Finally, standarization is the reward for a successful language, not a
tool for making it so. Some argue that standardizing Lisp will save the
language from sinking back into academia, but I doubt this. I believe
Lisp has to fit into the rest of the world better. C is being standardized
because everyone uses it, and so with Common Lisp.
2) Will Standardization Help Motivation and Discipline?
This is somewhat of a fairy tale. What has happened with Common Lisp is
that many people who used to do the work have ducked new work because they
believe that the next guy should feel motivated to do the work. When push
comes to shove, the work gets done in informal groups who are
self-motivated, which is the current situation with Scheme - nothing will
change other than for the worse.
3) Will a Standard Improve Portability?
You can choose to have a non-validatable language (ISO prohibits this,
I think). You can also choose to leave some things up to implementations.
The standard doesn't necessarily improve things.
***********************************************************************
The arguments against standardization and the remarks Chris makes about
them are more interesting than the arguments for standardization.
4) Will a Standard Increase the Likelihood of Difficult Implementation?
Do you expect difficult-to-implement features will be added? What are some
possibilities? Or do you expect that increased pressure to conform will
require implementors to implement already-standard but difficult-to-implement
features? If these features are elegant and the right thing, why give
implementability and efficiency the upper hand (or any hand)? And if
implementability and efficiency begin to reign, what else will they
bring into the language?
5) Will Unnecessary and Flawed Features Creep In?
If Scheme currently includes only necessary features, then
necessity is based on judgement. If unnecessary but convenient
features will be left out, then there is some reason to desire an
official library. Such a library requires funding to achieve and
maintain - Common Lisp failed completely to do this although it
was an explicit goal.
The issue of technically flawed features raises the largest issue in
my mind. Throughout the Common Lisp and CLOS efforts we employed Moon's
Maxim: Do Not Standardize on Research. Standardization is codifying and
specifying existing, proven practice with minor cleanup. If you follow
this, you will not include any technically flawed features, only technically
retarded ones.
Here is a case in point: If you standardize Scheme in the next year or
two, that standard cannot include any macro facility. This is because
a PhD thesis on the topic has just been published, and no implementation
of the latest, most final ideas has been in use for long enough. The Common
Lisp macro facility is mightily flawed, but it codifies 20 years of
practice, and its flaws are well-known. This situation is very much more
desirable than casting as a standard something you just thought of.
6) Will Research Stop?
Well, I don't know. The personal motivation for research does not stop,
but the funding for that research might stop. This has happened to the
Common Lisp community. Until this year, there was funding aplenty for
Lisp research from DARPA; now it's all gone. We standardized ourselves
out of our jobs.
Note that successful standards are revised every 5 - 10 years.
7) Will the Wrong Folks Move In?
I have to admit that the commentary on this topic reminded me of the most
despicable days of the Common Lisp effort, and it actually makes me a bit
sad. The desire to define a standard and the need to be a small group in
control are inconsistent. If you feel strongly about achieving both, you
will accomplish a situation you will regret for a long time. When you
choose to make a standard for a language, you are saying that you have
something that the community at large uses and wants to continue to use;
this is an act of generosity and public spirit. When you turn around and
state that these very people towards whom you have shown this concern
should be excluded, you are saying that these people are incapable or
evil; this is an act of arrogance and insensitivity. Silly as it might
sound, this will come back to haunt you just as it came back to haunt the
Common Lisp folks.
There really was a Quinquevirate, a gang of five, who controlled Common
Lisp for the last year of its definition and who tried to control the first
year of standards discussion just prior to X3J13 forming. We actively tried
to exclude people from our inner circle. The rational basis was that we
were the founding fathers and knew the motivations for the decisions. But like
the Constitution, the interpretation of what we did fell from our hands and
should have fallen from our hands. The only fact that eases my own conscience
is that some people of impeccable character participated along with me.
Nevertheless, I'm ashamed of that period.
If you want to exclude the wrong people, remain informal and self-selected.
If you want to standardize, welcome outsiders - this is what you want, right?
You want converts, so don't insult them. If you want your ideas to
prevail, then they must prevail because they are good ideas and because
you have exerted technical leadership. All standards organizations impose
a form of democracy on the process. Imagine that your worst enemies are
Chairman and Vice Chairman. Do you fear that your ideas and your ability to
lead the community at large (who will vote) are not strong enough to
prevail? If you do, then do not start the process.
Also note, your rules for voting rights exclude Steele and me.
I doubt IEEE would allow it. Some of the Quinquevirate were threatened
with lawsuits. Don't do it.
7) What's the Right Thing?
Here's a sad story. It's the story that is forcing Will Clinger out
of the ISO process. You all know that the EuLisp community was pushing
for a more Scheme-like language as an ISO standard. One reason they
felt this was is that the Common Lisp community excluded them early on.
However, the forces at large have caused Common Lisp to prevail to
such an extent that the EuLisp community seems to be backing down
and is ready to work with Common Lisp. I had hoped, along with Will,
that we could have worked with them to bring a better standard to the
international community. I think that the only way to do this, now, is
for the Scheme and Common Lisp communities to work together more closely
somehow. As you think about this statement, keep in mind that many
members of the Common Lisp world wished something more like Scheme had
been adopted.
Well, enough of this. The war for Lisp is not on the standards
battelfield anymore, anyway.
-rpg-
∂23-Dec-87 1555 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Quasiquotation
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Dec 87 15:54:52 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 21 Dec 87 20:34:24 EST
Date: Mon, 21 Dec 87 20:31:47 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Quasiquotation
To: Pavel.pa@XEROX.COM
cc: Scheme@MC.LCS.MIT.EDU
In-reply-to: Msg of Mon 21 Dec 87 09:44:58 PST from Pavel.pa at Xerox.COM
Message-ID: <302612.871221.JAR@AI.AI.MIT.EDU>
Date: Mon, 21 Dec 87 09:44:58 PST
From: Pavel.pa at Xerox.COM
<list template D> ::= '<quasiquotation D>
Shouldn't this be
<list template D> ::= '<template D>
Yes, of course. Thanks for pointing this out.
Also, why is there not a formal description of the semantics of
quasiquotation? I expected to find a precise definition in the
section giving the meanings of the other derived expression types,
but there's nothing there.
It was omitted because no one got around to writing it. Steele's
description in Common Lisp: The Language comes close, but doesn't
explicitly deal with nesting. I'll make an attempt before the next
revision comes out.
∂23-Dec-87 1555 @MC.LCS.MIT.EDU,@RELAY.CS.NET:willc@tekchips.tek.com Re: Speed (of byte code interpreters)
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Dec 87 15:55:42 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 22 Dec 87 09:12:27 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa07689; 22 Dec 87 9:02 EST
Received: from tektronix.tek.com by RELAY.CS.NET id ax13377; 22 Dec 87 8:48 EST
Received: by tektronix.TEK.COM (5.51/6.24)
id AA23301; Mon, 21 Dec 87 17:50:40 PST
Received: by tekchips.TEK.COM (5.51/6.24)
id AA11388; Mon, 21 Dec 87 17:49:12 PST
Date: Mon, 21 Dec 87 17:49:12 PST
From: Will Clinger <willc%tekchips.tek.com@RELAY.CS.NET>
Message-Id: <8712220149.AA11388@tekchips.TEK.COM>
To: scheme@mc.lcs.mit.edu
Subject: Re: Speed (of byte code interpreters)
The byte code interpreter and compiler used in MacScheme are described in
not much detail in a paper by Will Clinger in the 1984 Lisp and FP
Symposium proceedings, "The Scheme 311 compiler: An exercise in
denotational semantics."
More detail can be found in Appendix D of the current MacScheme and
MacScheme+Toolsmith manuals. The purpose of this appendix is to tell
how to write a machine code procedure that can be called from Scheme,
but in doing so it describes some of the data representations, register
conventions, calling conventions, and byte codes.
Along with the paper cited by Jonathan, this is everything that has been
published about the implementation of MacScheme.
Peace, Will Clinger
∂23-Dec-87 1556 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Scheme on CMS?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Dec 87 15:56:13 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 22 Dec 87 13:00:52 EST
Date: Tue, 22 Dec 87 12:58:31 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Scheme on CMS?
To: ihnp4!alberta!calgary!jameson@UCBVAX.BERKELEY.EDU
cc: scheme@MC.LCS.MIT.EDU
In-reply-to: Msg of 21 Dec 87 17:43:41 GMT from ihnp4!alberta!calgary!jameson at ucbvax.Berkeley.EDU (Kevin Jameson)
Message-ID: <302853.871222.JAR@AI.AI.MIT.EDU>
Date: 21 Dec 87 17:43:41 GMT
From: ihnp4!alberta!calgary!jameson at ucbvax.Berkeley.EDU (Kevin Jameson)
Several of the previous transactions appear to be seeking info on Scheme
implementations (and source) for various purposes. There appear to be
implementations of Scheme in Common Lisp and C, and maybe Common Lisp
implementations in Scheme, Scoops in Scheme, etc. etc.
I am also looking for an implementation (for a pc).
Could someone in the know please summarize what implementations are
available, for what machines, and if source is available at what
cost?
I periodically announce that I have a list of implementations, which
I'll send to anyone requesting it. (Send your request to
scheme-request@mc.lcs.mit.edu.) It's not quite up to date, but it's
close. It's sort of big so I'd rather not post it to the mailing list.
People with Internet FTP access can get the list from
MC.LCS.MIT.EDU:LSPMAI;SCHEME IMPLS
If you know of any available implementations that are missing from the
list, or if you discover any inaccurate information, please let me know.
∂23-Dec-87 1556 @MC.LCS.MIT.EDU,@RELAY.CS.NET:feeley%iro.udem.cdn@UBC.CSNET Small Scheme compiler in Prolog...
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Dec 87 15:56:47 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 22 Dec 87 16:16:44 EST
Received: from relay2.cs.net by RELAY.CS.NET id ab12439; 22 Dec 87 15:52 EST
Received: from ubc by RELAY.CS.NET id ab15820; 22 Dec 87 15:38 EST
Received: by ean.ubc.ca id AA27211; Tue, 22 Dec 87 10:21:35 pst
Date: 22 Dec 87 13:21 -0500
From: Marc Feeley <feeley%iro.udem.cdn%ubc.csnet@RELAY.CS.NET>
To: scheme@mc.lcs.mit.edu
MMDF-Warning: Parse error in original version of preceding line at RELAY.CS.NET
Message-Id: <90*feeley@iro.udem.cdn>
Subject: Small Scheme compiler in Prolog...
Hi everyone,
I recently wrote a Scheme compiler in Prolog (for a logic programming
course). The compiler handles almost all of scheme's special forms
(only backquote notation, => syntax in conds and rest arguments are
not implemented). It generates native-code for SUNs, has only
a few primitive procedures implemented and no garbage-collector.
The code generated is fairly efficient (tak takes 1 sec on a SUN3).
Those who are interested in having the source please send me a
message directly (the compiler is 45Kbytes and is written in Quintus
prolog but should be easily ported to other prologs).
If there are enough requests, I'll write a couple pages of doc (presently
you have to read the scarce comments in the code) and maybe I'll add
some more primitives and who knows... maybe a GC.
Don't expect any replies before the middle of January... Happy holidays!
Send requests to:
feeley@brandeis.csnet (my current address at Brandeis University)
feeley%grafik.iro.udem.cdn@ubc.csnet (my `home' address at the University
of Montreal).
∂23-Dec-87 1553 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: Byte code speed
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Dec 87 15:53:38 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 20 Dec 87 17:44:12 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA14433; Sun, 20 Dec 87 14:38:43 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 20 Dec 87 01:59:19 GMT
From: ihnp4!alberta!calgary!jameson@ucbvax.Berkeley.EDU (Kevin Jameson)
Organization: U. of Calgary, Calgary, Ab.
Subject: Re: Byte code speed
Message-Id: <1266@vaxb.calgary.UUCP>
References: <8712182044.AA05200@home>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Can anyone tell me anything about public domain Scheme implementations
which will run on a PC? GNU Scheme, I am told, is too big.
Thanks.
...{ihnp4,ubcvision}!alberta!calgary!vaxb!jameson
∂23-Dec-87 1554 @MC.LCS.MIT.EDU,@MITVMA.MIT.EDU:NETWORK@FRSAC11.BITNET RE: Scheme on Atari ST.
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Dec 87 15:53:54 PST
Received: from MITVMA.MIT.EDU (TCP 2227000003) by MC.LCS.MIT.EDU 21 Dec 87 07:53:59 EST
Received: from MITVMA.MIT.EDU by MITVMA.MIT.EDU ; Mon, 21 Dec 87 07:53:04 EST
Received: from FRSAC11.BITNET (NETWORK) by MITVMA.MIT.EDU (Mailer X1.25) with
BSMTP id 8410; Mon, 21 Dec 87 07:53:02 EST
Date: Mon, 21 Dec 87 13:46:01 GMT
To: scheme@mc.lcs.MIT.EDU
From: NETWORK%FRSAC11.BITNET@MITVMA.MIT.EDU
Subject: RE: Scheme on Atari ST.
Date: 21 December 1987, 13:09:03 GMT
From: NETWORK at FRSAC11
To: SCHEME at MC.LCS
To everybody concerned by Scheme on the Atari ST:
To my knowledge there is no native Scheme on this computer.
If you run a Mac emulator (Aladin or Magic Sac) then you can use MacScheme.
If you run PC Ditto then you can run TI PC Scheme.
(I would be most interested to hear about the speed of this combo.)
Why there is no MIT's CScheme on the Atari: memory.
When I get 4 meg (no less) of memory on my ST, I will port CScheme
6.1 or whatever is available at this time.
Last year I have spend a lot of time porting 4.1 on my 1040, up to the point
where the microcode compiled, using MWC 1.0. It is a lot of trouble because
there is some code in Scheme that is dependent upon C int = 32 bits.
But 1Meg is not enough to run CScheme.
If I try again, it will be with Lattice 3.04.
Some people are currently writing new Scheme implementations, if they
are portable, in C preferably, then we may end up with a working version
quite soon, if we can have the sources on the ST.
An other possibility is to start from XLISP, and change it from CommonLisp
to Scheme, I looked at the code, it is quite easy. The problem is the
speed of this implementation is not very good at all...
The last possibility would be to use Vincennes Scheme, it should run
on 2meg of memory, compiled with the Lattice C. There is currently
some technical problems to get the sources, and I still dont know
what is the Policy about this code. (Private, Copyrighted, public domain
or else...)
Keep on Scheming.
Jean-Pierre H. Dumas
network@frsac11 (bitnet)
network%frsac11.bitnet@mitvma.mit.edu (arpanet)
dumas@sumex-aim.stanford.edu (arpanet)
∂23-Dec-87 2218 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Why are case implementations so slow?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 23 Dec 87 22:18:40 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 24 Dec 87 01:15:57 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA00126; Wed, 23 Dec 87 21:22:12 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 23 Dec 87 07:55:42 GMT
From: jh@ohio-state.arpa (Juha Hein{nen)
Organization: Tampere University of Technology, Finland
Subject: Why are case implementations so slow?
Message-Id: <2225@korppi.tut.fi>
References: <5821.8712220254@aiva.ed.ac.uk>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Dispatching of a method is straighforwardly done using a case
expression on the operation symbol. I have tested the case speed of
three Scheme implementations (CScheme, MacScheme and PC Scheme) and in
all of them cond is faster than case!
Since the case labels have to be symbols, shouldn't the case
expression be faster than the corresponding cond expression? Is there
some reason why Scheme's case can't be implemted using a computed goto
like in ordinaty programming languages?
--
Juha Heinanen
Tampere Univ. of Technology
Finland
jh@tut.fi (Internet), tut!jh (UUCP)
∂24-Dec-87 0656 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA A vote against standardization
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 24 Dec 87 06:56:22 PST
Received: from mitre-bedford.ARPA (TCP 3200600102) by MC.LCS.MIT.EDU 24 Dec 87 09:51:47 EST
From: ramsdell%linus@mitre-bedford.ARPA
Posted-From: The MITRE Corp., Bedford, MA
Received: from darwin.sun.uucp by linus.research (3.2/4.7)
id AA02009; Thu, 24 Dec 87 09:50:13 EST
Posted-Date: Thu, 24 Dec 87 09:46:55 EST
Received: by darwin.sun.uucp (3.2/SMI-3.0DEV3)
id AA01711; Thu, 24 Dec 87 09:46:55 EST
Date: Thu, 24 Dec 87 09:46:55 EST
Message-Id: <8712241446.AA01711@darwin.sun.uucp>
To: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: Dick Gabriel's message of 22 Dec 87 0956 PST <8712222018.AA08060@mitre-bedford.ARPA>
Subject: A vote against standardization
I must agree with a few of Dick's comments, especially those
pertaining to the question of timing. It seems to me too early to
standardize Scheme, a language destined to go through big changes.
1) Currently, there is no conforming macro facility, nor an official
description of the correct one.
2) The situation with EVAL is not settled (I favor Rees's EVAL-IN-R3RS).
3) I would not like to see us get into the same mess Common Lisp got
into over object-oriented programming. We should standardize after
there is some consensus on what to do on that subject. I am eagarly
awaiting Adam's and Clinger's suggestion.
4) We have no support for the development of large systems. I think
this is an area that the Scheme community could greatly advance.
Dick's interview in UNIX Review points out the limitation of Common
Lisp. Let's standardize after we have something to say about large
systems.
5) Parallelism? Maybe we should break ground?
John
∂24-Dec-87 1105 @MC.LCS.MIT.EDU:dyb@iuvax.cs.indiana.edu Re: Why are case implementations so slow?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 24 Dec 87 11:05:10 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 24 Dec 87 14:02:10 EST
Date: Thu, 24 Dec 87 14:00:52 est
From: R. Kent Dybvig <dyb@iuvax.cs.indiana.edu>
To: scheme@mc.lcs.mit.edu
Subject: Re: Why are case implementations so slow?
One reason is that the "natural" expansion of
(case e0 ((k1 k2 ...) e1 e2 ...) ...)
is
(let ([tag e0]) (cond ((memv? tag '(k1 k2 ...)) e1 e2 ...) ...))
where "tag" does not occur free in e1 e2 ....
This is surely slower than using the "equivalent" eq? tests when there
is only one key per clause and that key is a symbol. The Chez Scheme
expander looks for these special cases and expands them "appropriately",
so you should find case as fast as cond. You could write your own case
macro that does the same thing.
However, it is not practical to turn case into a computed goto unless
there are several keys within a relatively small range of fixnums or
characters. It could be beneficial, certainly, but Chez Scheme doesn't
bother, and I suspect that most other implementations don't either.
R. Kent Dybvig | arpa: dyb@iuvax.cs.indiana.edu
Computer Science Department | csnet: dyb@indiana
Indiana University | usenet: ...!ihnp4!iuvax!dyb
Bloomington, IN 47405 | phone: 812/335-6486
∂27-Dec-87 1007 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU skim (a low fat implementation of Scheme)
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 27 Dec 87 10:07:42 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 27 Dec 87 13:04:45 EST
Date: Sun, 27 Dec 87 13:02:57 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: skim (a low fat implementation of Scheme)
To: scheme@MC.LCS.MIT.EDU
Message-ID: <304152.871227.JAR@AI.AI.MIT.EDU>
Date: Thu, 24 Dec 87 11:10:47 +0100
From: harvard!ut-sally!uunet!mcvax!litp!ald at bbn.com
To: jar at ai.ai.mit.edu
Re: Scheme on CMS?
Organization: L.I.T.P, Universite P7, PARIS
Return-Receipt-To: uunet!mcvax!inria!litp!ald@RUTGERS.EDU
In article <302853.871222.JAR@AI.AI.MIT.EDU> you write:
>
>If you know of any available implementations that are missing from the
>list, or if you discover any inaccurate information, please let me know.
There is an implementation of Scheme, that i believe is not
currently registered:
Name: skim (a low fat implementation of Scheme)
Authors: A. Deutsch, R. Dumeur, C. Consel, J.D. Fekete.
Runs-on: Sun[23], Vax, Orion under BSD Unix.
Has: An interpreter and a compiler (vax only for now).
Features:
- R3RS compatibility (but misses complex, bignums and ratios);
- extensible type system and operations;
- stop/copy gc;
- scode based interpreter.
Availability:
- the system has been registered;
- binaries are available (we do not plan to distribute sources now).
Performance:
- the interpreter is quite fast (5 times faster that MIT-scheme).
- the compiler is not an optimizing compiler.
Contact:
- ...mcvax!inria!litp!{ald|chac|jdf|red}
Best regards,
Alain Deutsch.
∂27-Dec-87 1406 @MC.LCS.MIT.EDU:Alan@AI.AI.MIT.EDU A vote against standardization
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 27 Dec 87 14:05:58 PST
Received: from OZ.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 27 DEC 87 17:04:56 EST
Received: from PIGPEN.AI.MIT.EDU by OZ.AI.MIT.EDU via Chaosnet; 27 Dec 87 17:04-EST
Date: Sun, 27 Dec 87 17:05 EST
From: Alan Bawden <Alan@AI.AI.MIT.EDU>
Subject: A vote against standardization
To: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: <8712241446.AA01711@darwin.sun.uucp>,
The message of 22 Dec 87 12:56 EST from Dick Gabriel <RPG@SAIL.Stanford.EDU>,
The message of 19 Dec 87 15:54 EST from Chris Haynes <chaynes@iuvax.cs.indiana.edu>
Message-ID: <871227170521.7.ALAN@PIGPEN.AI.MIT.EDU>
Here is my vote against official standardization.
I will limit myself to briefly remarking on the dangers of the "First
Strike" theory of programming language standardization:
If the good guys (us) don't get together and make a standard, then the
bad guys (them) will do it and screw up. Therefore (even though we
don't really want the hassle of standards bureaucracy) we had better do
it first.
This argument attempts to encourage a stampede by playing to everybody's
insecurities about losing control of the language. It is dangerous to
place too much weight on this argument, because you can find yourself
saddled with a standards process that in fact -nobody- really wanted (not
even the people you perceive of as the "bad guys").
If a critical mass of the Scheme community decides that it will participate
in an official standards committee, then there will be a standard, no
matter what the rest of us might think. But I hope that if that happens,
the members of that critical mass will have decided to participate on the
basis of arguments -other- than the First Strike theory.
∂27-Dec-87 2214 @MC.LCS.MIT.EDU:cph@KLEPH.AI.MIT.EDU A vote against standardization
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 27 Dec 87 22:14:03 PST
Received: from kleph (TCP 2206400254) by MC.LCS.MIT.EDU 28 Dec 87 01:13:54 EST
Received: by KLEPH.AI.MIT.EDU; Mon, 28 Dec 87 01:14:15 est
Date: Mon, 28 Dec 87 01:14:15 est
From: cph@KLEPH.AI.MIT.EDU (Chris Hanson)
Message-Id: <8712280614.AA27983@kleph>
To: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: Alan Bawden's message of Sun, 27 Dec 87 17:05 EST <871227170521.7.ALAN@PIGPEN.AI.MIT.EDU>
Subject: A vote against standardization
Reply-To: cph@mc.lcs.mit.edu
Date: Sun, 27 Dec 87 17:05 EST
From: Alan Bawden <Alan@AI.AI.MIT.EDU>
Here is my vote against official standardization.
Let me add my voice to those of Alan and John. I think it is
premature to form an explicit standard. I also feel that the drive
for standardization should be undertaken by us when we have some kind
of concensus that it is a desirable thing, not because of pressure
from external parties who have little or no commitment to the language
(I would place the IEEE people in this category).
∂28-Dec-87 1109 @MC.LCS.MIT.EDU:KMP@Riverside.SCRC.Symbolics.COM My vote against standardization
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 28 Dec 87 11:09:38 PST
Received: from Riverside.SCRC.Symbolics.COM (TCP 20024224425) by MC.LCS.MIT.EDU 28 Dec 87 14:09:25 EST
Received: from RIO-DE-JANEIRO.SCRC.Symbolics.COM by Riverside.SCRC.Symbolics.COM via CHAOS with CHAOS-MAIL id 213984; Mon 28-Dec-87 14:07:47 EST
Date: Mon, 28 Dec 87 14:07 EST
From: Kent M Pitman <KMP@STONY-BROOK.SCRC.Symbolics.COM>
Subject: My vote against standardization
To: RRRS-Authors@MC.LCS.MIT.EDU
cc: KMP@STONY-BROOK.SCRC.Symbolics.COM
References: <8712280614.AA27983@kleph>,
<871227170521.7.ALAN@PIGPEN.AI.MIT.EDU>,
The message of 22 Dec 87 12:56 EST from Dick Gabriel <RPG@SAIL.Stanford.EDU>
Message-ID: <871228140737.5.KMP@RIO-DE-JANEIRO.SCRC.Symbolics.COM>
I think a Scheme standardization process at this time would be an
extraordinarily bad idea.
I think that a time will come when, as RPG suggests, it will be
appropriate to offer the ideas of Scheme as a gift to the community to
stand on their own, but I do not think this is the time.
I was not clear on whether this standardization process was generated by
one of our members. If this move toward standardization is externally
generated, I suggest that the RRRS-Authors should make a formal
statement to IEEE asking them not to make the standard. If the move was
internally generated or if there was any prior groundwork done by any of
our members without involving the others, then I take great personal
offense at our not having been informed.
It is my strong belief that the larger the group becomes, the less
useful work it can do. We have useful work yet to do with Scheme. It is
questionable whether we can do it with a group the size that we have
now. It is nearly certain that we cannot do it with a group the size of
a standards organization.
It is also nearly certain that the organizational structure of a
standards committee is not appropriate for design work. Design is a
creative process and it cannot generally be achieved by an enforced
democratic process.
For a time it is still appropriate to be exclusive, anti-social, etc.
(one of the options RPG suggested we might take). I believe that for a
time it is still appropriate to weigh certain people's opinions more
than others (even if for friendship's sake we don't always come out and
say whose or why).
Entrance into standardization should be clearly accompanied by an
agreement to cease all design work. If we think that any further
substantive change to the language is in order (macros, eval, optional
arguments, ...), we're inviting disaster. CL has shown that one
compromise leads to another, and that in the end we may have something
that locally appeases many stated gripes, but that globally is a
hodgepodge.
There is no reason that we can't make Scheme into a language which has
greater appeal. But achieving that requires some interesting design work
to be done, not the bureaucracy of a standards committee. And anyway,
I'm content to have Scheme be a language which does not appeal to
everyone -- as long as there is a community which recognizes its value.
I'm not content to have Scheme be a language whose goal in life is to
maximize the number of people to whom it appeals at the cost of its
values.
I am willing to risk that IEEE (or anyone else) might still try to make
a Scheme standard without our consent. I assume they have the legal
right to make such a standard with or without our cooperation, but I
think we should give them the benefit of the doubt and assume they are
honorable folks who would respect our wishes. There is no shame in being
proven wrong on this point.
∂31-Dec-87 0150 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu problem bringing up Scheme 6.1
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 31 Dec 87 01:50:21 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 31 Dec 87 04:47:46 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA23229; Thu, 31 Dec 87 01:39:47 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 30 Dec 87 21:26:08 GMT
From: ucsdhub!hp-sdd!ncr-sd!ncrlnk!ncrcam!ncrcpx!craig@sdcsvax.ucsd.edu (R. Craig Peterson)
Organization: NCR E&M, Cambridge OH
Subject: problem bringing up Scheme 6.1
Message-Id: <1821610@ncrcpx.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I've been able to get Scheme to link under System V Release 2 on an
NCR Tower 32. This is 68020-based. I've had to modify the C
preprocessor (may the source be with you), and have had to make some
minor additions/changes to unix.c, config.h - the usual things from
what I can tell. I'm starting to get excited. Maybe it will work,
eh? (Canadian accent showing...)
But No...
Here's what happened in the next step:
cd /usr/craig/Scheme/
make runtime/scheme.bin
cd runtime; rm -f *.bin
etc/make_bin
Psbtobin /usr/craig/Scheme/runtime/Sgraph.psb
:
: (Additional stuff deleted)
:
Psbtobin /usr/craig/Scheme/runtime/sdata.psb
/usr/craig/Scheme/microcode/Psbtobin: Segmentation violation -- Core dumped
*** Error code 1
Stop.
Compilation exited abnormally with code 1 at Wed Dec 30 16:12:06
Gag, gag, gag. Looking into the source code there's nothing obvious.
Could some kind soul out there point me in the right direction. I've
found at least one definate bug in the distributed code. Maybe
there's another???
I would really LOVE to get this stuff working. Once working I hope to
modify GNU cpp so that others can use it on SYSVR2. (I've already
tried, but GNU cpp gets VERY confused trying to play with all the
defines - even more than USG cpp. Just need more time.)
Any help offers??? Please???
--
R. Craig Peterson "Next time someone asks you if you're a god
ncrlnk!ncrcam!ncrcpx!craig say YES!!"
N8INO Ghost Busters
E Pluribus Unum (NSA stuff - terrorist, DES, cipher, secret, NRO, CIA)
∂31-Dec-87 1010 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Question about load.
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 31 Dec 87 10:09:59 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 31 Dec 87 13:07:32 EST
Date: Thu, 31 Dec 87 13:05:50 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Question about load.
To: net%TUB.BITNET@MITVMA.MIT.EDU
cc: scheme@MC.LCS.MIT.EDU
In-reply-to: Msg of Tue 29 Dec 87 14:40:01 +0100 from Oliver Laumann <net%TUB.BITNET at MITVMA.MIT.EDU>
Message-ID: <305448.871231.JAR@AI.AI.MIT.EDU>
Date: Tue, 29 Dec 87 14:40:01 +0100
From: Oliver Laumann <net%TUB.BITNET at MITVMA.MIT.EDU>
The R3RS does not specify in which environment definitions loaded
from a file will be bound. Consider the following function:
(define (f) (load "foo"))
where "foo" contains the definition
(define x 9).
When "f" is invoked, is the variable "x" put into the environment frame
created by the call to "f", that is, is it made a local variable,
or is it entered into the environment frame in which "f" has been
defined?
I personally would expect the former, but this would make it impossible
to write a function similar to "require" supported by Gnu-Emacs.
C-Scheme seems to load definitions into the environment employed by
the read-eval-print loop, which is more useful (but less obvious).
Scheme is lexically scoped, and LOAD is a procedure, therefore there's
no way that LOAD could find out the environment from which it was
called. Thus it has to get an environment from somewhere else, e.g. the
current global state of the read-eval-print loop. C Scheme and T
both have this semantics.
What is your opinion about this and how is it handled by existing
interpreters? In interpreters that support environments as first-class
objects (like C-Scheme), shouldn't "load" receive a second argument --
the environment in which the contents of the file will be evaluated?
C-Scheme and T both do indeed accept an environment as an optional
second argument to LOAD.
∂02-Jan-88 1250 @MC.LCS.MIT.EDU:ericson@csd16.nyu.edu Optimizing tail-recursive operations using jumps
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 2 Jan 88 12:50:25 PST
Received: from csd16.nyu.edu (TCP 20036500057) by MC.LCS.MIT.EDU 2 Jan 88 15:46:50 EST
Received: by csd16.nyu.edu (3.2/25-eef)
id AA17960; Sat, 2 Jan 88 15:48:48 EST
Date: Sat, 2 Jan 88 15:48:48 EST
From: Lars Ericson <ericson@csd16.nyu.edu>
Message-Id: <8801022048.AA17960@csd16.nyu.edu>
To: scheme@mc.lcs.mit.edu
Subject: Optimizing tail-recursive operations using jumps
Consider the following calling pattern:
;0 Calling /' with arguments (<f <f 1>> <f <f <f -2<pp Y>>>>)
; 1 Calling // with arguments (<f <f 1>> <f <f <f -2<pp Y>>>>)
; 2 Calling /' with arguments (<f 1> <f <f -2<pp Y>>>)
; 3 Calling // with arguments (<f 1> <f <f -2<pp Y>>>)
; 4 Calling /' with arguments (1 <f -2<pp Y>>)
; 5 Calling // with arguments (<f 1> <f -2<pp Y>>)
; 5 Returned from // with values ((<f 1>) / (<f -2<pp Y>>))
; 4 Returned from /' with values ((<f 1>) / (<f -2<pp Y>>))
; 3 Returned from // with values ((<f 1>) / (<f -2<pp Y>>))
; 2 Returned from /' with values ((<f 1>) / (<f -2<pp Y>>))
; 1 Returned from // with values ((<f 1>) / (<f -2<pp Y>>))
;0 Returned from /' with values ((<f 1>) / (<f -2<pp Y>>))
/' is a procedure and // is an operation. Both are compiled, one calls
the other. It is apparent that every call is tail-recursive, since the
results on the way "back up" are unmodified.
Why not use continuations somehow to have a "REWRITE-CALL", similar to
a plain old JUMP, which passes arguments to a subprocedure, overwriting
the argument space on the stack for the calling procedure, such that
when the subprocedure returns, it returns to the caller of the caller?
Like DEFINE-INTEGRABLE, REWRITE-CALL would be an optimization that the
user applies intentionally when it is clear that the call is tail-recursive.
This seems like it would be pretty easy to implement, both for interpreted
and compiled code, in terms of continuations.
-- Lars Ericson
∂05-Jan-88 1540 @MC.LCS.MIT.EDU:chaynes@iuvax.cs.indiana.edu standardization
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 5 Jan 88 15:40:16 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 5 Jan 88 18:30:50 EST
Received: by iuvax.cs.indiana.edu; id AA26238; Tue, 5 Jan 88 16:35:05 EST
Date: Tue, 5 Jan 88 16:35:05 EST
From: Chris Haynes <chaynes@iuvax.cs.indiana.edu>
Message-Id: <8801052135.AA26238@iuvax.cs.indiana.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: standardization
More time is needed for discussion, so the formation of a Scheme
standardization working group will NOT be proposed at the MSC meeting
this month.
We should continue the debate what would be a good time to start a
standardization effort and how it would be best to proceed.
Historically, it seems that every language that obtains a reasonably
large user community is eventually standardized (usually over the
objections of its designers and implementers). Since the Scheme
community is growing rather rapidly, it is just a matter of time
before some part of the user community initiates standardization. So
the question is WHEN, not WHETHER, it would be best to untertake
standardization.
Perhaps there are sound technical reasons for a substantial delay (say
a year or more). If so, I would like to hear them. However, my
impression from last summer's meeting is that almost all of what we
have now is relatively stable, and the new features we would like to
consider adding (macros, modules, etc.) are all very much in the
design stage. It will likely take at least a year (probably two or
more) to refine these proposals and get them widely implemented, and
another year of experience with them before we can be sure we like
them. Only then (2 or 3 years hence) would it seem likely that major
new features should be candidates for standardization.
I believe the advantages of moving relatively soon to standardize
approximately what we have now outweigh the disadvantages of waiting
that long. Admittedly this judgment is based on weighing the
importance of a number of nontechnical considerations. Thus it is
impossible for me to be sure this is right, much less make a
definitive argument in its favor. In this respect especially, we need
feedback from all segments of the Scheme community (not just its
designers and implementers).
It is vital that standardization not impede the development of new
features and improved implementations, but I do not see why it should
(other than taking the time of some individuals who would be involved
in both). Again, if anyone has technical grounds for casting
reasonable doubt on this judgment, please speak up.
I'm leaving town again for a couple of weeks. I'll respond to many
of the comments received thus far when I return.
Regards,
Chris Haynes
∂06-Jan-88 1117 @MC.LCS.MIT.EDU,@RELAY.CS.NET:camp@mips.csc.ti.com Scheme Standardization
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 6 Jan 88 11:17:32 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 6 Jan 88 14:12:56 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa28365; 6 Jan 88 14:11 EST
Received: from csc.ti.com by RELAY.CS.NET id ai21643; 6 Jan 88 13:58 EST
Received: from mips by tilde id AA15625; Wed, 6 Jan 88 12:36:27 CST
Received: by mips id AA17672; Wed, 6 Jan 88 12:36:22 CST
Date: Wed, 6 Jan 88 12:36:22 CST
From: Clyde Camp <camp%mips.csc.ti.com@RELAY.CS.NET>
Message-Id: <8801061836.AA17672@mips>
To: rrrs-authors@mc.lcs.mit.edu
Subject: Scheme Standardization
========================================================================
= IT IS MUCH MORE DIFFICULT TO GIVE BIRTH TO SOMETHING THAN TO KILL IT =
========================================================================
I've watched the RRRS-AUTHORS mail for the last couple of weeks with
interest and feel it is time to respond to the issues raised on
standardization and clear up a few apparent misconceptions.
For those of you who do not know me, my name is Clyde Camp and I work
for the Computer Science Center of Texas Instruments. I've been
involved in standards work both inside TI and outside for about 15
years. I'm also the chair of the Microprocessor Standards Committee
(MSC), having been vice-chair for a year and secretary for three years
preceding that.
Before I go any further, let me point out that in any discipline there
are always horror stories of things gone wrong or difficulties
encountered. The standards world is no different and the few horror
stories are widely circulated while the many successes go largely
un-noticed by all except those directly involved. It is also
interesting to note that, historically, the more severe problems have
been due to hesitation or waiting too long to do something rather than
starting things too quickly. One of the major reasons for the various
committees is to isolate the technical work of the working group members
from most of the "hassle" of the standardization process itself. Only
the chair NEED worry about that (although anyone else who is really
interested is welcome to attend anything.)
The rest of this is broken into three parts:
1) A history of the Scheme standard proposal mentioned by Chris
Haynes.
2) A response to the replies he had received as of January 4th.
3) A set of recommendations which the readers should consider.
(transmitted separately)
In the interests of time I have not attempted to explain the sequential
steps involved in standardization, except as they directly apply. The
process is rather well outlined in a pair of articles by Dr. Michael
Smolin in the August-87 issue of IEEE MICRO (pages 82-83) and in the
October-87 issue (pp 92-94).
If any of you wish to contact me directly, I can be reached at (214)
995-0407 (beware the answering machine) or at camp%TI-CSL@CSNET-RELAY.
!
***HISTORY***
The current attempt to bring about a Scheme standard was originally
initiated by me about the middle of last year and was based on the
following:
1) Scheme is an ideal language for general symbolic processing
2) It is significantly better suited for embedded applications and
small systems than Common Lisp
3) It is an ideal educational/instructional language
4) There were at least three commercial implementations (all mostly
alike, but with significant differences)
5) There seemed to be a growing ground swell of users who liked the
language (brought about in no small part by the Abelson/Sussman
'Bible')
6) There was already a group in existence who had generated a working
'specification' for the language, who represented a reasonable mix
of theorists, users and implementors and who were eminently
qualified. This existing 'specification' is already better
than some existing standards.
7) I didn't want to see the Common Lisp standardization mess (due in a
large part to waiting too long before starting) repeated with
Scheme. I wanted it to be a pro-active standard rather than a
retro-active one.
8) I felt that the IEEE/CS was the best way to get such a standard
developed.
My personal belief is that Scheme stands a very good chance of being the
symbolic and arithmetic language-of-choice in the long-term (5-10
years). But I don't believe that it can be so without at least
partially leaving its current academic environment and finding a
sponsoring organization such as the IEEE or ACM - there will be too many
external pressures (user, industry, government).
At that time I sent Jonathan Rees, David Bartley and a few others a
short message on the pros/cons of standardization and suggested that the
topic be brought up at the June-1987 RRRS meeting. Based on David's
report back to me that it had been raised and quickly dismissed, I took
the easy path of not pursuing the issue any further (and have even lost
the text of the message I sent.)
In early December, 1987, Jim Flournoy (with the Computer Society
Standards Activity Board) independently recognized that it might be an
appropriate time to begin a Scheme standardization effort. He called me
and asked for names of people who I thought might be willing to chair
such an activity. I opened up the RRRS red-book and gave him the names
of the people who were foolish enough to have their names printed on the
first page. When he reported back that Chris Haynes and Will Clinger
had agreed to consider being chair and secretary respectively, I called
both back in mid-December and, after several long discussions, conned
them into considering positions of chair and vice-chair instead.
Will and Chris then began polling the Scheme community for Interest,
Disinterest, Non interest. The jury is still out.
Without going into all the gory details, we tried to get things lined up
to have Chris or Will present at the January MSC meeting (or me pitch
their presentation). The January meeting was important because it was
the day before the annual ANSI Standards Project Authorization Review
Committee (SPARC) meeting. It would have been ideal if this could have
been worked out since SPARC is the committee which reviews submissions
to ANSI by X3 and IEEE. For various reasons, this time frame turned out
to be too short for everybody to get their act together, so I would like
to try for the the next MSC meeting in March or the one in May.
One of the primary reasons for pushing on this is to get a head start on
all the administrative time lags built into the process.
For those of you who are by this time thinking "All that crap is the
reason I didn't want to get involved with the damn standards activity to
begin with" the good news is that none of the above should affect what
the working group is doing or when it meets. One of the major reasons
for the various committees is to isolate the technical work of the
working group (WG) members from most of the administrative process of
the standardization business itself. Only the chair NEED worry about
that although anyone else who is really interested is welcome to attend
anything.
***** RESPONSE ****
CHRIS HAYNES:
A excellent (balanced) summary. There is little I can add other than to
correct a few minor points (which may have been due to a
mis-communication on my part to begin with).
With respect to working group attendance and 'voting' rights, there are
NO formal procedural requirements at the working group level. The WG
Chair is pretty much free to run things the way he wants. Although
there are some informal guidelines that will be recommended, the CS
Policies and Procedures manual states merely that the chair of the
working group is responsible for developing the document. Again, the
reason for this is to keep the working group as free from the
administrative details as it wishes to be. There are no requirements
for meeting frequency or place or attendance for example. While the
Chair is required to be a CS or IEEE member, there is no such
requirement on any of the other WG members.
As Chris pointed out, trial-use standards are reviewed every two years
and recommended for full use, withdrawal or revision. Full-use
standards come up for review every five years for reconfirmation,
withdrawal or revision. So a 'STANDARD' is not cast in concrete for all
time.
The extensive use of E-mail net to development a standard is a new (to
the MSC) methodology, but one which I encourage. Although non-net
interested parties must also be accommodated, the Chair can probably
handle this is by keeping a mailing list of those entities and sending
them hard copies of the net traffic at periodic intervals or as
necessary. The IEEE secretariat can be used to take care of
reproduction and mailing if necessary (all she needs is one copy and a
mailing list) but we have a limited budget and prefer that the WG work
this out if possible.
DICK GABRIEL:
(1-3) There are some tough arguments and questions here but many of them
are between basic philosophical issues which are akin to arguing the
advantages/disadvantages of big-endian vs. little-endian. Dick's
comments about splitting up (or not) Scheme and Common Lisp were
interesting because I've wondered as well about the possibility of a
family of symbolic processing languages. The scope of something like
this is scary and the initial reaction is probably "No way, Jose -
Impossible". But those of you who think pulling together (apparently)
radically different things under one umbrella is an impossible task
should talk to Maurice Graube who chairs the 802 networking standard (a
success story if ever there was one.)
I fully agree with Dick's statement that the work gets done by small
groups which are self motivated but disagree with his conclusion that
nothing will change other than for the worse. A properly run standards
working group does help motivation, discipline and visibility - it
happens more often than not. Common Lisp is, unfortunately, an example
of 'not'.
(4-6) The answer to all three of these is basically "It's possible, but
only if you let it." I think it's far less likely that any of these
fears will be realized if the RRRS cadre is in the driver's seat. A
scenario that bothers me more is "company X" pushing its implementation
of Scheme as THE correct and only implementation.
(7 - the first one) RPG is right except for the last paragraph, which
again is my fault. With exception of the actual working groups, voting
rights at each committee level are xxxx + "appointment by the chair with
concurrance of the next higher chair" where xxxx is formally specified
in the CS Policies and Procedures manual. The working groups have no
such restrictions and although the recommendation is that some generally
uniform policy be maintained, it is always the Chair's perogative to
issue voting rights (for example to individuals who can't personally
attend for some reason but who are obviously valuable contributors) or
to remove them (for example to allow company-X only one vote to prevent
it from sending 300 people to swing the standard to meet its product) or
to not vote at all and develop the specification by some other means of
consensus.
With respect to lawsuits, the IEEE provides protection to the WG from
such things to some extent. While such an issue has never come up and
the degree or capability to which the IEEE would defend such a suit is
unknown, members are certainly better protected than a non-sponsored
group.
(7 - the right thing?) Perhaps this effort?
RAMSDELL:
=========
These are largely tactical decisions which can be made if and when a WG
is formed. Again, standards can be added to. The current RRRS approach
of essential vs non-essential may be entirely appropriate. Similar
things have been done on hardware standards. I think I would advise
against trying to include parallelism at this stage.
ALAN BAWDEN:
============
I don't believe in the "First Strike" theory either, although I do
wonder why it keeps happening. Seriously, it has happened but while the
possibility exists, I suspect that in this particular case the scheme
community is sufficiently close-knit that it would be aware of such an
effort and might be able to insert the red-book as a proposed draft even
if it should occur. It is always easier and more efficient to start
with something which is at least partially acceptable than to start all
over from scratch - if for no other reason than the job of physically
entering the text.
CHRIS HANSON:
===============
What?!?!?!?
I'm one of those "IEEE people" you refer to (as are four of the 17 RRRS
authors) and I will certainly take issue with anyone who tells me I have
no committment to the language. It's BECAUSE I have a committment to
the language that I'm taking the effort to try and get this effort
going. If you have legitimate arguments on either side then voice them
by all means, but please do so without rancor.
KENT PITMAN:
============
I hope the previous megawords clear up some of your confusion with
regard to who is doing what and why.
You are somewhat right in your belief that the larger a group becomes,
the less useful work it can do. I say somewhat because it depends on
the absolute size - I'll contend that three can do more than one but
certainly 20 can do more than 200. However, as I've said before, the
entire standards organization is not involved here - only those that are
in your working group. Even this could become large although only a few
do "useful work". Using the MSC itself as an example, the mailing list
is about 200, however only 30 or so are what I would call participating.
The rest are there primarily for info although they may inject comments
(sometimes even useful ones!) now and then. It may help to think about
it like CS-NET. How many read or have access to RRRS-AUTHORS vs how many
actually contribute?
Ceasing design work to initiate a standard is not a requirement. If it
were, there would be far fewer standards around. It is entirely
possible to be in 100% compliance with a standard and yet extend it
provided the extensions don't alter things you've done before. The goal
of a standard is most definitely NOT to "maximize the number of people
to whom it appeals at the cost of its values" although where to draaw
the line is often difficult to decide.
===================
My recommendations on where to proceed from here are being transmitted
in a separate message.
REgards, Clyde
∂06-Jan-88 1330 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu getting C-Scheme running on Sun-3 / want Scoops info
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 6 Jan 88 13:29:49 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 6 Jan 88 16:21:36 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA25879; Wed, 6 Jan 88 12:57:27 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 6 Jan 88 16:29:29 GMT
From: siemens!edsel!biggers@princeton.edu (Mark Biggers)
Organization: Siemens RTL, Princeton, NJ
Subject: getting C-Scheme running on Sun-3 / want Scoops info
Message-Id: <374@siemens.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Hello,
I am sure this has been requested before (maybe it should be with
the C-Scheme distribution), but has anyone gotten C-Scheme fully
installed on SunOS v3.4? I think the installation went fine
until the undump attempt.
Also, would like to get SCOOPS source and info on SCOOPS; any
pointers to this appreciated!
mark
-------------------------------------------------------------------------
Mark Biggers
Siemens Research & Technology Laboratories
105 College Road East
Princeton, NJ 08540
UUCP: {almost anywhere}!princeton!siemens!biggers
ARPA: biggers%siemens@princeton.edu
-------------------------------------------------------------------------
∂06-Jan-88 1913 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU who contributes?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 6 Jan 88 19:13:36 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 6 Jan 88 22:12:48 EST
Date: Wed, 6 Jan 88 22:08:39 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: who contributes?
To: camp%mips.csc.ti.com@RELAY.CS.NET
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Wed 6 Jan 88 12:36:22 CST from Clyde Camp <camp%mips.csc.ti.com at RELAY.CS.NET>
Message-ID: <307797.880106.JAR@AI.AI.MIT.EDU>
Date: Wed, 6 Jan 88 12:36:22 CST
From: Clyde Camp <camp%mips.csc.ti.com at RELAY.CS.NET>
How many read or have access to RRRS-AUTHORS vs how many
actually contribute?
I was sort of curious about this. I count 22 individuals directly on
the mailing list, plus four redistributions:
OZ - 14 people
HP-SCHEME - I have no idea; I'll guess 4
Indiana - ditto; guess 7
TI - ditto; guess 7
That makes about 54 people, if I add correctly. Probably a conservative
estimate.
43 people (plus one program and one stuffed animal) have contributed to
the 825 messages. 20 people have contributed 7 or more messages each.
These 20 people account for 95% of the messages. (Counting messages is
a crude measure, but it's all I have the energy to do.) As I expected, I
am the most embarrassed, with Bill Rozas and Will Clinger 2nd and 3rd.
Jonathan Rees 191 (192 with this message)
Bill Rozas 84
Will Clinger 70
David Bartley 64
John Ramsdell 60
Kent Dybvig 55
Chris Hanson 55
Guy Steele 30
Kent Pitman 24
Gerald Jay Sussman 21
Mitchell Wand 20
Chris Haynes 17
Andy Cromarty 15
Dan Friedman 13
Andy Freeman 12
Bert Halstead 11
Norman Adams 10
George Carrette 8
Paul Hudak 7
Alan Bawden 7
Perry Wagle 6
Gary Brooks 5
Don Oxley 4
Charlotte Mooers 4
Matthias Felleisen 3
Ken Haase 3
Hal Abelson 3
Warren Harris 2
Myrna Fox 2
Henry Wu 2
Eugene Kohlbecker 2
David Brown 2
Steve Vegdahl 1
Robert Hieb 1
Richard Kelsey 1
Richard Fateman 1
Oliver Laumann 1
Morris Katz 1
Mark Meyer 1
Larry Masinter 1
Jay Leech 1
Clyde Camp 1
Arthur Altman 1
COMSAT 1
Tigger 1
∂07-Jan-88 0508 @MC.LCS.MIT.EDU,@MITVMA.MIT.EDU:MDEBAR@BNANDP11.BITNET Scoops ?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 7 Jan 88 05:08:44 PST
Received: from MITVMA.MIT.EDU (TCP 2227000003) by MC.LCS.MIT.EDU 7 Jan 88 08:01:45 EST
Received: from MITVMA.MIT.EDU by MITVMA.MIT.EDU ; Thu, 07 Jan 88 08:01:02 EST
Received: from SCF1.FNDP.AC.BE by MITVMA.MIT.EDU (Mailer X1.25) with BSMTP id
8229; Thu, 07 Jan 88 08:00:59 EST
Received: by BNANDP11 (Mailer X1.25) id 5533; Thu, 07 Jan 88 13:41:10 +01
Date: Thu, 07 Jan 88 13:36:44 +01
From: Michel Debar <MDEBAR%BNANDP11.BITNET@MITVMA.MIT.EDU>
Subject: Scoops ?
To: SCHEME@MC.LCS.MIT.EDU
If you have an implementation of Scoops for either C Scheme (on a vax
VMS), or MacScheme (on a Macintosh), please let me know. Better yet,
if you can do it, mail me the Scheme code. Thanks a lot.
To be clear, I am looking for both implementations, not just any one,
but evidently, either one is much better than none...
Michel Debar - Fndp Computing Centre - Rue Grandgagnage 21, 5000 namur
Belgium - Tel + 32 (81) 22 06 31
mdebar%bnandp11.bitnet@cunyvm.cuny.edu
∂07-Jan-88 1732 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: Scoops ?
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 7 Jan 88 17:32:02 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 7 Jan 88 20:09:04 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA26851; Thu, 7 Jan 88 16:38:45 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 7 Jan 88 17:11:54 GMT
From: marge.math.binghamton.edu!sullivan@bingvaxu.cc.binghamton.edu (fred sullivan)
Organization: SUNY Binghamton, NY
Subject: Re: Scoops ?
Message-Id: <759@bingvaxu.cc.binghamton.edu>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I also need scoops for c-scheme. Is it available?
Thanks,
Fred Sullivan
Department of Mathematical Sciences
State University of New York at Binghamton
Binghamton, New York 13903
Email: sullivan@marge.math.binghamton.edu
∂07-Jan-88 1848 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Scheme for the Amiga
Received: from MC.LCS.MIT.EDU by SAIL.STANFORD.EDU with TCP; 7 Jan 88 18:48:22 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 7 Jan 88 21:43:40 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA22119; Thu, 7 Jan 88 12:09:07 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 7 Jan 88 16:17:58 GMT
From: goldberg@acf3.nyu.edu (Benjamin Goldberg)
Organization: New York Univsersity
Subject: Scheme for the Amiga
Message-Id: <518@acf3.NYU.EDU>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Does anyone know of a Scheme implementation for the Amiga?
-Ben Goldberg
∂08-Jan-88 1659 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: Scheme for the Amiga
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 8 Jan 88 16:59:50 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 8 Jan 88 19:56:27 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA20886; Fri, 8 Jan 88 15:28:24 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 8 Jan 88 21:45:30 GMT
From: wpd@athena.mit.edu (William P Doyle)
Organization: Massachusetts Institute of Technology
Subject: Re: Scheme for the Amiga
Message-Id: <2194@bloom-beacon.MIT.EDU>
References: <518@acf3.NYU.EDU>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
In article <518@acf3.NYU.EDU> goldberg@acf3.nyu.edu (Benjamin Goldberg) writes:
>Does anyone know of a Scheme implementation for the Amiga?
I have implemented scheme 6.1 on my Amiga. I'll tell you, it's not an
easy thing to do. First of all, there is no way CScheme will work on a
machine with only 0.5M of RAM. I have got it working with 2.5M, but it
really wants 4M, heavy sigh... Also, if you want to work on implementing
it, you will need a hard disk. But the important thing is, it does exist and
is alive. I am currently trying to work on the interrupt scheme (sorry, no
pun intended) before I am happy with it.
______________________________________________
| |
| Patrick Doyle wpd@ATHENA.MIT.EDU |
∂11-Jan-88 0520 @MC.LCS.MIT.EDU:AHAAS@G.BBN.COM leaving
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 11 Jan 88 05:20:17 PST
Received: from G.BBN.COM (TCP 1000400022) by MC.LCS.MIT.EDU 11 Jan 88 08:17:00 EST
Date: Mon 11 Jan 88 08:15:32-EST
From: AHAAS@G.BBN.COM
Subject: leaving
To: scheme@MC.LCS.MIT.EDU
Please take me off the list.
-------
∂11-Jan-88 1355 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Problem with MIT-Scheme
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 11 Jan 88 13:55:23 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 11 Jan 88 16:48:44 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA03617; Mon, 11 Jan 88 13:36:23 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 11 Jan 88 18:07:05 GMT
From: ucsdhub!hp-sdd!ncr-sd!ncrlnk!ncrcam!ncrcpx!craig@sdcsvax.ucsd.edu (R. Craig Peterson)
Organization: NCR E&M Cambridge, Ohio
Subject: Problem with MIT-Scheme
Message-Id: <1821614@ncrcpx.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I've tried to send this to MIT, but couldn't get through:
To: info-cschme-request%oz@mc.lcs.mit.edu, INFO-CSCHEME%OZ@MC.LCS.MIT.EDU
Subject: join scheme mailing list & problem
I am trying to get MIT Scheme up on an NCR Tower 32 - SYSVR2. I've
got everything going along just fine untill:
Psbtobin /usr/craig/Scheme/runtime/screen.psb
Psbtobin /usr/craig/Scheme/runtime/sdata.psb
/usr/craig/Scheme/microcode/Psbtobin: Segmentation violation -- Core dumped
*** Error code 1
`runtime/scheme.bin' not remade because of errors
Not very nice. I looked into Psbtobin and found it to be quite
involved. I wonder if you know of any bugs that may be obvious. An
sdb run on the core shows:
$ sdb Psbtobin ../runtime/core
0x80a in read_a_string:138: *string++ = ((char) read_a_char());
*w
133: To[STRING_LENGTH] = Make_Non_Pointer(TC_FIXNUM, len);
134:
135: /* Space */
136: getc(Portable_File);
137: while (--len >= 0)
138: *string++ = ((char) read_a_char());
139: *string = '\0';
140: return (To + Pointer_Count);
141: }
142: !
*t
read_a_string(To=0x8134,Slot=0x7228) [Psbtobin.c:138]
Read_External(N=300,Table=0x7078,To=0x7528) [Psbtobin.c:410]
do_it() [Psbtobin.c:750]
Setup_Program(argc=1,argv=0xdffd84,Noptions=0,Options=0x5274) [Psbtobin.c:226]
main(argc=1,argv=0xdffd84,14679436) [Psbtobin.c:851]
*To/s
'7↑?J↑Z_}
*To/x
0x8134
*To/2x
0x8134 0x7228
*Pointer_Count/2x
0x37ff4b 0xdfc63b
*
BTW, adb agrees with sdb about the arguments:
$ adb Psbtobin ../runtime/core
ready
$c
Read_External+0x4e: read_a_string (0x8134, 0x7228)
do_it+0x58: Read_External (0x12c, 0x7078, 0x7528)
Setup_Program+0x76: do_it (0x5274)
main+0x22: Setup_Program (0x1, 0xdffd84, 0x0, 0x5274)
start%+0x2c: main (0x1)
???: start% (0x518f2eaf, 0x841ef, 0xc2f48)
$q
Can you be of any help? I would really like to get this stuff going.
Thanks in advance.
--
R. Craig Peterson "Next time someone asks you if you're a god
ncrlnk!ncrcam!ncrcpx!craig say YES!!"
N8INO Ghost Busters
E Pluribus Unum (NSA stuff - terrorist, DES, cipher, secret, NRO, CIA)
∂13-Jan-88 1724 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Request for C-Scheme info
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 13 Jan 88 17:24:48 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 13 Jan 88 20:19:17 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA03417; Wed, 13 Jan 88 16:49:01 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 13 Jan 88 03:57:15 GMT
From: pbox!okstate!norman@rutgers.edu (Norman Graham)
Organization: Oklahoma State Univ., Stillwater
Subject: Request for C-Scheme info
Message-Id: <3057@okstate.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I'm about to uucp C-Scheme from Ohio State, but before I do I would
like to know what I'm getting myself into. Some of the questions
going through my mind right now are
- Is this thing SysV compatible?
- If it's not, is it easily portable (or has someone else done it :-)?
- Is it a decent implementation?
- Is it documented?
- Is it the greatest thing since sliced bread?
If it is not sysV compatible I would appreciate hearing any war stories
about porting it.
Please send mail to me as I'm sure that this has been discussed before.
--
Norman Graham
Oklahoma State University Internet: norman@a.cs.okstate.edu
Computing and Information Sciences UUCP: {cbosgd, ihnp4,
219 Mathematical Sciences Building rutgers}!okstate!norman
Stillwater, OK 74078-0599
∂13-Jan-88 1808 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Scheme for Unix 4.3 BSD, Ultrix 2.0, or Sys V 3.0 ???
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 13 Jan 88 18:08:30 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 12 Jan 88 22:46:00 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA06955; Tue, 12 Jan 88 19:22:51 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 12 Jan 88 20:37:39 GMT
From: gt-cmmsr!rr@gatech.edu (Richard Robison)
Organization: Center for Man-Machine Systems Research - Ga Tech
Subject: Scheme for Unix 4.3 BSD, Ultrix 2.0, or Sys V 3.0 ???
Message-Id: <31868@gt-cmmsr.GATECH.EDU>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Is Scheme available for Unix 4.3 BSD, Ultrix 2.0, or Sys V 3.0? Thanks.
-Richard
--
Richard Robison
UUCP: rr@gt-cmmsr.UUCP (404-894-6221)
...!{allegra,hplabs,ihnp4,ulysses}!gatech!gt-cmmsr!rr
INTERNET: rr@cmmsr.gatech.edu
∂15-Jan-88 1911 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: SYSV Scheme was Re: Request for C-Scheme info
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 15 Jan 88 19:11:06 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 15 Jan 88 18:03:39 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA22413; Fri, 15 Jan 88 11:45:20 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 15 Jan 88 14:43:22 GMT
From: ucsdhub!hp-sdd!ncr-sd!ncrlnk!ncrcam!ncrcpx!craig@sdcsvax.ucsd.edu (R. Craig Peterson)
Organization: NCR E&M Cambridge, Ohio
Subject: Re: SYSV Scheme was Re: Request for C-Scheme info
Message-Id: <1821615@ncrcpx.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
In article <3057@okstate.UUCP> norman@a.cs.okstate.edu writes:
>I'm about to uucp C-Scheme from Ohio State, but before I do I would
>like to know what I'm getting myself into. Some of the questions
>going through my mind right now are
>
> - Is this thing SysV compatible?
> - If it's not, is it easily portable (or has someone else done it :-)?
> - Is it a decent implementation?
> - Is it documented?
> - Is it the greatest thing since sliced bread?
>
>If it is not sysV compatible I would appreciate hearing any war stories
>about porting it.
>
>Please send mail to me as I'm sure that this has been discussed before.
>
>--
>Norman Graham
>Oklahoma State University Internet: norman@a.cs.okstate.edu
>Computing and Information Sciences UUCP: {cbosgd, ihnp4,
>219 Mathematical Sciences Building rutgers}!okstate!norman
>Stillwater, OK 74078-0599
I've uploaded the MIT-Scheme from OSU. I have a few System VR2 boxes
here, and I've worked at porting it to SYSV. I've got it working just
fine until part way through its conversion of some files from its
non-machine-specific format to something for your machine; creating
its runtime library stuff. It ends up getting a segmentation
violation. I haven't had any chance to look at it for a couple of
weeks as I'm very busy getting ready for a demo for another product
here. If you'd like what I've done, I'd be glad to send it to you.
I'm still looking for help!! Does anyone know of any known bugs.
Here's the scenario:
I am trying to get MIT Scheme up on an NCR Tower 32 - SYSVR2. I've
got everything going along just fine until:
Psbtobin /usr/craig/Scheme/runtime/screen.psb
Psbtobin /usr/craig/Scheme/runtime/sdata.psb
/usr/craig/Scheme/microcode/Psbtobin: Segmentation violation -- Core dumped
*** Error code 1
`runtime/scheme.bin' not remade because of errors
Not very nice. I looked into Psbtobin and found it to be quite
involved. I wonder if you know of any bugs that may be obvious. An
sdb run on the core shows:
$ sdb Psbtobin ../runtime/core
0x80a in read_a_string:138: *string++ = ((char) read_a_char());
*w
133: To[STRING_LENGTH] = Make_Non_Pointer(TC_FIXNUM, len);
134:
135: /* Space */
136: getc(Portable_File);
137: while (--len >= 0)
138: *string++ = ((char) read_a_char());
139: *string = '\0';
140: return (To + Pointer_Count);
141: }
142: !
*t
read_a_string(To=0x8134,Slot=0x7228) [Psbtobin.c:138]
Read_External(N=300,Table=0x7078,To=0x7528) [Psbtobin.c:410]
do_it() [Psbtobin.c:750]
Setup_Program(argc=1,argv=0xdffd84,Noptions=0,Options=0x5274) [Psbtobin.c:226]
main(argc=1,argv=0xdffd84,14679436) [Psbtobin.c:851]
*To/s
'7↑?J↑Z_}
*To/x
0x8134
*To/2x
0x8134 0x7228
*Pointer_Count/2x
0x37ff4b 0xdfc63b
*
BTW, adb agrees with sdb about the arguments:
$ adb Psbtobin ../runtime/core
ready
$c
Read_External+0x4e: read_a_string (0x8134, 0x7228)
do_it+0x58: Read_External (0x12c, 0x7078, 0x7528)
Setup_Program+0x76: do_it (0x5274)
main+0x22: Setup_Program (0x1, 0xdffd84, 0x0, 0x5274)
start%+0x2c: main (0x1)
???: start% (0x518f2eaf, 0x841ef, 0xc2f48)
$q
Can you be of any help? I would really like to get this stuff going.
Thanks in advance.
--
R. Craig Peterson "Next time someone asks you if you're a god
ncrlnk!ncrcam!ncrcpx!craig say YES!!"
N8INO Ghost Busters
E Pluribus Unum (NSA stuff - terrorist, DES, cipher, secret, NRO, CIA)
∂20-Jan-88 0207 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Problems bringing up CScheme 6.1
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 20 Jan 88 02:07:20 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 20 Jan 88 05:03:37 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA28920; Wed, 20 Jan 88 01:30:13 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 19 Jan 88 16:48:32 GMT
From: ingr!b14!clark@uunet.uu.net (Clark Williams)
Organization: Intergraph Corp. Huntsville, Al
Subject: Problems bringing up CScheme 6.1
Message-Id: <389@b14.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I am attempting to bring up CScheme 6.1 on two machines and am encountering
difficulties on both. I am hoping that someone with a little more Lisp/Scheme
experience than I have will be able to spot my problems or at least point me
in the right direction.
The first machine is an Intergraph InterPro-220 workstation. This machine
runs System V release 3 on the Clipper RISC processor set. After editing
config.h and setting the relevant parameters, a make yields this message:
> cd runtime;../microcode/scheme -fasl runmd.bin <../etc/make_band.scm
>Scheme Microcode Version 10.2
>MIT Scheme, unix [ATT (V)] version
>
>utabs.bin loaded purified evaluated
>implmd.bin loaded purified evaluated
>boot.bin loaded purified evaluated
.
. <<<-------------------18 lines deleted
.
>numpar.bin loaded purified evaluated
>numunp.bin loaded
>
>Purify phase error 9a0, 99f
>
>Inconsistency detected.
>*** Error code 1
>
>Stop.
My question is, where should I start looking? I am new to the Lisp/Scheme world
and I don't even know what 'purify' means in this context. Should I look in the
Psbtobin.c code for a problem translating the .psb file to a .bin file? Or
should I look in the purify.c code?
The second machine is an Intergraph Micro II (MicroVax II with our boards)
running VMS 4.5 (yes I know, BLECH!). This machine gets through the initial
load-purify-evaluate phase and then this happens:
>Cold load finished. Type
>
>((access finish-load runtime-system))
>
>to load the rest of the system.
>
>1 ]=> ((access finish-load runtime-system))
>No such file #("pathname" () () "emacs" "bin" NEWEST)
>
>2 Error->
It just hasn't been my day.
Any insight to these problems would be greatly appreciated.
--
_ /| | Clark Williams
Ack Thippfft! \'o.O` | Intergraph Corp.
=(___)= | {uunet|ihnp4}!ingr!b14!clark
U | (205) 772-6881
∂21-Jan-88 1949 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Question: Are the GABRIEL-benchmarks translated into SCHEME already?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 21 Jan 88 19:48:52 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 21 Jan 88 22:41:45 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA18118; Thu, 21 Jan 88 19:10:18 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 20 Jan 88 15:08:18 GMT
From: mcvax!dutrun!dutesta!brouw@uunet.uu.net (Gerard Brouwer)
Organization: Delft University of Technology, Netherlands
Subject: Question: Are the GABRIEL-benchmarks translated into SCHEME already?
Message-Id: <1068@dutesta.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
In the book 'Performance and Evaluation of Lisp Systems' the writer
Richard P.Gabriel presents a dozen famous benchmarks. They are written in
CommonLisp. What I am looking for is a translation of these benchmarks
in SCHEME. If anyone knows if these SCHEME-benchmarks do exist,
and where to get them please contact me. Thanks for your cooperation.
Gerard Brouwer,
Delft University of Technology UUCP: MCVAX!dutrun!dutesta!brouw
Department of Electrical Engeneering
Section Computer Architecture
Mekelweg 4
2628 CD Delft, The Netherlands
∂22-Jan-88 0903 @MC.LCS.MIT.EDU:rnoss%isis.educ.lon.ac.uk@NSS.Cs.Ucl.AC.UK
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 22 Jan 88 09:03:04 PST
Received: from NSS.Cs.Ucl.AC.UK (TCP 20012204403) by MC.LCS.MIT.EDU 22 Jan 88 11:58:14 EST
Received: from isis.educ.lon.ac.uk by NSS.Cs.Ucl.AC.UK via Janet with NIFTP
id aa07684; 22 Jan 88 16:53 GMT
Date: 22 Jan 1988 16:51:53-GMT
From: rnoss <rnoss%isis.educ.lon.ac.uk@NSS.Cs.Ucl.AC.UK>
To: scheme <@NSS.Cs.Ucl.AC.UK:scheme@mc.lcs.mit.edu>
Hi -- I've just been in contact with Hal Abelson who says you may
be able to help us. We have a Pyramid running unix. Is there a scheme
that we could run? How do we get it? How much? etc.....
All information would be welcome
Thanks
Richard Noss
(University of London -- Institute of Education)
∂22-Jan-88 1116 @MC.LCS.MIT.EDU,@RELAY.CS.NET:tjfs@HPLB.CSNET Problems bringing up CScheme 6.1
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 22 Jan 88 11:16:40 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 22 Jan 88 14:13:02 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa00502; 22 Jan 88 12:45 EST
Received: from hplb by RELAY.CS.NET id ac16785; 22 Jan 88 12:33 EST
Received: from CSNet-Relay by hplb.csnet; 21 Jan 88 4:37:44-WET (Thu)
Received: from relay.cs.net by RELAY.CS.NET id gf00770; 20 Jan 88 11:19 EST
Received: from mc.lcs.mit.edu by RELAY.CS.NET id aa21723; 20 Jan 88 5:15 EST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 20 Jan 88 05:03:37 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA28920; Wed, 20 Jan 88 01:30:13 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 19 Jan 88 16:48:32 GMT
From: Clark Williams <clark%b14%ingr@uunet.uu.net>
Organization: Intergraph Corp. Huntsville, Al
Subject: Problems bringing up CScheme 6.1
Message-Id: <389@b14.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I am attempting to bring up CScheme 6.1 on two machines and am encountering
difficulties on both. I am hoping that someone with a little more Lisp/Scheme
experience than I have will be able to spot my problems or at least point me
in the right direction.
The first machine is an Intergraph InterPro-220 workstation. This machine
runs System V release 3 on the Clipper RISC processor set. After editing
config.h and setting the relevant parameters, a make yields this message:
> cd runtime;../microcode/scheme -fasl runmd.bin <../etc/make_band.scm
>Scheme Microcode Version 10.2
>MIT Scheme, unix [ATT (V)] version
>
>utabs.bin loaded purified evaluated
>implmd.bin loaded purified evaluated
>boot.bin loaded purified evaluated
.
. <<<-------------------18 lines deleted
.
>numpar.bin loaded purified evaluated
>numunp.bin loaded
>
>Purify phase error 9a0, 99f
>
>Inconsistency detected.
>*** Error code 1
>
>Stop.
My question is, where should I start looking? I am new to the Lisp/Scheme world
and I don't even know what 'purify' means in this context. Should I look in the
Psbtobin.c code for a problem translating the .psb file to a .bin file? Or
should I look in the purify.c code?
The second machine is an Intergraph Micro II (MicroVax II with our boards)
running VMS 4.5 (yes I know, BLECH!). This machine gets through the initial
load-purify-evaluate phase and then this happens:
>Cold load finished. Type
>
>((access finish-load runtime-system))
>
>to load the rest of the system.
>
>1 ]=> ((access finish-load runtime-system))
>No such file #("pathname" () () "emacs" "bin" NEWEST)
>
>2 Error->
It just hasn't been my day.
Any insight to these problems would be greatly appreciated.
--
_ /| | Clark Williams
Ack Thippfft! \'o.O` | Intergraph Corp.
=(___)= | {uunet|ihnp4}!ingr!b14!clark
U | (205) 772-6881
∂22-Jan-88 1428 @MC.LCS.MIT.EDU,@RELAY.CS.NET:willc@tekchips.tek.com Re: Are the GABRIEL-benchmarks translated into SCHEME already?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 22 Jan 88 14:27:54 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 22 Jan 88 17:24:15 EST
Received: from relay2.cs.net by RELAY.CS.NET id ad03422; 22 Jan 88 16:14 EST
Received: from tektronix.tek.com by RELAY.CS.NET id cr18045; 22 Jan 88 16:00 EST
Received: by tektronix.TEK.COM (5.51/6.24)
id AA04647; Fri, 22 Jan 88 09:58:02 PST
Received: by tekchips.TEK.COM (5.51/6.24)
id AA09354; Fri, 22 Jan 88 09:57:49 PST
Date: Fri, 22 Jan 88 09:57:49 PST
From: Will Clinger <willc%tekchips.tek.com@RELAY.CS.NET>
Message-Id: <8801221757.AA09354@tekchips.TEK.COM>
To: scheme@mc.lcs.mit.edu
Subject: Re: Are the GABRIEL-benchmarks translated into SCHEME already?
Cc: mcvax!dutrun!dutesta!brouw@uunet.uu.net
I have translated all but two (STAK and POLY) of the Gabriel benchmarks
into Scheme and have sent them to a number of people. In a couple of weeks
I will submit them to the Scheme "yellow pages" after fixing the bugs and
non-portable constructions that have been reported to me. In the meantime
I'm willing to send them to people who can't wait.
Today is my last day as an employee of Tektronix. My new address will be
William Clinger
Semantic Microsystems, Inc.
4470 SW Hall Blvd, Suite 340
Beaverton, OR 97005
Telephone: (503) 643-4539
Since Semantic will probably be consulting for Tektronix, I think I will
still be able to read mail sent to:
willc%tekchips.tek.com@relay.cs.net
I will probably not log in more than once a week or so, though. Semantic
has had an inactive account on Compuserve, which I expect to reactivate.
Peace, Will
∂23-Jan-88 0008 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu suggestions for the next revision of scheme
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 23 Jan 88 00:08:03 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 23 Jan 88 03:04:42 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA22261; Fri, 22 Jan 88 23:51:38 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 21 Jan 88 17:44:01 GMT
From: jh@ohio-state.arpa (#Hein{nen Juha)
Organization: Tampere University of Technology, Finland
Subject: suggestions for the next revision of scheme
Message-Id: <545@tutor.tut.fi>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I have a couple of suggestions for the next revision of Scheme that
all deal with orthogonality issues:
First, named let* and letrec should be included in Scheme. I have
several times run into situations where a construct like
(let* loop ((x ...) (y ...x...)) ...)
would have been useful. So far I haven't needed named letrec but, at
least for completenes, it shouldn't be left out.
Second, map and for-each should apply also to strings and vectors.
Why should Scheme provide better treatment for list than for other
structured types?
Finally, do should be abolished altogether. Is far too complicated
operation compared to the rest of Scheme and seems like a relic from
ancient times.
--
Juha Heinanen
Tampere Univ. of Technology
Finland
jh@tut.fi (internet), tut!jh (UUCP)
∂23-Jan-88 1209 @MC.LCS.MIT.EDU:dyb@iuvax.cs.indiana.edu Next R*RS meeting...
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 23 Jan 88 12:09:49 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 23 Jan 88 15:09:19 EST
Received: by iuvax.cs.indiana.edu; id AA11432; Sat, 23 Jan 88 15:07:16 EST
Date: Sat, 23 Jan 88 15:07:16 EST
From: R. Kent Dybvig <dyb@iuvax.cs.indiana.edu>
Message-Id: <8801232007.AA11432@iuvax.cs.indiana.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: Next R*RS meeting...
At the last Scheme meeting (Boston, Summer 87) I volunteered to
organize the next Scheme meeting, to be held at Indiana sometime
this spring. I would still be pleased to do so, if people think
it would be a good idea, but we might want to consider getting
together at the Lisp conference this summer instead and perhaps
holding the Indiana meeting next spring. I think this was
suggested last summer, but I remember someone expressing concern
that people may not be able to make the Lisp conference, since
at that time it was expected to be overseas.
Comments?
Kent
PS. I'm hoping this is an issue we can reach a decision on!
∂25-Jan-88 0040 @MC.LCS.MIT.EDU,@RELAY.CS.NET:jmiller@BRANDEIS.CSNET Next R*RS meeting...
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 25 Jan 88 00:40:09 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 25 Jan 88 03:39:48 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa07222; 25 Jan 88 3:39 EST
Received: from brandeis by csnet-relay.csnet id ab03817; 25 Jan 88 3:27 EST
Received: by brandeis.ARPA (5.51/4.7)
id AA00620; Sun, 24 Jan 88 16:52:15 EST
Date: Sun, 24 Jan 88 16:52:15 EST
From: James Miller <jmiller%brandeis.csnet@RELAY.CS.NET>
To: dyb%iuvax.cs.indiana.edu@RELAY.CS.NET
Cc: rrrs-authors%mc.lcs.mit.edu@RELAY.CS.NET
In-Reply-To: "R. Kent Dybvig"'s message of Sat, 23 Jan 88 15:07:16 EST <8801232007.AA11432@iuvax.cs.indiana.edu>
Subject: Next R*RS meeting...
I'd prefer that the meeting coincide with the Lisp conference if
possible.
--Jim
∂27-Jan-88 0648 @MC.LCS.MIT.EDU:philbin-jim@YALE.ARPA T a dialect of Scheme
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 27 Jan 88 06:48:25 PST
Received: from ATHENA.CS.YALE.EDU (TCP 20011000033) by MC.LCS.MIT.EDU 27 Jan 88 09:36:37 EST
Received: by ATHENA.CS.YALE.EDU; Wed, 27 Jan 88 09:34:08 EST
Date: Wed, 27 Jan 88 09:34:08 EST
From: James Philbin <philbin-jim@YALE.ARPA>
Full-Name: James Philbin
Message-Id: <8801271434.AA06384@ATHENA.CS.YALE.EDU>
Received: by yale-ring (node-aac0/AAC0)
via WIMP-MAIL (Version 1.2/1.4) ; Wed Jan 27 09:26:49
Subject: T a dialect of Scheme
To: scheme@mc.lcs.mit.edu
The T Programming Language
T is a superset of Scheme developed at Yale University. T's extensions
to Scheme include:
multiple return values - a very efficient implementation,
objects - a simple and efficient object system,
debugger and inspector,
locales - first class environments,
macros - a syntax system,
unwind-protect,
dynamic binding,
structures - efficient and integrated into the object system,
tables - a generalize package
pools, weak pointers, and weak tables.
Although the default environment is the T programming language (a Scheme
dialect based on the Revised Report on Scheme), an environment comforming
to the Revised↑3 Report on Scheme is also available. T is intended for
use in education, systems programming, AI programming, and for programming
language design and development. The system and compiler are written almost
entirely in T.
A new version of T (version 3.0) was released in January 1987. This system
includes both an interpreter and a highly optimizing native code compiler
(described in a paper by Kranz et al. in the Proceedings of the 1986 SIGPLAN
Compiler Construction Conference) that compiles closures efficiently. This
compiler produces code that is competitive with the best C and Pascal
compilers. The following benchmarks from "Performance and Evaluation of
Lisp Systems" by Gabrial were run on a Sun 3/160 in the most optimized
mode of the compiler.
tak .22 rdiv2 .76 fprint 1.80
puzzle 2.40 destru .98 fread 3.08
triangle 79.18 deriv 2.44 tprint 1.46
idiv2 .50 dderiv 3.02
T is available via Internet FTP. Telnet to PREP.AI.MIT.EDU and log
in as user scheme, password scheme. The login shell is an FTP program.
Send one or more of the following files:
/t/readme.tar.Z
/t/hp.tar.Z executable image for HP-UX
/t/sun.tar.Z executable image for SUN
/t/aegis.tar.Z executable image for Apollo Domain
/t/vax_unix.tar.Z executable image for VAX running 4.2BSD, 4.2BSD or Ultrix
/t/sources.tar.Z source code for compiler and runtime system
If you can't get T this way, try to get it from someone who has it, or,
Yale will mail you a tape for $200 (outside US $250).
For more information contact Linda Abelli or Chris Hatchell at:
T Project
Yale University Dept. of Computer Science
PO Box 2158 Yale Station
New Haven, CT 06520
Email: t-project@yale.edu,
decvax!yale!t-project.uucp, or
tproj@YALECS.BITNET
Phone: (203) 432-2381
-------
∂27-Jan-88 0912 @MC.LCS.MIT.EDU,@MITVMA.MIT.EDU:NETWORK@FRSAC11.BITNET Cleanup needed.
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 27 Jan 88 09:11:54 PST
Received: from MITVMA.MIT.EDU (TCP 2227000003) by MC.LCS.MIT.EDU 27 Jan 88 11:50:01 EST
Received: from MITVMA.MIT.EDU by MITVMA.MIT.EDU ; Wed, 27 Jan 88 10:44:19 EST
X-Delivery-Notice: SMTP MAIL FROM does not correspond to sender.
Received: from FRSAC11.BITNET (NETWORK@FRSAC12) by MITVMA.MIT.EDU (Mailer
X1.25) with BSMTP id 0745; Wed, 27 Jan 88 10:24:24 EST
Date: Wed, 27 Jan 88 16:18:31 GMT
To: scheme@mc.lcs.MIT.EDU
From: NETWORK%FRSAC11.BITNET@MITVMA.MIT.EDU
Subject: Cleanup needed.
+From: #Hein{nen Juha <jh@ohio-state.arpa>
+Subject: suggestions for the next revision of scheme
+..
+I have a couple of suggestions for the next revision of Scheme that
+all deal with orthogonality issues:
+..
+Second, map and for-each should apply also to strings and vectors.
+Why should Scheme provide better treatment for list than for other
+structured types?
+..
+Finally, do should be abolished altogether. Is far too complicated
+operation compared to the rest of Scheme and seems like a relic from
+ancient times.
+..
I do support the above remarks.
If there is generic math functions, list/vector/string generic
functions seems natural.
I was surprised too at the "do" construct, that is far from
usual scheme elegance. (I find the current "do" quite baroque.)
Regards,
Jean-Pierre H. Dumas
network@frsac11 (bitnet)
network%frsac11.bitnet@mitvma.mit.edu (arpanet)
dumas@sumex-aim.stanford.edu (arpanet)
∂27-Jan-88 1933 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Parallel Versions of Scheme
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 27 Jan 88 19:30:51 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 27 Jan 88 22:28:04 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA08001; Wed, 27 Jan 88 18:51:51 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 27 Jan 88 18:25:02 GMT
From: fowler@pyr.gatech.edu (FREDERICK C. FOWLER)
Organization: Georgia Institute of Technology, Atlanta
Subject: Parallel Versions of Scheme
Message-Id: <4883@pyr.gatech.EDU>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Can anyone tell me if there are any versions of scheme designed for
parallel processing? I've heard of something called Multi-Scheme, and
I think that I saw a reference to a parallel Scheme in Computer Language,
but that's all I've been able to find out.
Fred Fowler
∂28-Jan-88 0842 @MC.LCS.MIT.EDU:allen@lisperanto.bbn.com Parallel Versions of Scheme
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 28 Jan 88 08:42:43 PST
Received: from BBN.COM (TCP 20026200172) by MC.LCS.MIT.EDU 28 Jan 88 11:23:07 EST
Received: from lisperanto.bbn.com by BBN.COM id aa10576; 28 Jan 88 11:05 EST
Date: Thu Jan 28 11:05:12 EST 1988
From: allen@BBN.COM
To: fowler@pyr.gatech.edu
CC: scheme@mc.lcs.mit.edu
In-reply-to: "FREDERICK C. FOWLER"'s message of 27 Jan 88 18:25:02 GMT <4883@pyr.gatech.EDU>
Subject: Parallel Versions of Scheme
we (bbn advanced computers) have implemented a version of scheme,
based on MIT cscheme, for the butterfly multiprocessor. see our paper
in the proceedings of aaai-87 -- "recent developments in butterfly
lisp" by seth steinberg, larry stabile, and myself, for a description
of the system. feel free to contact me if you have any questions not
answered by the paper.
/don allen
∂28-Jan-88 0951 @MC.LCS.MIT.EDU:SGR@STONY-BROOK.SCRC.Symbolics.COM Parallel Versions of Scheme
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 28 Jan 88 09:50:50 PST
Received: from STONY-BROOK.SCRC.Symbolics.COM (TCP 20024224620) by MC.LCS.MIT.EDU 28 Jan 88 11:26:49 EST
Received: from GROUSE.SCRC.Symbolics.COM by STONY-BROOK.SCRC.Symbolics.COM via CHAOS with CHAOS-MAIL id 330376; Thu 28-Jan-88 11:26:29 EST
Date: Thu, 28 Jan 88 11:26 EST
From: Stephen G. Rowley <SGR@STONY-BROOK.SCRC.Symbolics.COM>
Subject: Parallel Versions of Scheme
To: fowler@pyr.gatech.edu, scheme@mc.lcs.mit.edu
In-Reply-To: <4883@pyr.gatech.EDU>
Message-ID: <19880128162634.3.SGR@GROUSE.SCRC.Symbolics.COM>
Date: 27 Jan 88 18:25:02 GMT
From: fowler@pyr.gatech.edu (FREDERICK C. FOWLER)
Can anyone tell me if there are any versions of scheme designed for
parallel processing? I've heard of something called Multi-Scheme, and
I think that I saw a reference to a parallel Scheme in Computer Language,
but that's all I've been able to find out.
Here's the reference (and the author) for MultiScheme:
Date: Wed, 14 Oct 87 16:13:06 EDT
From: James Miller <jmiller%brandeis.csnet@RELAY.CS.NET>
To: Scheme%MC.LCS.MIT.EDU@RELAY.CS.NET
Subject: MultiScheme
My dissertation, "MultiScheme: A Parallel Processing System Based on
MIT Scheme," is available from the MIT Lab for Computer Science
publications office (545 Technology Square, Cambridge, MA 02139), as
MIT/LCS/TR-402. It reports on an implementation of Scheme extended to
support the FUTURE construct and speculative computation. It has a
number of examples showing relationships to: embedding logic variables
in Scheme, McCarthy's AMB and fair merge, higher order streams
processing, data-flow parallelism, and so forth.
The current release of MIT CScheme contains a serial processor
implementation of the work reported in the thesis. BBN's Butterfly
Lisp product is based directly on the (truly parallel) implementation.
∂28-Jan-88 1633 @MC.LCS.MIT.EDU:SUSSMAN@G.BBN.COM Some RRRS comments/corrections
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 28 Jan 88 16:33:44 PST
Received: from G.BBN.COM (TCP 1000400022) by MC.LCS.MIT.EDU 28 Jan 88 19:32:40 EST
Date: 28 Jan 1988 19:31-EST
Sender: SUSSMAN@G.BBN.COM
Subject: Some RRRS comments/corrections
From: SUSSMAN@G.BBN.COM
To: rrrs-authors@MC.LCS.MIT.EDU
Cc: allen@SOCRATES.BBN.COM, quigley@SOCRATES.BBN.COM
Cc: sas@BFLY-VAX.BBN.COM, amellor@BFLY-VAX.BBN.COM
Cc: sussman@G.BBN.COM
Message-ID: <[G.BBN.COM]28-Jan-88 19:31:32.SUSSMAN>
Here are a few things we noticed while documenting Butterfly Scheme:
CI in string and character procedure names:
You describe it as a suffix, and give its relationship to the ? suffix.
But it is generally embedded earlier in the name (not ...ci?). You probably
want to just say they have CI in their names.
DO:
The expressions after the <test> are optional according to the text,
but the template shows one or more expressions. Apparently it is the
template that is wrong.
TRUNCATE:
The description is incomplete -- note that it fails to specify
the sign of the answer.
Julie
∂29-Jan-88 1423 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Scheme for Amiga?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 29 Jan 88 14:23:29 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 29 Jan 88 17:19:43 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA28785; Fri, 29 Jan 88 12:48:44 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 28 Jan 88 04:25:00 GMT
From: kaplan@b.cs.uiuc.edu
Subject: Scheme for Amiga?
Message-Id: <189900003@uiucdcsb>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Several people on the net have indicated they are working on Scheme ports
for the Amiga. I am teaching a course using Scheme this semester and some
of my students have Amiga's and want to try get Scheme for it.
If anyone out there has a port they are prepared to make available, I would
be most grateful.
My best email addresses are:
kaplan@a.cs.uiuc.edu
{ihnp4, seismo, research}!uiucdcs!kaplan
Thanks in advance,
Simon Kaplan
∂30-Jan-88 0554 @MC.LCS.MIT.EDU:hal@MURREN.AI.MIT.EDU testing, please ignore
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 30 Jan 88 05:54:26 PST
Received: from murren (TCP 2206400263) by MC.LCS.MIT.EDU 30 Jan 88 08:53:33 EST
Received: by MURREN.AI.MIT.EDU; Sat, 30 Jan 88 08:59:15 est
Date: Sat, 30 Jan 88 08:59:15 est
From: hal@MURREN.AI.MIT.EDU (Hal Abelson)
Message-Id: <8801301359.AA04713@murren>
To: rrrs-authors@mc.lcs.mit.edu
Subject: testing, please ignore
Reply-To: hal@ai.ai.mit.edu
∂30-Jan-88 0652 @MC.LCS.MIT.EDU:hal@ZOHAR.AI.MIT.EDU "Well, Stanley,here's another nice mess you've gotten us into."
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 30 Jan 88 06:51:54 PST
Received: from zohar (TCP 2206400256) by MC.LCS.MIT.EDU 30 Jan 88 09:43:09 EST
Received: by ZOHAR.AI.MIT.EDU; Sat, 30 Jan 88 09:45:47 est
Date: Sat, 30 Jan 88 09:45:47 est
From: hal@ZOHAR.AI.MIT.EDU (Hal Abelson)
Message-Id: <8801301445.AA04589@zohar>
To: rrrs-authors@mc.lcs.mit.edu
Subject: "Well, Stanley,here's another nice mess you've gotten us into."
Reply-To: hal@ai.ai.mit.edu
Over the past two months there have been a number of discussions, on
and off of this mailing list, concerning a proposed Scheme
standardization effort.
Clyde Camp has proposed standardizing Scheme through IEEE, but there
is apparently some sentiment for a closer connection with Common Lisp
and X3, and there is also sentiment for not standardizing Scheme at
all.
Many RRRS-AUTHORS (including me) have not contributed to this
discussion, presumably because we were confused/bored/indifferent. I
think that it's time for a real discussion to start.
1. People who have something to say about this issue should mail their
comments to all of RRRS-AUTHORS. Outrageous flammage is welcome,
as always. My main concern is that if (and I do mean IF) a
standardization process is to begin, then it should begin with a
proposal that is made on behalf of the RRRS-AUTHORS as a group.
2. I think we should have a meeting sometime during the next two
months, whose agenda is to discuss the standardization issue and to
produce a plan for standardization, if that is the decision of the
group. Given the political nature of this discussion, it is unlikely
that any technical work is going to get done, so this meeting should
be in addition to a technical meeting that would take place later,
presumably in conjunction with the Lisp conference in July.
Some issues to be discussed:
Do we want to endorse a Scheme standardization process?
What is the appropriate standards organization?
Who is going to do the work?
Would anyone like to volunteer to host the meeting?
∂30-Jan-88 1239 @MC.LCS.MIT.EDU:hal@ZOHAR.AI.MIT.EDU forwarded message from Dick Gabriel
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 30 Jan 88 12:39:40 PST
Received: from zohar (TCP 2206400256) by MC.LCS.MIT.EDU 30 Jan 88 14:32:00 EST
Received: by ZOHAR.AI.MIT.EDU; Sat, 30 Jan 88 14:34:37 est
Date: Sat, 30 Jan 88 14:34:37 est
From: hal@ZOHAR.AI.MIT.EDU (Hal Abelson)
Message-Id: <8801301934.AA04740@zohar>
To: rrrs-authors@mc.lcs.mit.edu
Subject: forwarded message from Dick Gabriel
Reply-To: hal@ai.ai.mit.edu
This is a message about Scheme standardization that was mailed to a
new people a few days ago. I think it needs to be mroe widely seen.
Please send comments to all RRRS-AUTHORS
-- Hal
From RPG@SAIL.Stanford.EDU Sat Jan 30 14:32:10 1988
Date: 30 Jan 88 1034 PST
From: Dick Gabriel <RPG@SAIL.Stanford.EDU>
Subject: Proposal to Handle All Possible Decisions on Scheme Standardization
To: hal@AI.AI.MIT.EDU
<HAl, I have not seen any reaction to my message, could you forward any?
I am on RRRS-AUTHORS.>
Gentlemen. I have talked with Bob Mathis regarding the standardization
of Scheme, and he and I agreed on the following remarks and suggestions.
1. To the outside world, Lisp and Scheme are not distinguishable. To
have separate technical working groups for them is not a sensible
situation, especially within 2 separate organizations.
2. ANSI recognizes X3J13 as the technical working group for Lisp in
the US. Therefore, an IEEE effort would have no standing or voice in
any ISO work relating to Lisp, which is regarded as including dialects
such as Scheme.
We understand that there is some anxiety about whether to standardize
Scheme, and if so on what schedule. We are in a position to suggest
several alternatives to you:
3. We can establish a subcommittee within X3J13 for Scheme under the
current X3J13 charter. That subcommittee can work at its own speed on
activities relating to Scheme. Whether that subcommittee ever reported
anything out would be up to it.
4. We can also broaden the charter of X3J13 to specifically include Scheme. A
committee or subcommittee on Scheme could be established with its own time
schedule.
This would accomplish several things for you:
5. You would have a vehicle for standardizing Scheme if and when you
choose. There would be no pressure regarding your decision on this matter.
That is, this can be a vehicle to prevent standardization without your
consent, and it can also be a vehicle for standardization when you
feel like it is appropriate.
6. You would have a voice and standing within any ISO process concerning
Lisp in which you were interested.
7. Any renegade IEEE efforts towards standardizing Scheme would be
officially disallowed through a petition from SPARC to IEEE.
8. The Common Lisp community could be exposed to the Scheme community
and vice versa, bringing benefits to both communities.
9. A rational approach within ISO towards Lisp could be more easily
achieved if the Scheme community was officially represented. We would not
be in a position of the US appearing to be completely Common-Lisp-oriented.
I sent this note to a smaller group than RRRS Authors in order to
keep the discussion among the leaders. Please feel free to distribute this
to people whom I have overlooked.
In order for Bob Mathis and me to file the petition from SPARC to IEEE, a
positive response from the Scheme community is needed. If you decide
for or against this proposal, please let us know.
-rpg-
∂30-Jan-88 1252 @MC.LCS.MIT.EDU:hal@ZOHAR.AI.MIT.EDU questions about X3 and Scheme
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 30 Jan 88 12:51:32 PST
Received: from zohar (TCP 2206400256) by MC.LCS.MIT.EDU 30 Jan 88 14:39:40 EST
Received: by ZOHAR.AI.MIT.EDU; Sat, 30 Jan 88 14:41:46 est
Date: Sat, 30 Jan 88 14:41:46 est
From: hal@ZOHAR.AI.MIT.EDU (Hal Abelson)
Message-Id: <8801301941.AA04743@zohar>
To: rpg@sail.stanford.edu
Cc: rrrs-authors@mc.lcs.mit.edu
Subject: questions about X3 and Scheme
Reply-To: hal@ai.ai.mit.edu
In your message about Scheme standardization, you wrote
2. ANSI recognizes X3J13 as the technical working group for Lisp in
the US. Therefore, an IEEE effort would have no standing or voice in
any ISO work relating to Lisp, which is regarded as including dialects
such as Scheme.
Could you elaborate on what this means? In particular,
(a) Who regards the X3 effort as including dialects such as Scheme?
(b) Does your comment imply that there could not be an ISO standard
for any Lisp dialect other than for Common Lisp?
∂30-Jan-88 1447 @MC.LCS.MIT.EDU:RPG@SAIL.Stanford.EDU Clarifications
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 30 Jan 88 14:47:33 PST
Received: from SAIL.Stanford.EDU (TCP 1200000013) by MC.LCS.MIT.EDU 30 Jan 88 17:46:59 EST
Date: 30 Jan 88 1445 PST
From: Dick Gabriel <RPG@SAIL.Stanford.EDU>
Subject: Clarifications
To: rrrs-authors@MC.LCS.MIT.EDU
My wording on this point is not good:
2. ANSI recognizes X3J13 as the technical working group for Lisp in
the US. Therefore, an IEEE effort would have no standing or voice in
any ISO work relating to Lisp, which is regarded as including dialects
such as Scheme.
Let me try again.
The charter for X3J13 specifically talks about Common Lisp. I will explain
below why that phrasing is used and how well the strategy behind that
phrasing is working.
ISO has established a Working Group for ISO Lisp. I will explain below why that
phrasing is used and how well the strategy behind that phrasing is working.
ISO has asked the US to participate in the ISO Lisp work, which means ANSI
was asked. ANSI in turn asked X3J13 whether it would participate - because
such participation was mentioned in the X3J13 charter - and X3J13 said it
would. Therefore all representatives to the ISO Lisp Working Group must be
X3J13 members.
The reason X3J13 talks about Common Lisp is because the members of X3J13
do not want to see a Lisp standard - they want to see Lisp be able to
continue to grow without the fetters of standardization. In particular,
they do not want to hamper the Scheme efforts. The pressure in the US that
drives X3J13 is to standardize Common Lisp, and the strategy is to work on
a specific dialect of Lisp to avoid the issue of standardizing Lisp as a
whole. In particular, X3J13 wanted to block an ISO standard Lisp. Hence
one could conclude that Scheme is free to do what it wants.
The reason ISO talks about Lisp is because the European community does not
like Common Lisp and wants to see the right thing become a standard.
Unfortunately from how things have turned out, they want to see a
Scheme-like dialect standardized. Therefore they have slanted things to
include Scheme as far as ISO is concerned, and thus ANSI will probably
view X3J13 as necessarily encompassing the Scheme community.
The history is that the ISO effort started in response to activities
towards starting X3J13. X3J13 was not actually formed when the ISO efforts
started, so X3J13 tried to calm down the ISO effort by writing ``Common
Lisp'' into its charter. The funny (or sad) situation is that each of the
groups behind the ISO effort and the X3J13 effort will point to the other
group as the reason they started their own standardization efforts!
However, the ISO effort went ahead, and the linkage at ANSI between
ISO Lisp and ANSI Common Lisp was made.
Many observers (Mathis and myself included) believe that if ANSI is
asked to recognize Scheme as a different language from Common Lisp, they
will not do so, but ask that X3J13 broaden its charter.
ISO will talk only to ANSI about Lisp, so an IEEE Scheme effort will not
have an official influence on the ISO work, and therefore X3J13 is
probably the only vehicle for ISO-level Scheme work.
Now, the situation has gotten a lot more complicated than what I just
painted. The situation I painted is that the US through X3J13 wants to
limit standardization to Common Lisp and specifically under that name.
The delegation to ISO from the US has as the first item on its agenda a
request to limit the scope of the ISO effort and to try to change the name
of the ISO effort from ISO Lisp to something else, possibly ISO Common
Lisp. However, I fear that the seeds have been planted at ISO - as they
were accidentally at ANSI - in such a way that Common Lisp is not
distinguishable from Lisp, and that the attempted change will not work
(due to ISO reluctance).
Meanwhile, a group of Europeans who had previously argued against Common Lisp
have now concluded that the pressing issue is time-to-draft, and that therefore
a cleaned-up Common Lisp is the only possibility, due to manufacturer pressure.
So we might face the situation of the European delegation asking that ISO
Lisp be Common Lisp while ISO refuses to change the charter for the
working group. If this situation were to prevail, we would have ISO Lisp
be Common Lisp. To prevent that, my response (as head of the US
delegation) would be to state the US position as being against Common Lisp
as ISO Lisp, and to propose a family of Lisp dialects, starting with an
ISO Common Lisp dialect and followed by a better standard for ISO Lisp
later. In this case, the Scheme community would have to be brought in -
in my opinion - and that can only happen through X3J13.
The best situation would be for ANSI to have ANSI Common Lisp and for
there not to be an ISO standard, but because the wheels are turning at
ISO, this cannot happen. The next best thing is there to be an ISO Common
Lisp, leaving open indefinitely the possibility of an ISO Lisp. If there
must be an ISO Lisp on the horizon, I believe there ought to be an ANSI
Common Lisp right away and a re-designed ISO Lisp in some years.
There is a fair amount of sympathy for an immediate ANSI Common Lisp
followed by a re-designed Lisp in some years among the X3J13 group. If this
were to come to pass, interaction with the Scheme community is imperative.
Therefore there is ample opportunity for there to be an ISO Lisp that is
not Common Lisp, and I believe the community of people who truly wish ISO Lisp
to be Common Lisp is small.
I hope this clarifies as best as can be done the rather bizarre Lisp
standardization situation. The first ISO Lisp meeting is February 24 or so
in Paris, and we ought to know more about things when we return. As you
may know, I asked Will Clinger to join me in hopes of making something
good of the situation, so you will get his report.
-rpg-
∂30-Jan-88 1517 @MC.LCS.MIT.EDU:hal@MURREN.AI.MIT.EDU ISO vs. ANSII vs. IEEE vs. X3 vs. The Sons of Hercules
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 30 Jan 88 15:16:50 PST
Received: from murren (TCP 2206400263) by MC.LCS.MIT.EDU 30 Jan 88 18:16:02 EST
Received: by MURREN.AI.MIT.EDU; Sat, 30 Jan 88 18:21:16 est
Date: Sat, 30 Jan 88 18:21:16 est
From: hal@MURREN.AI.MIT.EDU (Hal Abelson)
Message-Id: <8801302321.AA05218@murren>
To: RPG@SAIL.Stanford.EDU
Cc: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: Dick Gabriel's message of 30 Jan 88 1445 PST <8801302300.AA05207@murren>
Subject: ISO vs. ANSII vs. IEEE vs. X3 vs. The Sons of Hercules
Reply-To: hal@ai.ai.mit.edu
Your story about Lisp standardization is truly bizarre. It does not
make me very receptive the idea of embroiling Scheme in such a mess.
Do you think it is too late for MIT to trademark the name "LISP" and
thus put an end to all of this nonsense?
∂30-Jan-88 1739 RPG ISO vs. ANSII vs. IEEE vs. X3 vs. The Sons of Hercules
∂30-Jan-88 1515 hal@MURREN.AI.MIT.EDU ISO vs. ANSII vs. IEEE vs. X3 vs. The Sons of Hercules
Received: from murren (MURREN.AI.MIT.EDU) by SAIL.Stanford.EDU with TCP; 30 Jan 88 15:15:00 PST
Received: by MURREN.AI.MIT.EDU; Sat, 30 Jan 88 18:21:16 est
Date: Sat, 30 Jan 88 18:21:16 est
From: hal@MURREN.AI.MIT.EDU (Hal Abelson)
Message-Id: <8801302321.AA05218@murren>
To: RPG@SAIL.Stanford.EDU
Cc: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: Dick Gabriel's message of 30 Jan 88 1445 PST <8801302300.AA05207@murren>
Subject: ISO vs. ANSII vs. IEEE vs. X3 vs. The Sons of Hercules
Reply-To: hal@ai.ai.mit.edu
Your story about Lisp standardization is truly bizarre. It does not
make me very receptive the idea of embroiling Scheme in such a mess.
Do you think it is too late for MIT to trademark the name "LISP" and
thus put an end to all of this nonsense?
∂30-Jan-88 1740 @MC.LCS.MIT.EDU:RPG@SAIL.Stanford.EDU Bizarre Story
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 30 Jan 88 17:39:54 PST
Received: from SAIL.Stanford.EDU (TCP 1200000013) by MC.LCS.MIT.EDU 30 Jan 88 20:39:22 EST
Date: 30 Jan 88 1738 PST
From: Dick Gabriel <RPG@SAIL.Stanford.EDU>
Subject: Bizarre Story
To: rrrs-authors@MC.LCS.MIT.EDU
Yes, it is quite bizarre, but you get to read about it while I get to live
it. The Common Lisp group tried to think of ways of trademarking ``Lisp''
or ``Common Lisp'' but we are way, way too late.
The only point to my story is that X3J13 can provide a safe haven
from Scheme getting involved in its own mess with standardization, strange
as that suggestion might sound. Essentially we can expand X3J13 to cover
Lisp/Scheme, form a subcommittee, and forget that subcommittee ever existed
(unless you want to standardize, in which case you can make your own schedule).
This would protect you from IEEE, and you can forget about the politics. If you
don't do this, someone can start an IEEE group without your consent and
press ahead in a haphazard way. Maybe you'll be able to stall or whatever
with IEEE, but I can guarantee you can stall forever with X3J13.
Hey, I want to save Scheme from all of this mess, and this looks like
the best way to me.
-rpg-
∂01-Feb-88 1550 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU test message
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 1 Feb 88 15:50:25 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 1 Feb 88 18:46:59 EST
Date: Mon, 1 Feb 88 18:47:05 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: test message
To: scheme@MC.LCS.MIT.EDU
Message-ID: <319681.880201.JAR@AI.AI.MIT.EDU>
Test message -- weeding out bad addresses. Please ignore.
∂01-Feb-88 1753 @MC.LCS.MIT.EDU,@RELAY.CS.NET:bartley@mips.csc.ti.com re: Next R*RS metting...
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 1 Feb 88 17:53:14 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 1 Feb 88 20:52:45 EST
Received: from relay2.cs.net by RELAY.CS.NET id ab00539; 1 Feb 88 19:16 EST
Received: from csc.ti.com by RELAY.CS.NET id an27391; 1 Feb 88 19:00 EST
Received: from mips by tilde id AA14226; Mon, 1 Feb 88 17:24:59 CST
Received: by mips id AA00414; Mon, 1 Feb 88 17:20:19 CST
Date: Mon, 1 Feb 88 17:20:19 CST
From: David Bartley <bartley%mips.csc.ti.com@RELAY.CS.NET>
Message-Id: <8802012320.AA00414@mips>
To: rrrs-authors@mc.lcs.mit.edu
Subject: re: Next R*RS metting...
I expect to attend the Lisp conference this summer, so I would favor
the option of meeting there for R*RS discussions. If we do, let's
arrange to tack a day onto the front or back of the conference
schedule so we can allow ourselves enough time to do something
worthwhile.
Hal has suggested that we meet concerning the standardization issue
much sooner than that. Where should that meeting be? X3J13 will be
meeting in Palo Alto March 14-18, so I would expect that I, Will, rpg,
and perhaps Kent Pitman and others could talk things over then.
∂02-Feb-88 1809 @MC.LCS.MIT.EDU,@RELAY.CS.NET:willc%tekchips.CRL@tektronix.tek.com Re: ISO vs ANSI vs IEEE vs X3 vs The Sons of Hercules
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 2 Feb 88 18:09:28 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 2 Feb 88 21:08:43 EST
Received: from relay2.cs.net by RELAY.CS.NET id ai04566; 2 Feb 88 19:06 EST
Received: from tektronix.tek.com by RELAY.CS.NET id cl05041; 2 Feb 88 18:53 EST
Received: by tektronix.TEK.COM (5.51/6.24)
id AA08886; Tue, 2 Feb 88 15:10:23 PST
Received: by tekchips.CRL.TEK.COM (5.51/6.24)
id AA28377; Tue, 2 Feb 88 15:10:05 PST
Message-Id: <8802022310.AA28377@tekchips.CRL.TEK.COM>
To: rrrs-authors@mc.lcs.mit.edu
Cc: RPG@SAIL.STANFORD.EDU, willc%tekchips.crl.tek.com@RELAY.CS.NET,
adams%tekchips.crl.tek.com@RELAY.CS.NET
Subject: Re: ISO vs ANSI vs IEEE vs X3 vs The Sons of Hercules
Date: 02 Feb 88 15:10:03 PST (Tue)
From: willc%tekchips.CRL%tektronix.tek.com@RELAY.CS.NET
I believe that the formation of a Scheme standardization project within
X3J13 is the worst thing that could possibly happen to Scheme.
Gabriel observes, correctly, that most people confuse Scheme with Common
Lisp and vice versa. Placing the responsibility for Scheme with the
committee whose charter is to standardize Common Lisp could only increase
this particular confusion, while an entirely separate standardization
activity for Scheme would help to relieve the confusion.
Gabriel has suggested, correctly, that having Scheme standardization
under X3J13 would make it more convenient for technical experts from
the Common Lisp community to take part in the standardization of Scheme.
But it would also force technical experts from the Scheme community to
suffer the tedium of X3J13 meetings concerning a language that many of
them care nothing about, if they want any say in the future of Scheme.
Furthermore they would have to pay $200 annually in dues and $1000-$2000
in travel expenses for the privilege.
X3J13 is a committee formed for the purpose of standardizing Common Lisp,
not Scheme or any other dialect of Lisp. It is a committee of institutions,
not individuals. Though I have attended every X3J13 meeting, I will not
be eligible to vote at the next meeting in Palo Alto; Tektronix's
representative will vote, though he will be attending for the first time.
Representatives have made no bones about voting the financial interests
of their companies. Gabriel himself has on several occasions noted that
although he personally favors certain technical positions, he would have
to vote the contrary position in order to protect his company. (While
only a few of the companies that make up X3J13 have financial reasons
for hostility to Scheme, as few or fewer have reasons to be friendly.)
It is not surprising that X3J13 has found it difficult to make technical
progress in such a climate, so the leading technical experts have
essentially given up on all substantive changes (except possibly for
CLOS) and are concentrating their efforts on the cleanup and clarification
committee, ably led by Larry Masinter. The definition of Scheme is
already cleaner than the definition of Common Lisp will be when X3J13
finishes with it. What Scheme needs is some serious language design
work, which is precisely the sort of thing that X3J13 has been unable
to do for Common Lisp.
I believe the root of my disagreement with Gabriel is this: It sounds
to me like Gabriel thinks the Scheme community should get together with
the Common Lisp community and design the next iteration of Common Lisp
(which Fahlman calls Common Lisp 2000) *rather than* going off and
designing the next iteration of Scheme. There's nothing wrong with
working on Common Lisp 2000, but I think Scheme is more important because
Scheme still has a shot at becoming a good language and I don't think
Common Lisp does. Why doesn't it? Because most of the serious flaws
in Common Lisp are attempts to maintain compatibility with old-fashioned
dialects of Lisp. If the designers of Common Lisp were unable to resist
the demands of compatibility when in truth very little Lisp code of
lasting importance had been written in all of human history, then how
do they expect to resist demands that Common Lisp 2000 be compatible
with Common Lisp?
Better to start over. Scheme is one of the best places to start. That's
why I want to preserve it as a distinct entity, not submit it to the
whims of X3J13.
Concerning ISO, it is certainly true that the charter for ISO Lisp would
lead it to supersede all dialects of Lisp. Scheme will be able to escape
this only because of the fortunate historical accident that its name does
not include the word "Lisp", and because a significant number of people
(particularly Europeans) already claim that Scheme is not Lisp. It also
is true that the Scheme community will probably have no say in the
deliberations that lead to the ISO Lisp standard, since there is no formal
standardization effort for Scheme. Gabriel's story of how all this came to
be is accurate. He loses me, though, when he says that
Many observers (Mathis and myself included) believe that if ANSI is
asked to recognize Scheme as a different language from Common Lisp,
they will not do so, but ask that X3J13 broaden its charter.
If X3J13 really wanted to be helpful, it could easily pass a resolution
requesting that ANSI recognize a separate standardization activity for
Scheme, and allow the Scheme community to be represented at the ISO level
as well. (In my opinion, such a resolution would not be useful unless
the Scheme community had already initiated standardization through IEEE
or X3 (but not X3J13).) In my opinion, ANSI would probably listen to
such a resolution coming from X3J13. Even if ANSI did not, X3J13 could
refuse to act on its broadened charter, leaving the Scheme community
free to continue its informal efforts.
In fact, however, it is possible that ANSI (if we initiate standardization
through IEEE) or X3 (if through X3) would *insist* upon a separate
standardization activity for Scheme, even if X3J13 were to recommend
*against* such recognition. It is not unusual for one language
standardization group to claim that another is redundant. I have been
told that in the process of adjudicating such claims the standards
organizations usually get around to asking the users and implementors of
the allegedly redundant language what they think, and they occasionally
listen to the answer. I'm not saying this is likely, but I believe there
is good reason to be optimistic so long as X3J13 is supportive or remains
neutral.
Even if all goes against us, we can continue our work by simply ignoring
the whole matter of standards (which is what we have done so far) and we
probably would not get into a situation much worse than the one the Lisp
world is already in, through no fault of ours.
Peace,
William Clinger
Semantic Microsystems, Inc.
∂02-Feb-88 2101 @MC.LCS.MIT.EDU:RPG@SAIL.Stanford.EDU Scheme Standardization
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 2 Feb 88 21:01:06 PST
Received: from SAIL.Stanford.EDU (TCP 1200000013) by MC.LCS.MIT.EDU 3 Feb 88 00:00:23 EST
Date: 02 Feb 88 2059 PST
From: Dick Gabriel <RPG@SAIL.Stanford.EDU>
Subject: Scheme Standardization
To: rrrs-authors@MC.LCS.MIT.EDU
Because I made my suggestion with the intent of providing another
alternative for the Scheme community, I want to argue neither for nor
against it. I wish to clarify 2 factual errors Will made in his message:
1. Individuals belong to X3J13. Companies can belong and send some number
of representatives. All members vote as they wish, but many individuals
vote their company line for whatever reasons, possibly because they have
been told to do so. I vote as I wish, but I won't guarantee that my sense
of greed will not figure into my vote. I don't believe IEEE does things
any differently.
2. I never mentioned any such activity as ``Common Lisp 2000'' or the
``next Common Lisp'' to Will (we talked on the phone for an hour or so). I
mentioned that my own goal was to see the Common Lisp community and the
Scheme community working on the next rendition of Lisp. I explicitly
mentioned that there were few positive lessons from Common Lisp for such a
new language - the key contributions were negative (don't do this, don't
do that). I mentioned as the primary set of positive lessons the
experience that Common Lisp implementors had with programming
environments.
I suppose it might be natural for one who believes that association with
Common Lisp is the ``worst possible thing for Scheme'' to not wish to
associate with people involved with Common Lisp, but I see many of the
Common Lisp folks shaking their heads and wondering how such a weird and
depressing experience as Common Lisp standardization could have been
foisted on them. But, alas, such a dreamer am I to wish for co-operation.
-rpg-
∂03-Feb-88 0445 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA [jap%maths.bath.ac.uk@NSS.Cs.Ucl.AC.UK: Scheme standardization]
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 3 Feb 88 04:45:02 PST
Received: from mitre-bedford.ARPA (TCP 3200600102) by MC.LCS.MIT.EDU 3 Feb 88 07:44:45 EST
From: ramsdell%linus@mitre-bedford.ARPA
Posted-From: The MITRE Corp., Bedford, MA
Received: from darwin.sun.uucp by linus.research (3.2/4.7)
id AA12353; Tue, 2 Feb 88 09:13:42 EST
Posted-Date: Tue, 2 Feb 88 09:13:00 EST
Received: by darwin.sun.uucp (3.2/SMI-3.0DEV3)
id AA01745; Tue, 2 Feb 88 09:13:00 EST
Date: Tue, 2 Feb 88 09:13:00 EST
Message-Id: <8802021413.AA01745@darwin.sun.uucp>
To: rrrs-authors@mc.lcs.mit.edu
Subject: [jap%maths.bath.ac.uk@NSS.Cs.Ucl.AC.UK: Scheme standardization]
I ask Julian Padget what he thought about Scheme standardization. I
thought his views would be interesting because of his work with
EuLisp. Here is his response.
John
Posted-Date: Mon, 1 Feb 88 22:23:13 GMT
To: ramsdell <@mbunix.arpa:ramsdell@linus>
Cc: jap%maths.bath.ac.uk@NSS.Cs.Ucl.AC.UK
In-Reply-To: ramsdell's message of Mon, 1 Feb 88 15:14:15 EST
Subject: Scheme standardization
Date: Mon, 1 Feb 88 22:23:13 GMT
From: jap%maths.bath.ac.uk@NSS.Cs.Ucl.AC.UK
Sender: jap%maths.bath.ac.uk@NSS.Cs.Ucl.AC.UK
I only heard today some rumour about Scheme standardisation (although
it does ring faint bells from something I heard a little while ago).
Who proposed it and what was their motive?
I am not enthusiastic about Scheme being standardised - you might
think that reaction is because it conflicts with the work I get
associated with (i.e. EuLisp). That is not so, although whether there
is room for an ANSI Lisp standard, an ISO Lisp standard and another
ANSI Lisp standard (given that Scheme is a dialect of Lisp), all
conflicting, is highly questionable. It also reflects badly on ANSI's
judgement if it is prepared to condsider this since it would then be
promoting the standardisation of dialects which is contrary to the
notional remit of a standards organisation.
My main reason for not being in favour of standardising Scheme is that
I have learnt a lot about the standards circus in the last few years,
the kind of people that get involved in standardisation and what
(standards) committees do to programming languages. I realise I am
pointing recriminating finger at myself too - in my defence I say that
I did not know what I was getting into...such is the naivete of youth!
Anyway, that would be a sad fate for a language that has been so
carefully thought out and refined (a few minor warts remain).
I presume you mean tail not tale regarding ISO Lisp vs. ANSI Common
Lisp, but I am not sure about the versus part. What has Dick been
saying?
Off to another EuLisp meeting tomorrow, back next Monday (short
holiday too).
--Julian.
∂03-Feb-88 0556 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA "Well, Stanley,here's another nice mess you've gotten us into."
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 3 Feb 88 05:56:21 PST
Received: from mitre-bedford.ARPA (TCP 3200600102) by MC.LCS.MIT.EDU 3 Feb 88 08:56:07 EST
From: ramsdell%linus@mitre-bedford.ARPA
Posted-From: The MITRE Corp., Bedford, MA
Received: from darwin.sun.uucp by linus.research (3.2/4.7)
id AA27955; Wed, 3 Feb 88 08:55:30 EST
Posted-Date: Wed, 3 Feb 88 08:54:33 EST
Received: by darwin.sun.uucp (3.2/SMI-3.0DEV3)
id AA02798; Wed, 3 Feb 88 08:54:33 EST
Date: Wed, 3 Feb 88 08:54:33 EST
Message-Id: <8802031354.AA02798@darwin.sun.uucp>
To: rrrs-authors@mc.lcs.mit.edu
In-Reply-To: Hal Abelson's message of Sat, 30 Jan 88 09:45:47 est <8801301445.AA04589@zohar>
Subject: "Well, Stanley,here's another nice mess you've gotten us into."
In Hal's message, he suggested a meeting be devoted to the issue of
Scheme standardization. I volunteer to host such a meeting at The
MITRE Corporation. MITRE is located about twenty miles northwest of
Boston and has the facilities to host such a meeting.
John
∂03-Feb-88 0626 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA Bizarre Story
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 3 Feb 88 06:26:07 PST
Received: from mitre-bedford.ARPA (TCP 3200600102) by MC.LCS.MIT.EDU 3 Feb 88 09:25:33 EST
From: ramsdell%linus@mitre-bedford.ARPA
Posted-From: The MITRE Corp., Bedford, MA
Received: from darwin.sun.uucp by linus.research (3.2/4.7)
id AA28796; Wed, 3 Feb 88 09:24:36 EST
Posted-Date: Wed, 3 Feb 88 09:23:40 EST
Received: by darwin.sun.uucp (3.2/SMI-3.0DEV3)
id AA02828; Wed, 3 Feb 88 09:23:40 EST
Date: Wed, 3 Feb 88 09:23:40 EST
Message-Id: <8802031423.AA02828@darwin.sun.uucp>
To: RPG@SAIL.Stanford.EDU
Cc: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: Dick Gabriel's message of 30 Jan 88 1738 PST <8801311332.AA04320@mitre-bedford.ARPA>
Subject: Bizarre Story
Dick writes:
>... The Common Lisp group tried to think of ways of trademarking ``Lisp''
>or ``Common Lisp'' but we are way, way too late.
Can we trademark the name ``Scheme''? I do not think it is too late
for that.
--------------------------
On the subject of confusing Scheme with Common Lisp, I follow the
practice of never mentioning Lisp while talking about Scheme unless
the person I am talking to asks about Scheme's relation to Lisp. This
practice avoids the AI baggage, as well as any negative impressions
the person has of Lisp. Of course, disowning our connection to Lisp
would be like disowning one's parents, but I see no need to tie our
fortunes to Lisp's. Thus I strongly oppose the idea of expanding
X3J13 to cover both Lisp and Scheme. If we choose to standardize
Scheme, let's do it independently of efforts to standardize other
dialects of Lisp.
John
∂03-Feb-88 1238 @MC.LCS.MIT.EDU:chaynes@iuvax.cs.indiana.edu [camp@mips.csc.ti.com: [RPG@SAIL.Stanford.EDU: Proposal to Handle All Possible Decisions on Scheme Standardization
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 3 Feb 88 12:38:07 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 3 Feb 88 15:36:08 EST
Received: by iuvax.cs.indiana.edu; id AA28733; Wed, 3 Feb 88 15:33:41 EST
Date: Wed, 3 Feb 88 15:33:41 EST
From: Chris Haynes <chaynes@iuvax.cs.indiana.edu>
Message-Id: <8802032033.AA28733@iuvax.cs.indiana.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: [camp@mips.csc.ti.com: [RPG@SAIL.Stanford.EDU: Proposal to Handle All Possible Decisions on Scheme Standardization ]]
Clyde tried to send this to our notesfile, but it didn't work, so here
it is again.
Date: Tue, 26 Jan 88 16:40:13 CST
From: Clyde Camp <camp@mips.csc.ti.com>
To: chaynes@iuvax.cs.indiana.edu, gls@THINK.COM, jar@mc.lcs.mit.edu,
"hal@mc.lcs.mit.edu.gjs"@mc.lcs.mit.edu,
willc%tekchips.tek.com@RELAY.CS.NET, chaynes@iuvax.cs.indiana.edu,
dfried@iuvax.cs.indiana.edu
Subject: [RPG@SAIL.Stanford.EDU: Proposal to Handle All Possible Decisions on Scheme Standardization ]
I have invited Bob Mathis to get in touch with me, but have not at
this point heard from him. I would like to if someone would send me
his phone number.
The IEEE is recognized by ANSI at the same level as X3. Both are
standards generating entities - in fact, the IEEE is a little more so
in that it can actually adapt standards which are taken by ANSI more
or less as is. X3 cannot adapt standards and the documents it puts
forth to ANSI (through CBEMA) must be put through an additional
consensus gathering and balloting process. I believe that this is
because the IEEE is volunteer and open to anyone while X3 membership
requires that all members pay a service fee and as such it tends to
represent companies/organizations rather than individuals.
If you want Scheme to be associated with Common Lisp and held under
the same umbrella, then X3 makes sense. Otherwise, I believe the IEEE
is a better choice.
All of the IEEE/CS's standards activities were presented to X3's SPARC
committee on January 12. I was there, not Dick nor Bob. There was
interest by several people as to how Scheme and Common Lisp were
related, but absolutely no indication that there was a problem. Since
then there has been no official or unofficial problem. This
presentation to X3 is purely voluntary on the part of the IEEE in
order to identify potential standardization conflicts before things get
as far along as FORTH and PASCAL did. There is, I might add, no
reciprocal presentation by X3 to any IEEE entity.
So far, I'm the highest ranking officer in any of the organizations to
discuss this with you and I've tried to be open about it once I
recognized that everyone wanted to be informed. I would appreciate it
if people sending out non-RRRS-AUTHORS mail on this matter would copy
me so that I can address incorrect information if necessary before it
becomes gospel.
It is unclear to me whether Dick and Bob are speaking for X3J13 or
representing their own opinions. (Not to imply that either is bad, I
just don't know one way or the other.)
To address Dick's itemized list:
1) This is a suprise to me. Yes, they are both lisp and have lots of
closing parentheses but I don't consider them to be indistingishable
at all. Whether or not they belong in two separate organizations is a
separate issue. As I said in my previous message, there is something
to be said for a hierarchical tree of lisp dialects under some
organization. If this is indeed the desire of the RRRS-AUTHORS then
so be it. But I was under the distinct impression that smushing
Scheme in under common-lisp was a highly undesirable thing.
2) ANSI does recognize X3J13 as the technical working group for (a)
Lisp. There is no reason, rule, law, precedent which prohibits the
IEEE from starting up this effort if everyone agrees that it is the
right thing to do. There is also nothing which prohibits ANSI from
recognizing such an activity. X3J13 represents the status quo today,
not for all future time. It certainly does not "..include dialects
such as Scheme" as an absolute de facto state although without
contention that is where things would probably fall.
3) If you want. I would point out that the members & organizations
must pay a fee. X3 members can freely participate in IEEE workshops,
but not vice versa. With respect to speed and "whether anything comes
out" issues, the same applies to the IEEE. The document is ready when
the working group says it is. If the working group thinks that it
should be abandoned, it can be.
4) According to item #2, it's already included?!? In any case, if
Scheme==Common-lisp then I'm wasting my time.
5) The only pressure the RRRS-AUTHORS have seen is pressure to START
the process. This is the very thing I was trying to avoid in the
first place by giving the RRRS-AUTHORS first whack at being the
core of working group, thereby giving them significant control over
what was going on. X3J13 has had no interest in this until now.
6) The same is true with the IEEE as with X3. The ANSI US National
Committee appoints delagates to ISO and IEC. X3 and IEEE are both
represented.
7) Come on now!! I do, obviously, think it would be a mistake, but as
I've said before, if the RRRS-AUTHORS community wants to use X3J13
then that's the way it'll be - neither I nor the IEEE are going to
engage in a "renegade .. effort for standardizing Scheme." My
original goal was to get some standardization effort started and I
felt (and feel) that the IEEE was better suited. But you guys are the
ones doing the work and if you're not happy with that, then by all
means go with X3. In all honesty, I think that the row will be much
tougher to hoe.
But just to clear up things, such a petition to SPARC would NOT
"officially disallow" anything. Given the scenario that X3 and IEEE
both feel that they have legitimate activities in the same area
(meaning that there are blocks of people in both organizations who
adamently feel there is reason to continue), then both organizations
would carry the arguments to the ANSI Information Systems Standards
Board (ISSB) to arbitrate the case if it could be settled in no other
manner. (X3J13 might have to do it through SC22, but I'm not sure.)
This is analogous to two kids arguing over ownership of a toy and
going to daddy to settle it. Depending on the arguments, the
convictions of the organizations, precedent, sizes of working groups
and lots of other factors it could go either way. IEEE's "won" some,
X3's "won" some. In either case, it is often common to have (as in
the case of FORTH and PASCAL) some sort of joint ownership/control.
8) True. But this is happening anyway and any standardization effort
will tend to promote it.
9) Not necessarily true although there is some merit to this. Again,
the question is how closely do you guys want Scheme to be tied to
Common Lisp.
∂03-Feb-88 1537 @MC.LCS.MIT.EDU,@RELAY.CS.NET:bartley@mips.csc.ti.com Scheme Standardization
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 3 Feb 88 15:36:54 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 3 Feb 88 18:35:37 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa08575; 3 Feb 88 17:11 EST
Received: from csc.ti.com by RELAY.CS.NET id af11483; 3 Feb 88 16:59 EST
Received: from mips by tilde id AA07796; Wed, 3 Feb 88 14:09:59 CST
Received: by mips id AA23921; Wed, 3 Feb 88 14:09:46 CST
Date: Wed, 3 Feb 88 14:09:46 CST
From: David Bartley <bartley%mips.csc.ti.com@RELAY.CS.NET>
Message-Id: <8802032009.AA23921@mips>
To: rrrs-authors@mc.lcs.mit.edu
Cc: Camp%mips.csc.ti.com@RELAY.CS.NET, Bartley%mips.csc.ti.com@RELAY.CS.NET
Subject: Scheme Standardization
I've found the whole subject of standardization of Scheme mildy
distasteful, so I've held off expressing my views until now. As some
of you know, Clyde Camp occupies the office next to mine here at TI.
Clyde and I have had frequent debates in which I argued against any
efforts to formally standardize Scheme. Dick Gabriel's recent posting
advocating X3J13 jurisdiction over Scheme and Will's rebuttal have
finally brought it all into focus for me: Scheme is not Lisp, it
certainly is not Common Lisp, and we must not let the X3J13 or ISO
standardization of "Lisp" threaten our own efforts to make Scheme what
it wants to be.
The fallacy is that all those languages named on the cover of "Common
Lisp: The Language" (CLtL) are merely dialects of a single language,
Lisp, and that Common Lisp is the modern "mainstream" incarnation of
the Lisp language. The truth as I see it is that Lisp 1.5, Scheme,
and Common Lisp are distinct languages in the "Lisp Family" in the
same sense that Algol-60, Pascal, and Ada are distinct languages in
the "Algol Family." X3J13 has as little claim to jurisdiction over
Scheme as the Ada standardizers had over Pascal, Modula, or even PL/1.
Surely the genesis of Scheme and its subsequent evolution at MIT,
Indiana, Yale and elsewhere is as divergent and original within its
cultural context as the origins of Pascal and other "Algol-like"
languages are within theirs.
As a TI representative to X3J13, I'm acutely aware that my obligation
to promote TI's interests may occasionally conflict with my personal
opinions. I've never faced a conflict between the best interests of
Common Lisp and Scheme simply because the sense of X3J13 so far has
been that it is standardizing only Common Lisp, not other Lisp-like
languages. I think this attitude is widely and strongly held. It
would be a mistake to change it.
Whether X3's standardization process is less democratic than the
IEEE's is moot. X3J13 is totally inappropriate for standardizing
Scheme, and, if X3 were to decide that Scheme is covered by the Common
Lisp umbrella, then X3 would be inappropriate.
The remaining proposals are to continue standardizing informally or to
act through IEEE. My sentiments are to keep things informal.
Certainly Will is correct when he says "the definition of Scheme is
already cleaner than the definition of Common Lisp will be when X3J13
finishes with it." Despite sentiment, I'm now inclined to move
quickly to standardize a slightly cleaned up R3RS through IEEE
auspices if that will help bring Scheme out from under the shadow of
Common Lisp (and X3J13).
--db--
∂03-Feb-88 2039 @MC.LCS.MIT.EDU:gjs@ZOHAR.AI.MIT.EDU Scheme Standardization
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 3 Feb 88 20:39:25 PST
Received: from zohar (TCP 2206400256) by MC.LCS.MIT.EDU 3 Feb 88 23:25:55 EST
Received: by ZOHAR.AI.MIT.EDU; Wed, 3 Feb 88 23:27:53 est
Date: Wed, 3 Feb 88 23:27:53 est
From: gjs@ZOHAR.AI.MIT.EDU (Gerald Jay Sussman)
Message-Id: <8802040427.AA07660@zohar>
To: bartley%mips.csc.ti.com@RELAY.CS.NET
Cc: rrrs-authors@mc.lcs.mit.edu, Camp%mips.csc.ti.com@RELAY.CS.NET
In-Reply-To: David Bartley's message of Wed, 3 Feb 88 14:09:46 CST <8802032009.AA23921@mips>
Subject: Scheme Standardization
Thank you. I have similar sentiments.
∂04-Feb-88 0649 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA I modify my vote on Scheme standardization
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 4 Feb 88 06:49:14 PST
Received: from mitre-bedford.ARPA (TCP 3200600102) by MC.LCS.MIT.EDU 4 Feb 88 09:48:40 EST
From: ramsdell%linus@mitre-bedford.ARPA
Posted-From: The MITRE Corp., Bedford, MA
Received: from darwin.sun.uucp by linus.research (3.2/4.7)
id AA08434; Thu, 4 Feb 88 09:47:47 EST
Posted-Date: Thu, 4 Feb 88 09:46:49 EST
Received: by darwin.sun.uucp (3.2/SMI-3.0DEV3)
id AA03808; Thu, 4 Feb 88 09:46:49 EST
Date: Thu, 4 Feb 88 09:46:49 EST
Message-Id: <8802041446.AA03808@darwin.sun.uucp>
To: rrrs-authors@mc.lcs.mit.edu
Subject: I modify my vote on Scheme standardization
I have been convinced by recent discussions to modify my vote on
Scheme standardization. Much like David Bartley, and not
enthusiastically, I'm now inclined to move quickly to standardize a
slightly cleaned up R3RS through IEEE because I think it will help
bring Scheme out from under the shadow of Common Lisp (and X3J13).
John
∂04-Feb-88 0736 @MC.LCS.MIT.EDU:gls@Think.COM Scheme Standardization
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 4 Feb 88 07:36:26 PST
Received: from Think.COM (TCP 1201000006) by MC.LCS.MIT.EDU 4 Feb 88 10:35:38 EST
Return-Path: <gls@Think.COM>
Received: from kali.think.com by Think.COM; Thu, 4 Feb 88 10:34:16 EST
Received: by kali.think.com; Thu, 4 Feb 88 10:34:13 EST
Date: Thu, 4 Feb 88 10:34:13 EST
From: gls@Think.COM
Message-Id: <8802041534.AA29148@kali.think.com>
To: bartley%mips.csc.ti.com@relay.cs.net
Cc: rrrs-authors@mc.lcs.mit.edu, Camp%mips.csc.ti.com@relay.cs.net,
Bartley%mips.csc.ti.com@relay.cs.net
In-Reply-To: David Bartley's message of Wed, 3 Feb 88 14:09:46 CST <8802032009.AA23921@mips>
Subject: Scheme Standardization
Date: Wed, 3 Feb 88 14:09:46 CST
From: David Bartley <bartley%mips.csc.ti.com@relay.cs.net>
The fallacy is that all those languages named on the cover of "Common
Lisp: The Language" (CLtL) are merely dialects of a single language,
Lisp, and that Common Lisp is the modern "mainstream" incarnation of
the Lisp language. The truth as I see it is that Lisp 1.5, Scheme,
and Common Lisp are distinct languages in the "Lisp Family" in the
same sense that Algol-60, Pascal, and Ada are distinct languages in
the "Algol Family." X3J13 has as little claim to jurisdiction over
Scheme as the Ada standardizers had over Pascal, Modula, or even PL/1.
I have been struggling to express a thought something like this.
I think Bartley has hit the nail on the head. From where I stand,
Pascal and Modula are practically the same language. Proponents of
those languages would deny it vociferously, and I think those who
use Scheme have equal standing in refusing to be lumped with other
Lisp dialects.
--Guy
∂04-Feb-88 1220 @MC.LCS.MIT.EDU:RPG@SAIL.Stanford.EDU Standardization
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 4 Feb 88 12:19:58 PST
Received: from SAIL.Stanford.EDU (TCP 1200000013) by MC.LCS.MIT.EDU 4 Feb 88 15:07:52 EST
Date: 04 Feb 88 1206 PST
From: Dick Gabriel <RPG@SAIL.Stanford.EDU>
Subject: Standardization
To: rrrs-authors@MC.LCS.MIT.EDU
As I've mentioned several times, my proposal was intended as yet
another alternative for the community, with no personal motivation
to see it decided one way or the other.
The only two remarks I have are these:
1.I would have chosen to not standardize Scheme at all, possibly to render
it different from Common Lisp in yet another way. I don't feel that there
is any need to take steps to accomplish unneccessary goals.
2. I am saddened by the animosity I see towards Common Lisp and by
implication towards the Common Lisp community. I made the proposal because
I thought the it might serve as a means of bringing two group together who
would seem to be naturally linked. In fact I have seen people who are my
friends attack me because they thought I was trying to destroy their
community. So, I withdraw my proposal, and I guess I withdraw from the
arena of bringing the Lisp/Scheme communities together.
Enjoy your battle.
-rpg-
∂04-Feb-88 1310 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Little Lisper
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 4 Feb 88 13:10:39 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 4 Feb 88 16:06:42 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA22724; Thu, 4 Feb 88 12:35:42 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 4 Feb 88 00:14:55 GMT
From: xanth!kahn@AMES.ARC.NASA.GOV (Gary I Kahn)
Organization: Old Dominion University, Norfolk Va.
Subject: Little Lisper
Message-Id: <3884@xanth.cs.odu.edu>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Could someone please mail me the address of MIT Press, or one of its
outlets? I want to buy a copy of The Little LISPer, Trade Edition.
A local bookstore could only give me information about an earlier
(1978? or 1986) version of the book. I need the address from which
to order the book, and the price with any shipping charges. Thanks.
I'm buying either that book or The Scheme Programming Language. I've
already ordered Structure and Interpretation of Computer Programs from
a local bookstore. Thanks in advance for the information.
Gary I. Kahn kahn@odu.edu
∂04-Feb-88 1443 @MC.LCS.MIT.EDU:chaynes@iuvax.cs.indiana.edu more from Clyde Camp
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 4 Feb 88 14:43:47 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 4 Feb 88 17:43:36 EST
Received: by iuvax.cs.indiana.edu; id AA09089; Thu, 4 Feb 88 17:33:37 EST
Date: Thu, 4 Feb 88 17:33:37 EST
From: Chris Haynes <chaynes@iuvax.cs.indiana.edu>
Message-Id: <8802042233.AA09089@iuvax.cs.indiana.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: more from Clyde Camp
Not to say too much more, but basically I agree with Hal's
suggestions. The RRRS authors have two proposals before them, one by
me for IEEE sponsorship and one by Dick for X3J13 sponsorship. Either
is possible and there are pros and cons for going in either direction
(or no direction at all). The RRRS authors have a legitimate input to
the direction a Scheme standard takes -- that's why all the netmail --
and their opinions will certainly impact what happens next.
For your reference, my viewpoints are in article numbers 226, 228 and 239
while Dick's are in 234-236.
Regards,
Clyde
∂04-Feb-88 1449 @MC.LCS.MIT.EDU:chaynes@iuvax.cs.indiana.edu from Clyde Camp
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 4 Feb 88 14:48:47 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 4 Feb 88 17:45:41 EST
Received: by iuvax.cs.indiana.edu; id AA26053; Thu, 4 Feb 88 13:52:38 EST
Date: Thu, 4 Feb 88 13:52:38 EST
From: Chris Haynes <chaynes@iuvax.cs.indiana.edu>
Message-Id: <8802041852.AA26053@iuvax.cs.indiana.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: from Clyde Camp
Clyde also sent the following a while ago, but it didn't make it. - Chris
--------
I can't help but make the comment that dependence on E-mail to solicit
information obviously restricts inputs to those who have access AND who
actually read RRRS-AUTHORS on a timely basis. That is why I have to
balance RRRS-AUTHORS opinions against the opinions of x-thousand Scheme
users who have purchased a product from one of the three suppliers.
Unfortunately I have no way of accessing those people as a whole and my
sample is relatively small. For that matter, The sample of RRRS-AUTHORS
is relatively small.
The Scheme standard is, at this point, a proposal. There are pros and
cons, but to repeat Chris "..I feel the advantages of a standard clearly
outweigh the disadvantages, at least if we act reasonably soon so that
it does not get out of hand." I hope that I have also made clear my
feeling that the time is right for a standardization effort and that it
should begin early this year.
The existing red-book is pretty much in an acceptable format for a
standard already. Some wordsmithing and formatting may be necessary
(for example, the inclusion of the PAR number and DRAFT at the bottom of
each page) and the bug on page 30 removed but I would say that it is
90+% of the end product already (modulo whatever technical
changes/additions you wish to include). One thing I would strongly
suggest is that the summary be extended to justify Scheme as a
completely different philosophy from Common Lisp to head off trouble in
that direction to begin with - but that's up to you.
In view of the discussions which have been held over RRRS-AUTHORS and by
phone between various parties, let me suggest the following sequence of
events:
1) To continue at least net-mail discussions for the next month or
so and have this topic placed on the agenda for a meeting of the
RRRS group. Preferably this meeting should occur before May and
even more preferably before March. I will be glad to attend if
you so wish.
2) Assuming that the general (not unanimous) concensus is to proceed,
give me a recommendation for a chair and vice-chair as well as a
pair of alternates. At this point Chris and Will have been the
only two who meet the following requirements:
a) Is an IEEE or CS member
b) Believes that standardization is appropriate and who wants to
chair the working group.
c) Is competent technically and managerially
d) His employer also supports the activity and travel necessary
e) The working Group is willing to follow his leadership.
The actual appointment of a chair has not been made at this point
and will not formally be made until after the Project
Authorization Request (PAR) has been approved.
3) Have one or both of the proposed chairs (as well as anyone else
who is interested) prepare a short (<30min) presentation covering
Scheme uniqueness, community, importance, and proposed milestones.
Chris has some rough cuts that are not so rough and are the type
of thing the MSC likes to see.
4) Given that the MSC approves (and I wouldn't be going through this
if I though they would not) an interrum chair would be appointed
until the PAR was approved (which might get done the next week,
but probably would not get done until June due to a mismatch
between the meeting frequencies of the approving committees.)
Finally, let me thank Will Clinger and Chris Haynes for the work they
have already done in pulling all of this together.
Regards, Clyde
=========================
Optional Reading:
The following documentation is available to explain the details of the
standardization process. The chair will get these free from me (I'll be
sending a copy to Chris at least sometime this month).
Phone numbers are where the material can be ordered from if others want
a copy. While the chair must be aware of them, everybody else can
ignore the rest of this unless you're just interested (and it IS
interesting - most of the time)
IEEE Standards Manual (212/705-7091 Mrs. Louise Germani)
IEEE Standards Style Manual "
IEEE Bylaws - January 1987 "
IEEE Policy and Procedures Manual Jan, 1987 "
Computer Society Constitution
(includes the Bylaws and Policy and
Procedures manual) (714-821-8380)
∂04-Feb-88 1709 @MC.LCS.MIT.EDU,@RELAY.CS.NET:bartley@mips.csc.ti.com Standardization
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 4 Feb 88 17:09:08 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 4 Feb 88 20:09:01 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa09980; 4 Feb 88 19:25 EST
Received: from csc.ti.com by RELAY.CS.NET id ac19474; 4 Feb 88 19:11 EST
Received: from mips by tilde id AA07292; Thu, 4 Feb 88 16:31:45 CST
Received: by mips id AA02277; Thu, 4 Feb 88 16:31:28 CST
Date: Thu, 4 Feb 88 16:31:28 CST
From: David Bartley <bartley%mips.csc.ti.com@RELAY.CS.NET>
Message-Id: <8802042231.AA02277@mips>
To: RPG@SAIL.STANFORD.EDU
Cc: rrrs-authors@mc.lcs.mit.edu, Bartley%mips.csc.ti.com@RELAY.CS.NET,
Camp%mips.csc.ti.com@RELAY.CS.NET
In-Reply-To: Dick Gabriel's message of 04 Feb 88 1206 PST <8802042108.AA05337@tilde>
Subject: Standardization
> As I've mentioned several times, my proposal was intended as yet
> another alternative for the community, with no personal motivation
> to see it decided one way or the other.
> [...]
> 2. I am saddened by the animosity I see towards Common Lisp and by
> implication towards the Common Lisp community. I made the proposal because
> I thought the it might serve as a means of bringing two group together who
> would seem to be naturally linked. In fact I have seen people who are my
> friends attack me because they thought I was trying to destroy their
> community. So, I withdraw my proposal, and I guess I withdraw from the
> arena of bringing the Lisp/Scheme communities together.
I have no animosity towards Common Lisp or the Common Lisp community
and I did not take your proposal as a threat. Perhaps I expressed
myself badly. I also had a positive message to convey---that Scheme
and Common Lisp have distinct roles to play and we must take care that
they not be conflated. Bringing the two groups together as you
suggest is indeed a natural and healthy linking. I respectfully
differ on whether it is in Scheme's best interests to be standardized
by the group standardizing Common Lisp. I did not anticipate that my
words could be read as an attack (and certainly not a personal
attack)! Please accept my apologies.
I favored your proposal when I first read it. It seemed to offer the
only way for Scheme proponents to participate in the ISO Lisp
standardization. Unlike some of the others on rrrs-authors, I know
that we have many friends of Scheme in X3J13. And your earlier
remarks about the folly (and crime) of excluding people really hit
home. I ended up opposing your proposal only because I concluded that
it wouldn't work out well.
Earlier, you wrote:
I suppose it might be natural for one who believes that
association with Common Lisp is the `worst possible thing for
Scheme' to not wish to associate with people involved with Common
Lisp, ...
I work with both Scheme and Common Lisp as do most of my coworkers
here at TI. I have lead the fight among Scheme implementors to avoid
"gratuitous" conflicts with established CLtL precedent (e.g., the
syntax of numbers). When asked for advice, I've recommended both
languages, depending on the specific needs of an application. I'm
truly in both camps. I see no reason they can't coexist, and I'm
helping to make it happen here. I imagine the same could be said for
Will. And I value my associations with both sets of people.
My experience has been that some users consider Scheme as merely an
alternative Lisp but others understand and appreciate its differences.
My wanting to "help bring Scheme out from under the shadow of Common
Lisp (and X3J13)" is merely that---Scheme and Common Lisp are equally
noteworthy and each deserves its own place in the sun.
> Enjoy your battle.
>
> -rpg-
Please don't give up on us. I appreciate the spirit in which your
proposal was made and I've always considered you one of us.
--db--
∂05-Feb-88 0053 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: Scheme for the Amiga, size constraints
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 5 Feb 88 00:53:48 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 5 Feb 88 03:49:39 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA07718; Fri, 5 Feb 88 00:32:10 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 4 Feb 88 16:33:00 GMT
From: ah4h+@andrew.cmu.edu (Andrew Hudson)
Organization: Carnegie Mellon University
Subject: Re: Scheme for the Amiga, size constraints
Message-Id: <gW2-2wy00jWTMDQ0Gq@andrew.cmu.edu>
References: <518@acf3.NYU.EDU>,
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
>I have implemented scheme 6.1 on my Amiga. I'll tell you, it's not an
>easy thing to do. First of all,there is no way CScheme will work on a
>machine with only 0.5M of RAM.I have got it working with 2.5M, but it
>really wants 4M, heavy sigh...
I can hardly believe this! MacScheme ran well on a Mac with only 512k. What
does a Mac have that an Amiga doesn't? This is not a rhetorical question.
Here at CMU I tell people that CommonLisp is a pig for needing 6M and you are
saying 4M would be nice. Has anyone given consideration to a minimally sized
implementation?
- Andrew Hudson
∂05-Feb-88 0743 @MC.LCS.MIT.EDU:gjc%bucsf.bu.edu@bu-it.BU.EDU different lisp implementations confused.
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 5 Feb 88 07:43:07 PST
Received: from bu-it.BU.EDU (TCP 20061201050) by MC.LCS.MIT.EDU 5 Feb 88 10:12:24 EST
Received: from bucsf (BUCSF.BU.EDU) by bu-it.BU.EDU (4.0/4.7)
id AA04013; Fri, 5 Feb 88 10:07:34 EST
Return-Path: <gjc@bucsf.bu.edu>
Received: by bucsf (4.12/4.7)
id AA24604; Fri, 5 Feb 88 10:13:44 est
Date: Fri, 5 Feb 88 10:13:44 est
From: gjc%bucsf.bu.edu@bu-it.BU.EDU (George J. Carrette)
Message-Id: <8802051513.AA24604@bucsf>
To: scheme@mc.lcs.mit.edu
Subject: different lisp implementations confused.
CScheme is written in C and has a large library of code
written in Scheme loaded into it. Having seen the development
in progress I can say that there was not much attention paid
to size or time efficiency.
Macscheme was obviously written with efficiency in mind.
It should not be suprising that one implementation is much
larger or slower than another. (Perhaps I'm wrong, maybe it
should be suprising, since one would not expect to see such
large differences between, say, two FORTRAN implementations.
What is it about lisp that allows for such wide range of
qualities of implementation?)
Even a common-lisp implementation could be relatively small.
KCL, Kyoto Common Lisp, a c-coded implementation, even contains
a compiler and debugger, and checks in at about 1.7 megabytes
on an Encore MultiMax. (This is not a recommendation).
T from Yale checks in at 2.3 Meg on a SUN-III.
Gnu Emacs by comparison is 1.3 Meg on the same machine.
* As is well known to readers of the old LISP-FORUM mailing list,
and also to readers of PLAYBOY FORUM, *size* is not your
best measure of quality.
-gjc
∂05-Feb-88 1249 @MC.LCS.MIT.EDU:chaynes@iuvax.cs.indiana.edu from Clyde Camp
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 5 Feb 88 12:49:11 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 5 Feb 88 15:48:41 EST
Received: by iuvax.cs.indiana.edu; id AA08965; Fri, 5 Feb 88 15:22:39 EST
Date: Fri, 5 Feb 88 15:22:39 EST
From: Chris Haynes <chaynes@iuvax.cs.indiana.edu>
Message-Id: <8802052022.AA08965@iuvax.cs.indiana.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: from Clyde Camp
In article <41288@ti-csl.CSNET> Dick Gabriel <RPG@sail.stanford.edu> writes:
>1. Individuals belong to X3J13. Companies can belong and send some number
>of representatives. All members vote as they wish, but many individuals
>vote their company line for whatever reasons, possibly because they have
>been told to do so. I vote as I wish, but I won't guarantee that my sense
>of greed will not figure into my vote. I don't believe IEEE does things
>any differently.
X3's brochures state that:
"Membership on X3 is by organization and is classified into three
groups - Producers, Consumers and General Interest. ... All members
pay a service fee to support the activity. ... Requests for waiver
of the fees are addressed and granted on a case by case basis."
Dick is correct in that individuals, as opposed to companies, make up
X3 committees and that they are free to vote as they please.
Individuals may attend one meeting free to determine whether or not
they want to join. In practice, however, the membership fee often
excludes small companies and individuals who cannot afford to pay it.
The result is that X3 membership is primarily by organization. It is
partially because of this weighting towards larger companies that the
documents from X3 committees must be passed through another balloting
body (representing a wider, more balanced group) before they are
adopted as a standard by ANSI.
With the IEEE, the working committee/group has no membership
restrictions placed on it by the IEEE other than the Chair must be a
member of the IEEE or one of its member societies (such as the
Computer Society). All interested parties may attend and participate
equally in working group meetings.
When the draft standard is declared done by the working group, it is
passed to the sponsor for balloting. The balloting body is made
individuals who are interested and technically competant to review the
document (basically, if you say you are, then you are). Like X3, it
must be balanced between manufacturers, users and general interest
groups. Although only IEEE or society members can actually vote, ALL
negative comments, from member and non-member alike, MUST be resolved
or responded to by the sponsor.
This meets ANSI's balloting rules for "fairness" and is why IEEE
adopted standards are generally taken as-is by ANSI.
- Clyde
∂05-Feb-88 1503 @MC.LCS.MIT.EDU,@RELAY.CS.NET:wand@corwin.ccs.northeastern.edu Standardization
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 5 Feb 88 15:03:39 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 5 Feb 88 18:03:02 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa23848; 5 Feb 88 15:02 EST
Received: from northeastern.edu by RELAY.CS.NET id ak02236; 5 Feb 88 14:45 EST
Received: from helios.northeastern.edu by nuhub.acs.northeastern.edu; Fri, 5
Feb 88 07:37 5
Received: from corwin by helios.northeastern.edu id aa08367; 4 Feb 88 21:55 EST
Received: by corwin.ccs.northeastern.edu (5.51/SMI-3.2+CCS-main-2.3) id
AA07467; Thu, 4 Feb 88 21:51:40 EST
Date: Thu, 4 Feb 88 21:51:40 EST
From: Mitchell Wand <wand%corwin.ccs.northeastern.edu@RELAY.CS.NET>
Subject: Standardization
To: RPG@SAIL.STANFORD.EDU
Cc: rrrs-authors@mc.lcs.mit.edu
Message-Id: <8802050251.AA07467@corwin.ccs.northeastern.edu>
In-Reply-To: Dick Gabriel's message of 04 Feb 88 1206 PST
Dear Dick,
I hope you will not choose to withdraw from the "arena of bringing the
Lisp/Scheme communities together." I, for one, found your explanation of the
(Common) Lisp standardization situation extremely enlightening and helpful,
and I am sorry to hear that some people think you are trying to destroy their
community. I did not observe any such sentiments in the recent net traffic.
There is a legitimate concern about the future of the Scheme community, but I
do not believe that this is a response to any perceived threat from the Common
Lisp community or from X3J13, etc. As Scheme matures and its user community
grows, it is no longer controlled by a group of 2 or 5 or 18 or 31. We
(meaning the members of any of these sets) can no longer control or direct the
growth of the language; such direction must be shared with other as yet
unknown persons or institutions which may or may not share the intellectual
goals of the original group.
Consequently there is understandable uncertainty about the the best way to
ensure orderly development of Scheme, that is, one which will preserve its
original intents. This uncertainty was reflected in the discussions of the
June 87 rrrs meeting and in the current interest in standardization.
[There is considerable irony in this analysis. Sussman has said on several
occasions that he was never interested in Scheme as a programming language; he
was just interested in writing some code. I'm not sure about Guy's feelings
on this. Thus most of the "community" in question consists of second and
third generation Schemers, programming-language-people who have long since
wrested control from the original 2!]
I hope we can endorse Bartley's characterization of the relationship between
Common Lisp and Scheme in the family of Lisp-like languages. I think it is
astute both intellectually (being factually close to true) and politically (as
a position to take in the standardization process). I think we have a good
deal to learn from each other, and I hope that the current brouhaha will not
prevent this from happening.
Dick, I thank you for explaining the ISO/X3J13 situation to us and explaining
how Scheme might fit into that scheme. Unfortunately, I find the argument for
participation in X3J13 (or maybe it's X3?) unconvincing: your description of
this looking-glass world seems more apt as an argument to run as fast as
possible in the other direction. I have not yet decided whether the correct
course is to participate in the IEEE standards process or to ignore the
standards process altogether. I hope that we will have some good discussion
on the net on this topic.
--Mitch
∂05-Feb-88 1612 @MC.LCS.MIT.EDU:gls@Think.COM Standardization
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 5 Feb 88 16:11:59 PST
Received: from Think.COM (TCP 1201000006) by MC.LCS.MIT.EDU 5 Feb 88 19:10:59 EST
Return-Path: <gls@Think.COM>
Received: from kali.think.com by Think.COM; Fri, 5 Feb 88 19:09:05 EST
Received: by kali.think.com; Fri, 5 Feb 88 19:09:01 EST
Date: Fri, 5 Feb 88 19:09:01 EST
From: gls@Think.COM
Message-Id: <8802060009.AA01135@kali.think.com>
To: wand%corwin.ccs.northeastern.edu@relay.cs.net
Cc: RPG@sail.stanford.edu, rrrs-authors@mc.lcs.mit.edu
In-Reply-To: Mitchell Wand's message of Thu, 4 Feb 88 21:51:40 EST <8802050251.AA07467@corwin.ccs.northeastern.edu>
Subject: Standardization
Date: Thu, 4 Feb 88 21:51:40 EST
From: Mitchell Wand <wand%corwin.ccs.northeastern.edu@relay.cs.net>
...
[There is considerable irony in this analysis. Sussman has said on several
occasions that he was never interested in Scheme as a programming language; he
was just interested in writing some code. I'm not sure about Guy's feelings
on this. ...]
I'm interested in writing code too. To the extent that it is easy and
convenient for me to use a machine to try out my code, so much the better.
One of the best things about Scheme is that the important parts can be
written down in one page--or carried around in my head. Not having
standard Scheme implementations has not bothered me too much, because
I can turn ANY Lisp into a Scheme with about half an hour of work.
(Usually I am trying out a language design idea by making a toy variant
of Scheme, so I am writing my own evaluator anyway.)
Scheme is small and clean and has a nice semantics.
The kernel of Lisp 1.5 had many of the same properties. Scheme differs
primarily in having better scoping rules, and in general a more carefully
thought out semantics, thanks to many people who have carefully discussed
the issues over the last 1.3 decades.
However, it is also useful to have standard libraries. I am happy to see
lots of useful numerical utilities in a Scheme, for example. It's great to
have ATANH and GCD. I wish factorial and choose (actually the generalized
gamma and beta functions) and Fibonacci were built in also.
I have recently had some experience in trying to write large systems
in Scheme. Where it differs from Common Lisp in fundamental structures
(such as control and binding), it is all to the good. What I miss from
Common Lisp are the little utility routines like STRING-TRIM that I must
reinvent.
Nevertheless, if Scheme is to be standardized I recommend that everyone
on the committee try to refrain from advocating their favorite ten
extra features. Scheme cannot withstand having n people add 10n
new features; the result would be a patchwork, not unlike another Lisp
dialect we all know. Perhaps the committee should agree to adopt a
Rule of One (cf. Lloyd Biggle's "The Still, Small Voice of Trumpets"):
each person gets to choose *one* new feature to propose. That makes
you sit and think carefully.
I have thought about it very carefully, and I choose for my One Feature
to propose that a function like Common Lisp's REDUCE be added (but with
not so many of the keyword-triggered options). I use that a lot.
Perhaps this is too draconian a rule for a committee, but I still suggest
it as a good personal discipline.
--Guy
∂05-Feb-88 1621 @MC.LCS.MIT.EDU,@RELAY.CS.NET:adams%tekchips.CRL@tektronix.tek.com Standardization
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 5 Feb 88 16:21:00 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 5 Feb 88 19:15:46 EST
Received: from relay2.cs.net by RELAY.CS.NET id ab25269; 5 Feb 88 16:24 EST
Received: from tektronix.tek.com by RELAY.CS.NET id dt02632; 5 Feb 88 16:11 EST
Received: by tektronix.TEK.COM (5.51/6.24)
id AA08543; Fri, 5 Feb 88 11:55:51 PST
Received: by tekchips.CRL.TEK.COM (5.51/6.24)
id AA07984; Fri, 5 Feb 88 11:55:07 PST
Date: Fri, 5 Feb 88 11:55:07 PST
From: Norman Adams <adams%tekchips.CRL%tektronix.tek.com@RELAY.CS.NET>
Message-Id: <8802051955.AA07984@tekchips.CRL.TEK.COM>
Subject: Standardization
To: Dick Gabriel <RPG@SAIL.STANFORD.EDU>
Cc: rrrs-authors@mc.lcs.mit.edu
I am confused by your recent messages.
2 Feb 88:
I suppose it might be natural for one who believes that association with
Common Lisp is the ``worst possible thing for Scheme'' to not wish to
associate with people involved with Common Lisp, but I see many of the
Common Lisp folks shaking their heads and wondering how such a weird and
depressing experience as Common Lisp standardization could have been
foisted on them. But, alas, such a dreamer am I to wish for co-operation.
Will said that having a stardards organization for Scheme be part of X3J13
would be the worst possible thing for Scheme. Others have said they would
like to avoid Scheme and Common Lisp being closely associated. As I read
the above, you seem to say that advocating a clearly distinguished
standards effort for Scheme --as Will has advocated-- is uncooperative.
Why? You yourself characterize Common Lisp standardization (as embodied by
X3J13) as "a weird and depressing experience." So let the Scheme efforts
walk clear of that tar pit.
4 Feb 88:
2. I am saddened by the animosity I see towards Common Lisp and by
implication towards the Common Lisp community. I made the proposal because
I thought the it might serve as a means of bringing two group together who
would seem to be naturally linked.
A preference by the Scheme community to have the Scheme language clearly
distinguished from the Common Lisp language does not imply that the Scheme
community sees no value in Common Lisp. You say a distaste for Common Lisp
implies a distaste for the Common Lisp community. I do not understand the
basis for this implication.
...In fact I have seen people who are my
friends attack me because they thought I was trying to destroy their
community. So, I withdraw my proposal,
There must be something going on behind the scenes. I cannot understand
this in the context of what I have seen on the mailing list.
...and I guess I withdraw from the
arena of bringing the Lisp/Scheme communities together.
Enjoy your battle.
And now I am completely lost. Does the mutual influence of the Common Lisp
and Scheme communities hinge on some ANSI-contained relationship? I think
not. The Lisp and Scheme communities already interact on technical issues.
(Will I see you at the Lisp Conference?) More interaction is possible. I
would think that an X3J13 subcommittee (or whatever) on Scheme would
increase political interaction, while doing little for technical
interaction. And what battle? (I am still lost.)
4. We can also broaden the charter of X3J13 to specifically include
Scheme. A committee or subcommittee on Scheme could be established
with its own time schedule.
This would accomplish several things for you:
...
6. You would have a voice and standing within any ISO process concerning
Lisp in which you were interested.
7. Any renegade IEEE efforts towards standardizing Scheme would be
officially disallowed through a petition from SPARC to IEEE.
and in a later message
Many observers (Mathis and myself included) believe that if ANSI is
asked to recognize Scheme as a different language from Common Lisp, they
will not do so, but ask that X3J13 broaden its charter.
Certainly you did not intend make threats, but it seems to me a threat is
implied: "Play the X3J13 game or you can't participate in ISO Lisp; if ISO
asks X3J13 about Scheme, X3J13 will incorporate Scheme with or without the
Scheme community."
I find it strange that the committee that wrote "Common Lisp" into their
charter so as "not to hamper the Scheme efforts" would then broaden its
charter to include Scheme. From what I understand, ANSI could choose to
include an IEEE effort in ISO level activities if appropriate. Clyde Camp
says such cooperation is possible. Will also makes this point. Are
we naive to believe that cooperation between ANSI and IEEE is possible?
I have moved from being slightly against any formal standards effort
to slightly in favor of an effort organized under IEEE.
-Norman
-------
∂05-Feb-88 1912 @MC.LCS.MIT.EDU,@RELAY.CS.NET:camp@mips.csc.ti.com Critical summary
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 5 Feb 88 19:12:09 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 5 Feb 88 22:11:53 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa28007; 5 Feb 88 19:40 EST
Received: from csc.ti.com by RELAY.CS.NET id ap05375; 5 Feb 88 19:35 EST
Received: from mips by tilde id AA05055; Fri, 5 Feb 88 18:06:14 CST
Received: by mips id AA14165; Fri, 5 Feb 88 18:06:09 CST
Date: Fri, 5 Feb 88 18:06:09 CST
From: Clyde Camp <camp%mips.csc.ti.com@RELAY.CS.NET>
Message-Id: <8802060006.AA14165@mips>
To: ramsdell%linus@MITRE-BEDFORD.ARPA, rrrs-authors@mc.lcs.mit.edu
Cc: Camp%mips.csc.ti.com@RELAY.CS.NET
In-Reply-To: ramsdell%linus@mitre-bedford.arpa's message of Fri, 5 Feb 88 07:53:53 EST <8802051253.AA05013@darwin.sun.uucp>
Subject: Critical summary
Several people have pointed out that the message numbers I referred to
a while back don't mean anything. Sorry about that. I idiotically
assumed the whole network used the same numbering scheme. To
complicate matters, not everything of mine is getting through
(probably due to pilot error).
The messages I was referring to were as follows:
Two initial major ones from me:
"It is easier to kill a thing....." - a history
"I can't help but...." - a proposal
From Dick Gabriel:
"Gentlemen. I have talked with Bob..." - an alternate proposal
"My wording on this point.... " - an elaboration and history
From me:
"This is being belatedly posted ... " - a response to Dick's
message
If you have not received them I'll resend.
Clyde
∂06-Feb-88 1715 @MC.LCS.MIT.EDU:HAL@AI.AI.MIT.EDU Can we standardize Scheme without killing it?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 6 Feb 88 17:15:09 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 6 Feb 88 20:14:02 EST
Date: Sat, 6 Feb 88 20:13:34 EST
From: Hal Abelson <HAL@AI.AI.MIT.EDU>
Subject: Can we standardize Scheme without killing it?
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <322467.880206.HAL@AI.AI.MIT.EDU>
Like David Bartley and Norman Adams, I've decided to unenthusiatically
support standardizing Scheme through IEEE -- provided we can do it
with proper precautions (see below).
The reason is not so much to "get Scheme out from under the shadow of
Common Lisp", as someone (I forget who) wrote to this list. Rather, I
expect that as Scheme becomes more widely used, there will be
increasing pressure to standardize it. And I am sure that as time
goes on, it will be increasingly difficult to standardize it in "the
right spirit." Already, at our preevious R*S meeting, Scheme design
had become too much of a political process rather than a technical
one. People had begun to see themselves not as individual language
designers, but as representatives of various constituencies of Scheme
users. This can only get worse as time goes on. So let's face the
issue now. My fear is that it is already too late to avoid the politics.
I want to make a couple of suggestions
1) We meet very soon to decide whether we want to go ahead with
standardization, and if so, to figure out how to go about this. I
think that this meeting should not talk about technical issues.
2) However the politics goes, the technical content of the first
Scheme standard should be what we have already agreed upon in R*S with
the possible exception of correcting obvious blunders. I appreciate
Guy Steele's sentiment that we pass a rule saying that each person can
nominate at most one feature to be included. But I think that this is
one feature too many. (Guy's suggested REDUCE, which I think is a
wonderful thing, can be put in the Yellow Pages.) In general I would
like to see a VERY conservative and VERY minimal standard.
3) My biggest worry about standardizing Scheme is my belief that
language design ought to be an evolutionary process guided by those
people with the best ideas at the moment, as worked out in research
papers and in implementations. It should not be a political process
in which things are done by some offical set of empowered
representatives (whether empowered by ANSII, ISO, IEEE, God, or
whomever). That sort of approach stultifies research by making people
feel as if they need to go to some "official body" to get their ideas
seriously considered.
I am currently refereeing papers submitted to the 1988 Lisp and
Functional Programming Conference. If I simply count what Lisp
dialects people are writing about, then in 150 papers I have seen so
far, there are as many papers specifically about Scheme as there are
about Common Lisp. If I ignore papers of the form "I have implemented
a neat program in Lisp" and restrict to papers that are proposing
serious language extensions or investigations of semantics, then there
are about a dozen of these about Scheme and only two or three about
Common Lisp. I assume that some of this is because Scheme is a
cleaner language than Common Lisp. But I can't help thinking that
another reason is that any serious researcher would think it a waste
of time to work on an extension to Common Lisp unless he is one of the
"duly constituted representiatives" of the Common Lisp Community.
To put it another way, standardizing something is a good way to shut
off research in it. To my mind, much of the reason that Lisp is still
around after 30 years is that it never was standardized and so was
able to evolve in an informal way.
I think that Common Lisp is well on its way to being a dead language,
and I don't want the same thing to happen to Scheme. But it's going
to be hard to resist. Whatever group gets the power to make Scheme
"official" is going to be tempted to "satisfy the needs of all those
Scheme users out in the world" by making the standard more and more
complete and by arrogating more and more of the design process to
themselves. And they will do this with the best possible motives.
For example, I am very impressed with the work of Bobrow, Kiczales,
Gabriel, etc. in designing CLOS. But I think it is wrong for them to
do this under the auspices of X3. One result is that the ONLY paper I
have seen so far about objects in Common Lisp submitted to the L&FP
conference this year is by members of the CLOS subcommittee.
So I think we need to give some serious thought to setting up a Scheme
standardization process that will be immune to this kind of
temptation. For example, we might decide that extensions to the
Scheme standard will be adopted only in conjuction with some academic
conference (such as L&FP) and only after "the research community" is
satisifed that the issues have been fully explored and that some
concensus (NOT a vote) has been attained. I would like to hear
suggestions from Clyde Camp on whether such a thing would be
compatible with IEEE (or ANSII or ISO) standards policies.
In addition, I would like us to include specific language in the
Scheme standard that puts the standardization effort in this light.
Here are some suggested paragraphs. I am happy to have someone else
edit them and make changes, but I do want to include some such words
near the beginning of the report:
--------------------------------------------------
SUGGESTED PARAGRAPH FOR SCHEME STANDARD
Throughout its thirty-year life, Lisp has continually adapted to
encompass changing ideas about programming-language design.
Specifying a standard for Scheme is intended to encourage the
continued evolution of Lisp dialects by identifying a coherent set of
constructs that is large enough to support the implementation of
substantial Lisp programs, but also small enough to admit significant
extensions and alternate approaches to language design. For example,
the standard does not mandate the inclusion in Scheme of large run-time
libraries, particular user interfaces, or complex interactions with
external operating systems, although practical Scheme implementations
ordinarily provide such features.
In particular, there are important linguistic design issues that are
not discussed in the Scheme standard {\em precisely because} Scheme
has sparked fruitful new approaches in these areas, and the authors of
this report do not wish to discourage the further development of good
ideas by taking a position on issues under active investigation. Some
of these issues are:
Macros: The scope of identifiers in macros has traditionally been
problematic for Lisp. Scheme's adoption of lexical scoping and a
single namespace for identifiers has stimulated the development of
macro-expansion techniquies that are more elegant and robust than
those appearing in other Lisp dialects. Although this report does not
specify a macro-definition facility, most popular Scheme
implementations allow users to define macros. The research literature
[ references ....] contains numerous discussions of macro definition
in Scheme.
Packaging: Scheme's uniform naming conventions permit ordinary lexical
environments (in some Scheme implementations) or slight modifications
of these (in other implementations) to provide poerful support for
programming-in-the-large. This obviates the need for special-purpose
naming mechanisms (such as multiple obarrays) as adopted by other Lisp
dialects. References [.......] provide discussions of techniques for
packaging and module definition in Scheme.
Object-oriented programming: Scheme unadorned is nearly an
object-oriented language. [JAR and Adams: I hope you don't object to
my snarfing the first sentence of your paper. It's a wonderful
sentence.] With simple extensions (or even simple syntactic
conventions) Scheme becomes a powerful foundation for implementing a
panoply of object systems, with little of the conceptual baggage
adopted by other Lisp dialects. See [refs .......] for examples.
[feel free to add more examples of Scheme's wonderfulness and your
current research: parallelism, continuations, logic variables, type
inferencing, ...]
The authors of this report hope that future revisions of the Scheme
standard will be sensitive to the fact that good ideas need time to
mature, and that exploration can often be stifled by the premature
adoption of standards.
--------------------------------------------------
-- Hal
∂06-Feb-88 1957 @MC.LCS.MIT.EDU:ANDY@Sushi.Stanford.EDU Re: Standardization
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 6 Feb 88 19:57:33 PST
Received: from Sushi.Stanford.EDU (TCP 4402000065) by MC.LCS.MIT.EDU 6 Feb 88 22:55:40 EST
Date: Sat 6 Feb 88 19:49:54-PST
From: Andy Freeman <ANDY@Sushi.Stanford.EDU>
Subject: Re: Standardization
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <12372714364.17.ANDY@Sushi.Stanford.EDU>
I don't understand most of the responses to RPG's proposal. This may
be due to my lack of experience in standards activities or my
ignorance of IEEE/ISO/ANSI/X3/X3J13 politics. (BTW - what are the
latter two short for?) RPG mentioned a number of political problems
in the CL standardization process. Most of the messages that mention
these problems suggest that Clyde Camp's proposal avoids them but that
isn't obvious to me. RPG is offering whatever structural help the CL
standardizers can offer - under Camp's proposal, the Scheme community
has to do everything itself. In RPG's proposal, unlike Camp's, the
Scheme community doesn't have to fight the battles that the CL
standardizers have already won. What specific things does IEEE offer
that are less likely under RPG's proposal? Doesn't Camp's proposed
Scheme standardization have to jump through hoops that RPG's puts us
beyond?
I believe the "Scheme is a Lisp" dogma and that Common Lisp is also a
Lisp; I expect the next Lisp to appear soon (although it may not be
recognized for a 10-15 years). I want to provide substantial
cross-fertilization among the members of the Lisp family (although I
expect CL to provide most of the negative lessons) without sacrificing
the autonomy that they need. (What little I've heard from the logic
programming community suggests that they are taking this approach,
unlike the proponents of yet-another-algebraic-language.) Therefore,
I'd like to see a standardization structure that reflects that
relationship (I'll explain why I think it is now time to standardize
Scheme in a couple of paragraphs). In other words, I'd like to see
something along the lines of:
Lisp
/ | \
CL Scheme Future Lisps
Neither Camp's IEEE nor RPG's X3J13 sub-committee proposal match that
structure but I think that RPG's is easier to "subvert". I may be
naive, but if the CL people want this structure, it should be easier
to promote a sub-committee than it is to bring in an outside group.
Can we arrange for this to happen at the same time the initial Scheme
standard is approved? If we can't, RPG's proposal is obviously
inferior; if we can, that's a big point in its favor.
Why I think Scheme Standardization is Good:
A few weeks ago, John Ramsdell said that the current R↑nRS language
was not a good candidate for standardization because it was missing
eval, objects, macros, support for programming in the large, and
parallelism; others mentioned logic variables and type inferenceing.
I agree with something implied by Chris Haynes; he said that a
standard was an agreement on what was stable. I think we can push
this a bit further and use standardization as a framework for managing
the medium-term development of Scheme.
Note that I am not saying that the standardization process should
design Scheme; Kent Pitman among others is absolutely right when he
says that "the organizational structure of a standards committee is
not appropriate for design work." I would like to see the first round
of Scheme standardization result in the red book as a trial standard
and an agreement that the revision two years later would incorporate
eval and objects and possibly macros. If macros are ready by then,
then that standard could be a full standard to be followed in 5 years
by a revision than incorporated some support for programming in the
large and logic variables. If macros aren't ready in two years, then
there could be another interim standard until they are. Something
similar can be done for libraries. In each case, I expect to see
competing proposals based on experience.
In other words, I'd like to see a Scheme standard that is not only an
agreement on what is and what direction we're going but one that also
schedules revisions of both. I think that CL would have been better
now if they'd have started 10 years earlier and gone through the loop
a few more times with a similar plan.
One of the beneficial side effects of a planned series of standards is
that eventually Scheme development ends; it schedules the death of
Scheme. Either Scheme-2010 is the one true lisp used by all (except
for the fortran heretics) or, as I expect, we'll have something nice
to use while epitome is developed using the scheme experience.
If I'm completely confused, I'd appreciate E-mail; there's no need to
post what everyone else knows.
-andy
-------
∂06-Feb-88 2255 @MC.LCS.MIT.EDU:gls@Think.COM Can we standardize Scheme without killing it?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 6 Feb 88 22:55:27 PST
Received: from Think.COM (TCP 1201000006) by MC.LCS.MIT.EDU 7 Feb 88 00:56:06 EST
Return-Path: <gls@Think.COM>
Received: from kali.think.com by Think.COM; Sun, 7 Feb 88 00:55:18 EST
Received: by kali.think.com; Sun, 7 Feb 88 00:55:15 EST
Date: Sun, 7 Feb 88 00:55:15 EST
From: gls@Think.COM
Message-Id: <8802070555.AA03061@kali.think.com>
To: HAL@ai.ai.mit.edu
Cc: rrrs-authors@mc.lcs.mit.edu
In-Reply-To: Hal Abelson's message of Sat, 6 Feb 88 20:13:34 EST <322467.880206.HAL@AI.AI.MIT.EDU>
Subject: Can we standardize Scheme without killing it?
2) However the politics goes, the technical content of the first
Scheme standard should be what we have already agreed upon in R*S with
the possible exception of correcting obvious blunders. I appreciate
Guy Steele's sentiment that we pass a rule saying that each person can
nominate at most one feature to be included. But I think that this is
one feature too many. (Guy's suggested REDUCE, which I think is a
wonderful thing, can be put in the Yellow Pages.) In general I would
like to see a VERY conservative and VERY minimal standard.
Hal's point is very well taken here, and I humbly retreat even further.
After distilling Hal's suggested introductory paragraphs, however, I find
that perhaps what many of want is not so much a standard programming
language, but a standard framework within which to investigate a family of
programming languages. I know we can standardize a programming language
within IEEE or X3, but can we properly standardize a philosophy?
I think that latter goal has already been served by the publication of
R↑3S. Had it not already appeared in SIGPLAN Notices, it might have been
a candidate for the Lisp Conference. Compare this to the appearance of
Milner's "A Proposal for Standard ML" in the 1984 Lisp Conference.
I agree with Hal that better ideas for language design come out of the
academic arena than out of standards committees--even when it is the same
people involved--because the processes are very different.
People continue to ask me (or tell me) whether X3J13 is really needed or
whether the mere publication of CLtL was sufficient. My reaction is
almost invariably "You're asking ME??"
I like Scheme. Scheme is nice. Scheme makes me happy. I want everyone
else to be happy too. Am I a sap?
--Guy
∂07-Feb-88 0849 @MC.LCS.MIT.EDU:hal@ZOHAR.AI.MIT.EDU can we properly standardize a philosophy?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 7 Feb 88 08:49:02 PST
Received: from zohar (TCP 2206400256) by MC.LCS.MIT.EDU 7 Feb 88 11:47:48 EST
Received: by ZOHAR.AI.MIT.EDU; Sun, 7 Feb 88 11:50:42 est
Date: Sun, 7 Feb 88 11:50:42 est
From: hal@ZOHAR.AI.MIT.EDU (Hal Abelson)
Message-Id: <8802071650.AA09808@zohar>
To: rrrs-authors@mc
Subject: can we properly standardize a philosophy?
Reply-To: hal@ai.ai.mit.edu
Guy's comment:
After distilling Hal's suggested introductory paragraphs,
however, I find that perhaps what many of want is not so
much a standard programming language, but a standard
framework within which to investigate a family of
programming languages. I know we can standardize a
programming language within IEEE or X3, but can we properly
standardize a philosophy? I think that latter goal has
already been served by the publication of R↑3S.
puts the issue very well. When the question of Scheme standardization was
first raised my opinion was that Scheme was already standardized in R*S and
that anything more "official" would be neither necessary nor desirable.
But serious concerns have been raised about (1) some other group
standardizing something called "Scheme" (2) Scheme getting overshadowed by
Common Lisp (3) Scheme not being viewed as a "real language". So I think
it is worthwhile to see if we can go the standards route without blowing
it.
"Blowing it" means setting up a situation where people feel that they
have to agree about large chunks of Scheme before they can work on
Scheme. That turns Scheme design into a political process rather than
an intellectual one. It also, unfortunately, is often the express
purpose of creating a standard.
I do think, however, that if we are careful, we could have our cake and it
too:
(1) We could satisfy the demands for standardization and the procedural
requirements of a standards organization by "standardizing" a small kernel.
Luckily, we have already adopted the idea of a spectrum ranging from
essential features to yellow pages, which makes this possible.
(2) We could satisfy ourselves that we are not overly politicizing
Scheme development by including appropriate philosophical statements
in the report, and by identifiying a process for evolving the standard
that will guard against this.
I am not at all secure that we can manage (2), which is why I think we
need to meet to discuss this, and to continue discussions on this
mailing list. In particular, we need to hear from Clyde Camp on
behalf of IEEE and from people familiar with X3 (by the way, what is
X3 ?) about whether such an approach would be compatible with the
frameworks of the various standards organizations.
-- Hal
∂07-Feb-88 0940 @MC.LCS.MIT.EDU:dfried@iuvax.cs.indiana.edu Minimal Standard
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 7 Feb 88 09:40:51 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 7 Feb 88 12:39:54 EST
Received: by iuvax.cs.indiana.edu; id AA10507; Sun, 7 Feb 88 12:38:22 EST
Date: Sun, 7 Feb 88 12:38:22 EST
From: Dan Friedman <dfried@iuvax.cs.indiana.edu>
Message-Id: <8802071738.AA10507@iuvax.cs.indiana.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: Minimal Standard
In conversations with Chris Haynes I have expressed my opinion that
if there is to be a standardization of Scheme it ought to be under
the auspices of the people who have Scheme's best interests at heart.
From my current perspective it appears that IEEE is our best hope.
Language design for human users is a constantly evolving process.
So it should be clear that at the outset only the smallest acceptable
subset of R↑n should be standardized.
--- Dan
∂07-Feb-88 0951 @MC.LCS.MIT.EDU:dfried@iuvax.cs.indiana.edu A vote for a minimal standard
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 7 Feb 88 09:51:42 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 7 Feb 88 12:49:48 EST
Received: by iuvax.cs.indiana.edu; id AA10771; Sun, 7 Feb 88 12:48:15 EST
Date: Sun, 7 Feb 88 12:48:15 EST
From: Dan Friedman <dfried@iuvax.cs.indiana.edu>
Message-Id: <8802071748.AA10771@iuvax.cs.indiana.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: A vote for a minimal standard
In conversations with Chris Haynes I have expressed my opinion that
if there is to be a standardization of Scheme it ought to be under
the auspices of the people who have Scheme's best interests at heart.
From my current perspective it appears that IEEE is our best hope.
Language design for human users is a constantly evolving process,
so it should be clear that at the outset only the smallest acceptable
subset of R↑n should be standardized.
--- Dan
∂07-Feb-88 1554 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Yale T (compiling)
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 7 Feb 88 15:54:08 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 7 Feb 88 18:49:58 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA14963; Sun, 7 Feb 88 15:44:53 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 7 Feb 88 22:44:56 GMT
From: murthy@cu-arpa.cs.cornell.edu (Chet Murthy)
Organization: Cornell Univ. CS Dept. Ithaca NY
Subject: Yale T (compiling)
Message-Id: <13258@cornell.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I just ftp-ed a copy of Yale T from prep.ai.mit.edu, and
I can't figure out how on Earth to recompile it.
I would really like ot be able to build one from scratch, just so
I know that it really works (or at least, that there are no hidden
nulled out sections of the executable or anything). Does anybody
out there know how to do this?
I couldn't find build instructions anywhere.
--chet--
In Real Life: Chet Murthy
ARPA: murthy@svax.cs.cornell.edu
SnailMail: Chet Murthy
North Woods Apts #20-2A
700 Warren Road
Ithaca, NY 14850
Office: 4162 Upson (607) 255-2219
MaBellNet: (607)-257-2542
∂07-Feb-88 1839 @MC.LCS.MIT.EDU:gjs@ZOHAR.AI.MIT.EDU Standardization
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 7 Feb 88 18:39:02 PST
Received: from zohar (TCP 2206400256) by MC.LCS.MIT.EDU 7 Feb 88 21:37:47 EST
Received: by ZOHAR.AI.MIT.EDU; Sun, 7 Feb 88 21:40:18 est
Date: Sun, 7 Feb 88 21:40:18 est
From: gjs@ZOHAR.AI.MIT.EDU (Gerald Jay Sussman)
Message-Id: <8802080240.AA10087@zohar>
To: gls@Think.COM
Cc: rrrs-authors@mc.lcs.mit.edu
In-Reply-To: gls@Think.COM's message of Fri, 5 Feb 88 19:09:01 EST <8802060009.AA01135@kali.think.com>
Subject: Standardization
Thank you GLS. As usual, we agree on lots of things. In particular,
the most wonderful part of R↑3RS is that it is less than 50 pages.
Let's keep R↑4RS that small!
By the way, the only features I would propose to add to "official"
Scheme are REDUCE and some kind of EVAL (note how it seems to be
almost EVIL in these prudish times), such as our ENCLOSE (which I
would now call LAMBDA->PROCEDURE) so that I can run code that I
construct on the fly.
Thus I think we have used up our quota.
∂07-Feb-88 1855 @MC.LCS.MIT.EDU:gjs@ZOHAR.AI.MIT.EDU Can we standardize Scheme without killing it?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 7 Feb 88 18:54:50 PST
Received: from zohar (TCP 2206400256) by MC.LCS.MIT.EDU 7 Feb 88 21:53:28 EST
Received: by ZOHAR.AI.MIT.EDU; Sun, 7 Feb 88 21:56:08 est
Date: Sun, 7 Feb 88 21:56:08 est
From: gjs@ZOHAR.AI.MIT.EDU (Gerald Jay Sussman)
Message-Id: <8802080256.AA10107@zohar>
To: HAL@AI.AI.MIT.EDU
Cc: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: Hal Abelson's message of Sat, 6 Feb 88 20:13:34 EST <322467.880206.HAL@AI.AI.MIT.EDU>
Subject: Can we standardize Scheme without killing it?
Modified rapture!
∂08-Feb-88 0637 @MC.LCS.MIT.EDU:SUSSMAN@G.BBN.COM Scheme number notation
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 8 Feb 88 06:37:02 PST
Received: from G.BBN.COM (TCP 1000400022) by MC.LCS.MIT.EDU 8 Feb 88 09:35:53 EST
Date: 8 Feb 1988 09:35-EST
Sender: SUSSMAN@G.BBN.COM
Subject: Scheme number notation
From: SUSSMAN@G.BBN.COM
To: gjs@MC.LCS.MIT.EDU, rrrs-authors@MC.LCS.MIT.EDU
Cc: allen@SOCRATES.BBN.COM, quigley@SOCRATES.BBN.COM
Cc: sas@BFLY-VAX.BBN.COM, las@BFLY-VAX.BBN.COM
Cc: sussman@G.BBN.COM, amellor@BFLY-VAX.BBN.COM
Cc: ajc@BFLY-VAX.BBN.COM
Message-ID: <[G.BBN.COM] 8-Feb-88 09:35:01.SUSSMAN>
R3RS doesn't say what the meaning of E notation (for the exponent) is.
In MIT C/Scheme, apparently <stuff>e<exp> means <stuff>*10↑<exp>
regardless of the base. E.g. #b1e2 is 100 decimal, not 100 binary.
Worse yet, though the lexical grammar allows E<exp> with any base, it
can't work with hex, since E is a hex digit. Hence,
#b1E2 = #o1E2 = 1E2 = 100
but #x1E2 = 482
Julie
∂08-Feb-88 0649 @MC.LCS.MIT.EDU:SUSSMAN@G.BBN.COM Wording to fix for LETREC
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 8 Feb 88 06:49:04 PST
Received: from G.BBN.COM (TCP 1000400022) by MC.LCS.MIT.EDU 8 Feb 88 09:46:56 EST
Date: 8 Feb 1988 09:46-EST
Sender: SUSSMAN@G.BBN.COM
Subject: Wording to fix for LETREC
From: SUSSMAN@G.BBN.COM
To: rrrs-authors@MC.LCS.MIT.EDU
Cc: sussman@G.BBN.COM, quigley@SOCRATES.BBN.COM
Message-ID: <[G.BBN.COM] 8-Feb-88 09:46:03.SUSSMAN>
In 4.2.2 "Binding constructs" you need to add the word ALL as follows:
"...in a letrec expression, ALL the bindings are in effect while their
initial values are being computed..."
Otherwise it could mean that each binding is in effect while its
own initial value is being computed.
Julie
∂08-Feb-88 1449 @MC.LCS.MIT.EDU:Alan@AI.AI.MIT.EDU@AI.AI.MIT.EDU !
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 8 Feb 88 14:49:06 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 8 Feb 88 17:44:52 EST
Date: Mon, 8 Feb 88 17:44:38 EST
From: Alan@AI.AI.MIT.EDU
Sender: JAR@AI.AI.MIT.EDU
Subject: !
To: PSRG@CLS.LCS.MIT.EDU, Scheme@MC.LCS.MIT.EDU
Message-ID: <323426.880208.JAR@AI.AI.MIT.EDU>
(define (make-cell)
(call-with-current-continuation
(lambda (return-from-make-cell)
(letrec ((state
(call-with-current-continuation
(lambda (return-new-state)
(return-from-make-cell
(lambda (op)
(case op
((set)
(lambda (value)
(call-with-current-continuation
(lambda (return-from-access)
(return-new-state
(list value return-from-access))))))
((get) (car state)))))))))
((cadr state) 'done)))))
∂08-Feb-88 1552 @MC.LCS.MIT.EDU:DEATH@XX.LCS.MIT.EDU Scheme number notation
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 8 Feb 88 15:52:26 PST
Received: from XX.LCS.MIT.EDU (CHAOS 2420) by MC.LCS.MIT.EDU 8 Feb 88 17:48:18 EST
Received: from MICKEY-MOUSE.LCS.MIT.EDU by XX.LCS.MIT.EDU via Chaosnet; 8 Feb 88 17:47-EST
Date: Mon, 8 Feb 88 17:47 EST
From: Mark A. Sheldon <DEATH@XX.LCS.MIT.EDU>
Subject: Scheme number notation
To: SUSSMAN@G.BBN.COM, gjs@MC.LCS.MIT.EDU, JAR@AI.AI.MIT.EDU
cc: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: <[G.BBN.COM] 8-Feb-88 09:35:01.SUSSMAN>
Message-ID: <880208174738.0.DEATH@MICKEY-MOUSE.LCS.MIT.EDU>
R3RS doesn't say what the meaning of E notation (for the exponent) is.
In MIT C/Scheme, apparently <stuff>e<exp> means <stuff>*10↑<exp>
regardless of the base. E.g. #b1e2 is 100 decimal, not 100 binary.
You're right that R3RS leaves the notation for exponents underspecified. I
discovered this when I used some of the MIT Scheme number-parser code to
write my own reader. My reader now uses the radix specified in the prefix
(if any) as the radix for reading the exponent. Thus #b1e2 is 100 binary.
Worse yet, though the lexical grammar allows E<exp> with any base, it
can't work with hex, since E is a hex digit. Hence,
#b1E2 = #o1E2 = 1E2 = 100
but #x1E2 = 482
I also ran into the problem with E in hex: without thinking about it, I
formulated the test case 1.1E-2 and got reader errors (obviously). Since E
notation is really just a hold-over from FORTRAN, why not use ↑ instead?
It would look nicer and wouldn't conflict with any reasonable radix.
Another problem in implementing a reader in Scheme is that R3RS also
underspecifies the relationships among the return values of CHAR->INTEGER.
There is no guarantee that the numeric characters are together in the
character code. My reader (and the MIT Scheme reader) relies on this
anyway.
-Mark
∂08-Feb-88 1619 @MC.LCS.MIT.EDU,@RELAY.CS.NET:oxley@home.csc.ti.com A Minimalist Standard
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 8 Feb 88 16:19:14 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 8 Feb 88 18:55:59 EST
Received: from relay2.cs.net by RELAY.CS.NET id ab28354; 8 Feb 88 18:38 EST
Received: from csc.ti.com by RELAY.CS.NET id ae24504; 8 Feb 88 18:34 EST
Received: from home by tilde id AA02672; Mon, 8 Feb 88 15:45:32 CST
Received: by home id AA03731; Mon, 8 Feb 88 15:43:39 CST
Date: Mon, 8 Feb 88 15:43:39 CST
From: Don Oxley <oxley%home.csc.ti.com@RELAY.CS.NET>
Message-Id: <8802082143.AA03731@home>
To: rrrs-authors@mc.lcs.mit.edu
Subject: A Minimalist Standard
I heartily concur with Hal's philosophy on the standard. Leaving
unsettled issues out of the standard and allowing good research to
take place is crucial. However, I have a concern.
If Scheme is to be a vehicle for research and experimentation, then I
forsee little problem, but as Scheme becomes more of a development
language for delivering other applications (eg., TI's Personal
Consultant), then there will be considerable pressure to "standardize"
the non-standard parts of the language. For example, many of us at TI
have succumbed to the use of multiple values as part of our Scheme
language - not to investigate multiple values but to use it in larger
efforts.
I don't have a solution to this problem, but I think that something
more than a minimalist approach will become necessary. The language
must be "sufficient" for significant development as perceived by the
users. Possibly we can address this with the R*S "optional" or
"extensions" parts of the language which commit definitions for
features which are not part of the standard. We might even adopt a
standard prefix (eg., #!@?) to avoid preempting names from a future
standard.
In any case, I think we should consider trying to develop an approach
to recognizing and allowing "registered" extensions which could help
in portability and future automated correction when a real standard is
developed. This could also be used to allieviate some of the pressure
to standardize a feature too early.
Comments??
--Don
∂08-Feb-88 1652 @MC.LCS.MIT.EDU:DEATH@XX.LCS.MIT.EDU Scheme number notation
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 8 Feb 88 16:52:03 PST
Received: from XX.LCS.MIT.EDU (CHAOS 2420) by MC.LCS.MIT.EDU 8 Feb 88 19:44:21 EST
Received: from MICKEY-MOUSE.LCS.MIT.EDU by XX.LCS.MIT.EDU via Chaosnet; 8 Feb 88 19:39-EST
Date: Mon, 8 Feb 88 19:40 EST
From: Mark A. Sheldon <DEATH@XX.LCS.MIT.EDU>
Subject: Scheme number notation
To: DEATH@XX.LCS.MIT.EDU, SUSSMAN@G.BBN.COM, gjs@MC.LCS.MIT.EDU,
JAR@AI.AI.MIT.EDU
cc: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: <880208174738.0.DEATH@MICKEY-MOUSE.LCS.MIT.EDU>
Message-ID: <880208194000.2.DEATH@MICKEY-MOUSE.LCS.MIT.EDU>
Oops! I have to take back my complaint that R3RS underspecifies the
interrelationships among values returned by CHAR->INTEGER for numeric
characters. JAR pointed out to me that you can just compute a table in
which to look up the values (indexed by the CHAR->INTEGER result). It
wastes some space, but so what. Now my reader is completely (?) portable
under R3RS.
-Mark
∂08-Feb-88 1659 @MC.LCS.MIT.EDU,@RELAY.CS.NET:oxley@home.csc.ti.com Scheme Standardization
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 8 Feb 88 16:59:17 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 8 Feb 88 19:47:07 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa26766; 8 Feb 88 16:58 EST
Received: from csc.ti.com by RELAY.CS.NET id as23929; 8 Feb 88 16:50 EST
Received: from home by tilde id AA02132; Mon, 8 Feb 88 15:22:13 CST
Received: by home id AA03169; Mon, 8 Feb 88 15:20:29 CST
Date: Mon, 8 Feb 88 15:20:29 CST
From: Don Oxley <oxley%home.csc.ti.com@RELAY.CS.NET>
Message-Id: <8802082120.AA03169@home>
To: rrrs-authors@mc.lcs.mit.edu
Subject: Scheme Standardization
[This is a little late - I sent it a week ago and went out of town -
when I returned I found that my message had also]
After reading rpg's arguments in support of working with the ANSI
effort, I wonder if it is really possible to allow a sub-committee to
sit as idly to the side as he suggests (I don't really purport to
know). If ISO is interested in Scheme and is active, would the US
effort not be compelled to join the fray. It seems a bit
disconcerting to me to sit in the midst of a swamp full of alligators
when my initial goal was a family picnic!
It seems to me that whether we work with the IEEE or ANSI, Scheme can
remain a reasonable language if the major implementors/researchers
continue to work together and will otherwise be abandoned. If alien
forces were to take control of an IEEE or ANSI effort and
significantly harm Scheme or make the process intolerable, I would
imagine that most researchers would ignore it and a new direction
would occur. This would indeed be unfortunate, but the most likely
result would be that the current implementations would define a dying
"standard" until a new language evolved.
If the current implementors continue working together, with or without
the support of a standards group, I think that we will continue to
develop a language which will gain substantial use.
It seems to me that participation in one of the standards efforts
*may* provide a vehicle to encourage more acceptance of Scheme and the
development of a broader community (which we need). If we keep a goal
of accepting only widely supported additions, then we ought to be able
to manage an evolution from the R3RS (maybe even R3RS itself).
Its not clear to me which is better, somehow it seems that the IEEE
may have the less burdensome process. Could the ANSI committee be
"formed" and sit idle as a placeholder and then maybe adopt/endorse a
successful effort through the IEEE?
I would vote to attempt a standardization effort - if only to
encourage discussion and dissemination of the concepts. If it becomes
too unwieldly, then just abandon it - there is no sense in
standardizing a competitor to Common Lisp that has nothing new to
offer - that would be damaging to the entire Lisp community. If
Scheme is to become a widely used language, it must be something we
are still proud of - otherwise it should remain a minor research tool.
--Don
∂08-Feb-88 1840 @MC.LCS.MIT.EDU:Alan@AI.AI.MIT.EDU@AI.AI.MIT.EDU !
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 8 Feb 88 18:40:42 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 8 Feb 88 17:44:52 EST
Date: Mon, 8 Feb 88 17:44:38 EST
From: Alan@AI.AI.MIT.EDU
Sender: JAR@AI.AI.MIT.EDU
Subject: !
To: PSRG@CLS.LCS.MIT.EDU, Scheme@MC.LCS.MIT.EDU
Message-ID: <323426.880208.JAR@AI.AI.MIT.EDU>
(define (make-cell)
(call-with-current-continuation
(lambda (return-from-make-cell)
(letrec ((state
(call-with-current-continuation
(lambda (return-new-state)
(return-from-make-cell
(lambda (op)
(case op
((set)
(lambda (value)
(call-with-current-continuation
(lambda (return-from-access)
(return-new-state
(list value return-from-access))))))
((get) (car state)))))))))
((cadr state) 'done)))))
∂08-Feb-88 2203 @MC.LCS.MIT.EDU:bard@THEORY.LCS.MIT.EDU !
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 8 Feb 88 22:03:25 PST
Received: from THEORY.LCS.MIT.EDU (TCP 2206400134) by MC.LCS.MIT.EDU 9 Feb 88 00:18:53 EST
Received: from RAVEN.LCS.MIT.EDU by THEORY.LCS.MIT.EDU (4.12/4.7); Mon, 8 Feb 88 23:24:29 est
Received: by RAVEN.LCS.MIT.EDU (4.12/4.7); Mon, 8 Feb 88 21:51:32 est
Date: Mon, 8 Feb 88 21:51:32 est
From: Bard Bloom <bard@THEORY.LCS.MIT.EDU>
Message-Id: <8802090251.AA01964@RAVEN.LCS.MIT.EDU>
To: Alan@AI.AI.MIT.EDU
Cc: PSRG@CLS.LCS.MIT.EDU, Scheme@MC.LCS.MIT.EDU
In-Reply-To: Alan@AI.AI.MIT.EDU's message of Mon, 8 Feb 88 17:44:38 EST <323426.880208.JAR@AI.AI.MIT.EDU>
Subject: !
Date: Mon, 8 Feb 88 17:44:38 EST
From: Alan@AI.AI.MIT.EDU
Sender: JAR@AI.AI.MIT.EDU
(define (make-cell)
(call-with-current-continuation
(lambda (return-from-make-cell)
(letrec ((state
(call-with-current-continuation
(lambda (return-new-state)
(return-from-make-cell
(lambda (op)
(case op
((set)
(lambda (value)
(call-with-current-continuation
(lambda (return-from-access)
(return-new-state
(list value return-from-access))))))
((get) (car state)))))))))
((cadr state) 'done)))))
What the hey is this?
∂08-Feb-88 2250 @MC.LCS.MIT.EDU,@RELAY.CS.NET:bartley@mips.csc.ti.com Can we standardize Scheme without killing it?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 8 Feb 88 22:50:01 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 9 Feb 88 01:08:04 EST
Received: from relay2.cs.net by RELAY.CS.NET id ac29953; 8 Feb 88 20:39 EST
Received: from csc.ti.com by RELAY.CS.NET id aa25077; 8 Feb 88 20:32 EST
Received: from mips by tilde id AA05490; Mon, 8 Feb 88 17:33:59 CST
Received: by mips id AA10271; Mon, 8 Feb 88 17:33:55 CST
Date: Mon, 8 Feb 88 17:33:55 CST
From: David Bartley <bartley%mips.csc.ti.com@RELAY.CS.NET>
Message-Id: <8802082333.AA10271@mips>
To: rrrs-authors@mc.lcs.mit.edu
In-Reply-To: Hal Abelson's message of Sat, 6 Feb 88 20:13:34 EST <322467.880206.HAL@AI.AI.MIT.EDU>
Subject: Can we standardize Scheme without killing it?
I can almost feel consensus in the air---although a number of people
have been conspicuously silent concerning standardization. I'm
prepared to go wherever and meet whomever may be necessary to help
resolve the non-technical aspects of Scheme standardization. Shall we
accept Ramsdell's invitation to meet at MITRE? When? If not, where?
How about the rest of you? Does silence means apathy or tacit approval?
(Despair?)
One problem with all standards efforts is the travel costs associated
with meetings. Are we likely to disenfranchise anyone on that basis?
If we were to agree in advance to stick closely to R3RS, could we get
by with fewer active participants doing most of the work?
--db--
∂09-Feb-88 0715 @MC.LCS.MIT.EDU,@RELAY.CS.NET:jmiller%mephi@BRANDEIS.CSNET Can we standardize Scheme without killing it?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 9 Feb 88 07:08:16 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 9 Feb 88 10:06:44 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa07252; 9 Feb 88 9:54 EST
Received: from brandeis by csnet-relay.csnet id ac28762; 9 Feb 88 9:48 EST
Received: by brandeis.ARPA (5.51/4.7)
id AA13182; Tue, 9 Feb 88 08:44:47 EST
Received: by mephi.earth1.com (3.2/SMI-3.2)
id AA14967; Tue, 9 Feb 88 08:43:34 PST
Date: Tue, 9 Feb 88 08:43:34 PST
From: James Miller <jmiller%mephi%brandeis.csnet@RELAY.CS.NET>
Message-Id: <8802091643.AA14967@mephi.earth1.com>
To: rrrs-authors%mc.lcs.mit.edu@RELAY.CS.NET
In-Reply-To: David Bartley's message of Mon, 8 Feb 88 17:33:55 CST <8802082333.AA10271@mips>
Subject: Can we standardize Scheme without killing it?
I haven't entered the fray yet, and I don't want to do anything about
heating up the debate. My personal opinion is that I would prefer not
to standardize, but I suspect that we will have to do so for a large
variety of reasons.
I prefer the IEEE option as I understand it now over the ANSI option,
but I am afraid that costs *ARE* the single determining feature in my
ability to work on this. They are one reason I prefer IEEE. I'd hate
to get left out, but I am a new faculty member (first year) and have
no way to afford travel expenses. Thus, the MITRE meeting has
significant appeal to me; but that's very selfish.
One final note: I'm scared by Don Oxley's message regarding a
diversion from the minimalist standard. I'm not very much of a
minimalist myself, but I see absolutely no hope of getting a standard
we will all like if we don't strongly adopt a Steele-like stance
against new features. I suggest that we take a fairly strong line
that any proposed extension which can be implemented using Yellow
Pages style be kept out of the standard entirely. I also believe that
we *have* to finally agree on macros to make this philosophy reaonably
workable.
--Jim
∂09-Feb-88 1831 @MC.LCS.MIT.EDU,@RELAY.CS.NET:bartley@mips.csc.ti.com A Minimalist Standard
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 9 Feb 88 18:31:23 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 9 Feb 88 21:30:21 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa15125; 9 Feb 88 20:02 EST
Received: from csc.ti.com by RELAY.CS.NET id au01645; 9 Feb 88 19:56 EST
Received: from mips by tilde id AA02306; Tue, 9 Feb 88 17:45:33 CST
Received: by mips id AA21412; Tue, 9 Feb 88 17:45:27 CST
Date: Tue, 9 Feb 88 17:45:27 CST
From: David Bartley <bartley%mips.csc.ti.com@RELAY.CS.NET>
Message-Id: <8802092345.AA21412@mips>
To: rrrs-authors@mc.lcs.mit.edu
Cc: oxley%home.csc.ti.com@RELAY.CS.NET, Bartley%mips.csc.ti.com@RELAY.CS.NET
In-Reply-To: Don Oxley's message of Mon, 8 Feb 88 15:43:39 CST <8802082143.AA03731@home>
Subject: A Minimalist Standard
> If Scheme is to be a vehicle for research and experimentation, then I
> forsee little problem, but as Scheme becomes more of a development
> language for delivering other applications (eg., TI's Personal
> Consultant), then there will be considerable pressure to "standardize"
> the non-standard parts of the language. For example, many of us at TI
> have succumbed to the use of multiple values as part of our Scheme
> language - not to investigate multiple values but to use it in larger
> efforts.
>
> I don't have a solution to this problem, but I think that something
> more than a minimalist approach will become necessary. The language
> must be "sufficient" for significant development as perceived by the
> users.
I think we can reasonably hope to have our cake and eat it too. A
"minimalist" standard is necessary now because it's the only kind we
can hope to get agreement on any time soon. It also establishes what
kind of language Scheme is---a very important point to many of us who
are fearful of any standardization.
I also think it is sufficient, even for the case you mention (users
writing non-trivial applications who need more features than exist in
the minimalist standard). Such "features" need to be debated among
the implementors and alternatives placed before the user community as
parts of packaged Scheme products. They need to prove themselves
before they are considered for standardization. I think the informal
approach has worked so far, and should continue to be used. Macros,
opaque objects, etc., can and should be worked out informally and
incorporated in a later revision.
One of the problems with the Common Lisp standardization process is
that the existence of holes---like a real LOOP macro or a standard
Object programming paradigm---has resulted in *design* going on
instead of *ratification*. We don't need to do that.
I support the minimalist approach, which I take to mean (roughly)
blessing R3RS with minor fixup (e.g. the numbers proposal from last
June, but not macros (and throw out DO??)). The segregation of
essential, inessential, and "yellow pages" is already there.
--db--
∂10-Feb-88 0125 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA Standardization (meetings and relation to CL)
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 10 Feb 88 01:25:36 PST
Received: from mitre-bedford.ARPA (TCP 3200600102) by MC.LCS.MIT.EDU 10 Feb 88 04:24:52 EST
From: ramsdell%linus@mitre-bedford.ARPA
Posted-From: The MITRE Corp., Bedford, MA
Received: from darwin.sun.uucp by linus.research (3.2/4.7)
id AA26277; Mon, 8 Feb 88 10:02:23 EST
Posted-Date: Mon, 8 Feb 88 10:01:21 EST
Received: by darwin.sun.uucp (3.2/SMI-3.0DEV3)
id AA09128; Mon, 8 Feb 88 10:01:21 EST
Date: Mon, 8 Feb 88 10:01:21 EST
Message-Id: <8802081501.AA09128@darwin.sun.uucp>
To: RPG@SAIL.Stanford.EDU
Cc: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: Dick Gabriel's message of 04 Feb 88 1206 PST <8802042023.AA01455@mitre-bedford.ARPA>
Subject: Standardization (meetings and relation to CL)
Given the number responses to the idea of MITRE hosting a meeting
about Scheme standardization, I conclude there is insufficient interest.
However, I got the details of hosting meetings at MITRE. I found
there are no problems, but one further constraint. Meetings held at
MITRE which include non-employees, must occur during normal working
hours. In other words, Saturdays and Sundays are out. For the
record, I would be happy to host other Scheme related meetings in the
future as long as they occur on a weekday.
Dick Gabriel:
>2. I am saddened by the animosity I see towards Common Lisp and by
>implication towards the Common Lisp community. ....
I guess Dick's comment was directed at part of one of my notes:
>On the subject of confusing Scheme with Common Lisp, I follow the
>practice of never mentioning Lisp while talking about Scheme unless
>the person I am talking to asks about Scheme's relation to Lisp. This
>practice avoids the AI baggage, as well as any negative impressions
>the person has of Lisp. Of course, disowning our connection to Lisp
>would be like disowning one's parents, but I see no need to tie our
>fortunes to Lisp's. Thus I strongly oppose the idea of expanding
>X3J13 to cover both Lisp and Scheme. If we choose to standardize
>Scheme, let's do it independently of efforts to standardize other
>dialects of Lisp.
My point was that Scheme and any other dialect of Lisp, such as Common
Lisp, should not be standardized by the same committee. Just as Ada
documents acknowledge the influence of Pascal, any document on Scheme
should acknowledge the influence of various Lisp dialects. I am told
Ada designers maintained extensive contact with the designers of other
languages. I encourage contact with the designers of other dialects
of Lisp, including the designers of Common Lisp. Never think I would
like to see Dick Gabriel and Guy Steele removed from this list because
they are too closely connected to Common Lisp!
I endorse Bartley's characterization of the relationship between
Common Lisp and Scheme being in the family of Lisp-like languages,
just as Ada and Pascal are in the Algol-like family. While Ada and
Pascal are in the same family, they maintain their own identity. Let
Scheme have its own. I hold a minority position which worries
about too much connection of the name Scheme with Lisp. I believe
excessive connection carries unnecessary baggage associated with AI,
and unnecessary baggage associated with other dialects of Lisp. I
know people who think all modern Lisp-like languages have PROG and GO.
While Common Lisp is often cited as the reason a Lisp-like language
is thought to be a large language, I don't single out Common Lisp as
the sole source of wrong ideas about Scheme. I think it is a mistake
to assume the average Lisp programmer is clear on the differences
between dialects, and we should aid that programmer when we can.
I respectfully oppose your proposal to broaden the scope of X3J13
because I think if Scheme is to be standardized, it should happen in a
committee independent of other efforts to standardize Lisp dialects.
I did not mean to imply the standardization effort should ignore the
work of other efforts. In fact, I read some of the Common Lisp
proposals, most recently, the CLOS proposal. I hope this clears
things up.
John
∂10-Feb-88 0641 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA Standardization (A conservative approach)
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 10 Feb 88 06:41:44 PST
Received: from mitre-bedford.ARPA (TCP 3200600102) by MC.LCS.MIT.EDU 10 Feb 88 09:28:44 EST
From: ramsdell%linus@mitre-bedford.ARPA
Posted-From: The MITRE Corp., Bedford, MA
Received: from darwin.sun.uucp by linus.research (3.2/4.7)
id AA29906; Wed, 10 Feb 88 09:25:37 EST
Posted-Date: Wed, 10 Feb 88 09:24:26 EST
Received: by darwin.sun.uucp (3.2/SMI-3.0DEV3)
id AA12394; Wed, 10 Feb 88 09:24:26 EST
Date: Wed, 10 Feb 88 09:24:26 EST
Message-Id: <8802101424.AA12394@darwin.sun.uucp>
To: gls@Think.COM
Cc: ramsdell@mitre-bedford.ARPA, rrrs-authors@mc.lcs.mit.edu
In-Reply-To: gls@Think.COM's message of Fri, 5 Feb 88 19:09:01 EST <8802060009.AA01135@kali.think.com>
Subject: Standardization (A conservative approach)
Should Scheme standardization be approved, I propose the following
plan for the initial draft.
Limit changes to:
1) Adding Abelson's manifesto on Scheme evolution,
2) adding multiple values,
3) modifying the number syntax as previously agreed, and
4) wordsmithing.
Letting each person choose *one* new feature to propose could make the
standards process into a design process. I like the idea of
standardizing something close to R3RS Scheme.
My view is that informal Scheme design meetings, such as the Scheme
workshop of June 1987, are the places to talk about evolutionary changes
to Scheme. Are those meetings going to be replaced by formal
standards meetings, or are the standards meetings going to only codify
the time tested ideas that originated in workshops and other
locations?
John
∂10-Feb-88 0734 @MC.LCS.MIT.EDU,@RELAY.CS.NET:oxley@home.csc.ti.com A Minimalist Standard
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 10 Feb 88 07:33:59 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 10 Feb 88 10:22:37 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa22484; 10 Feb 88 9:27 EST
Received: from csc.ti.com by RELAY.CS.NET id ab05631; 10 Feb 88 9:17 EST
Received: from home by tilde id AA14501; Wed, 10 Feb 88 07:37:46 CST
Received: by home id AA08639; Wed, 10 Feb 88 07:36:05 CST
Date: Wed, 10 Feb 88 07:36:05 CST
From: Don Oxley <oxley%home.csc.ti.com@RELAY.CS.NET>
Message-Id: <8802101336.AA08639@home>
To: bartley%mips.csc.ti.com@RELAY.CS.NET
Cc: rrrs-authors@mc.lcs.mit.edu, Bartley%mips.csc.ti.com@RELAY.CS.NET
In-Reply-To: David Bartley's message of Tue, 9 Feb 88 17:45:27 CST <8802092345.AA21412@mips>
Subject: A Minimalist Standard
I fundamentally agree with the minimalist notions. My point is that I
would rather provide a mechanism to track "popular" but non-standard
features (such as multiple values) in such a way that users who use
such things have a reasonable method for learning their definition,
that there be only one, and that the chosen names not preempt the use
of that name in an eventual standard. In NCS today, we have preempted
"values", "eval", "syntax", "macro", ... to name a few. My point is
that something simple like a prefix (eg. ncs-values -
non-conforming-scheme-values) would avoid preempting the identifier
values and would give me a reasonable chance of writing an automatic
parser to repair the damage if a standard is ever reached.
It seems to me that the key is allowing Scheme to be widely used, but
somehow controlling the defacto standardization through widespread
usage. A purely minimalist approach seems unlikely to do that to me.
--Don
∂11-Feb-88 0758 @MC.LCS.MIT.EDU:hal@ZOHAR.AI.MIT.EDU call for standardization meeting
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 11 Feb 88 07:58:39 PST
Received: from zohar (TCP 2206400256) by MC.LCS.MIT.EDU 11 Feb 88 10:54:58 EST
Received: by ZOHAR.AI.MIT.EDU; Thu, 11 Feb 88 10:57:35 est
Date: Thu, 11 Feb 88 10:57:35 est
From: hal@ZOHAR.AI.MIT.EDU (Hal Abelson)
Message-Id: <8802111557.AA12523@zohar>
To: rrrs-authors@mc
Subject: call for standardization meeting
Reply-To: hal@ai.ai.mit.edu
I would like to hold a one-day meeting of RRRS authors to address the
standardization question.
The purpose of the meeting would be to decide whether we want to go
ahead with standardization, and if so, how (what standards
organization, who should be responsible for doing the work, etc.).
I do not think we should make any technical decisions about Scheme at
this meeting, although we might review some of the suggested changes.
My bias is that if we do decide to go ahead with a standard, then the
standard itself should be essentially identical to the next version of
R*S. (But I would like to hear from people who have contrary
opinions.)
Actually producing the next version of R*S would happen at a meeting
held in conjuction with the L&FP conference this summer.
For purely selfish reasons, I would like to hold the meeting on a
weekend in the Boston area. I volunteer MIT to host it. Here are
three possible dates:
Saturday, March 12
Saturday, March 19
Saturday, March 26
Please send mail within a week (to RRRS-AUTHORS) with one or more of the
following responses:
* you can/will come (and which dates are OK)
* you don't want to have a meeting or can't come to one, but you think
that standardization is a good/bad idea; any thoughts on a preferred
standards organization (IEEE, X3, Better Homes and Gardens, etc.)
* you would prefer to have the meeting somewhere else, with suggested
place and dates.
* you are bored/sick of the whole thing
If there is enough response, I'll go ahead and schedule the meeting.
-- Hal
∂11-Feb-88 1020 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA call for standardization meeting
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 11 Feb 88 10:20:03 PST
Received: from mitre-bedford.ARPA (TCP 3200600102) by MC.LCS.MIT.EDU 11 Feb 88 13:19:52 EST
From: ramsdell%linus@mitre-bedford.ARPA
Posted-From: The MITRE Corp., Bedford, MA
Received: from darwin.sun.uucp by linus.research (3.2/4.7)
id AA02654; Thu, 11 Feb 88 13:19:14 EST
Posted-Date: Thu, 11 Feb 88 13:18:02 EST
Received: by darwin.sun.uucp (3.2/SMI-3.0DEV3)
id AA13233; Thu, 11 Feb 88 13:18:02 EST
Date: Thu, 11 Feb 88 13:18:02 EST
Message-Id: <8802111818.AA13233@darwin.sun.uucp>
To: rrrs-authors@mc.lcs.mit.edu
In-Reply-To: Hal Abelson's message of Thu, 11 Feb 88 10:57:35 est <8802111557.AA12523@zohar>
Subject: call for standardization meeting
I will come and any Saturday in March is okay for me.
John
∂11-Feb-88 1101 @MC.LCS.MIT.EDU:philbin-jim@YALE.ARPA Meeting
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 11 Feb 88 11:01:27 PST
Received: from ATHENA.CS.YALE.EDU (TCP 20011000033) by MC.LCS.MIT.EDU 11 Feb 88 14:00:55 EST
Received: by ATHENA.CS.YALE.EDU; Thu, 11 Feb 88 13:55:41 EST
Date: Thu, 11 Feb 88 13:55:41 EST
From: James Philbin <philbin-jim@YALE.ARPA>
Full-Name: James Philbin
Message-Id: <8802111855.AA19221@ATHENA.CS.YALE.EDU>
Received: by yale-ring (node-aac0/AAC0)
via WIMP-MAIL (Version 1.2/1.4) ; Thu Feb 11 13:47:35
Subject: Meeting
To: rrrs-authors@mc.lcs.mit.edu
In-Reply-To: hal@ZOHAR.AI.MIT.EDU (Hal Abelson), Thu, 11 Feb 88 10:57:35 est
My bias is that if we do decide to go ahead with a standard, then the
standard itself should be essentially identical to the next version of
R*S. (But I would like to hear from people who have contrary
opinions.)
If we decide to standardize, then I agree that it should be identical
with the next version of R*S.
* you can/will come (and which dates are OK)
I will come. All the dates are fine with me.
- Jim
-------
∂11-Feb-88 1543 @MC.LCS.MIT.EDU:dfried@iuvax.cs.indiana.edu meeting
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 11 Feb 88 15:42:54 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 11 Feb 88 18:42:28 EST
Received: by iuvax.cs.indiana.edu; id AA08705; Thu, 11 Feb 88 18:20:20 EST
Date: Thu, 11 Feb 88 18:20:20 EST
From: Dan Friedman <dfried@iuvax.cs.indiana.edu>
Message-Id: <8802112320.AA08705@iuvax.cs.indiana.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: meeting
The only weekend possible for me is March 26.
Dan
∂11-Feb-88 1558 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu is make-environment really necessary for packages?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 11 Feb 88 15:58:43 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 11 Feb 88 18:54:35 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA06487; Thu, 11 Feb 88 15:23:19 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 11 Feb 88 19:09:35 GMT
From: rochester!neal@rutgers.edu (Neal Gafter)
Organization: U of Rochester, CS Dept., Rochester, NY
Subject: is make-environment really necessary for packages?
Message-Id: <6722@sol.ARPA>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I do not understand the need for an explicit environment type in scheme.
It seems that lambda could serve the same purpose.
Suppose there were not an explicit environment type. In this case,
the procedure "eval" would take only a single parameter: the expression
to be evaluated (in the current environment).
Packages, which are currently created this way:
(define foo (make-environment
(define x ...)
(define y ...)
...
))
and used this way:
(eval '(expression) foo)
Could still be created this way:
(define foo (let ()
(define x ...)
(define y ...)
...
(lambda (_x) (eval _x))
))
and used this way:
(foo '(expression))
It would appear that environments are unnecessary. The Revised↑3
report does not include any description of "make-environment", "eval",
or "access".
Neal Gafter <neal@cs.rochester.edu>
--
Arpa: neal@cs.rochester.edu (Neal Gafter)
UUCP: ...{rocksvax|allegra|decvax}!rochester!neal
USnail: Department of Computer Science, U. of Rochester, N.Y. 14627
phone: (716) 275 - 1348 (office) or (716) 473 - 2361 (home)
∂11-Feb-88 1631 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu is make-environment really necessary for packages?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 11 Feb 88 16:31:16 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 11 Feb 88 18:54:35 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA06487; Thu, 11 Feb 88 15:23:19 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 11 Feb 88 19:09:35 GMT
From: rochester!neal@rutgers.edu (Neal Gafter)
Organization: U of Rochester, CS Dept., Rochester, NY
Subject: is make-environment really necessary for packages?
Message-Id: <6722@sol.ARPA>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I do not understand the need for an explicit environment type in scheme.
It seems that lambda could serve the same purpose.
Suppose there were not an explicit environment type. In this case,
the procedure "eval" would take only a single parameter: the expression
to be evaluated (in the current environment).
Packages, which are currently created this way:
(define foo (make-environment
(define x ...)
(define y ...)
...
))
and used this way:
(eval '(expression) foo)
Could still be created this way:
(define foo (let ()
(define x ...)
(define y ...)
...
(lambda (_x) (eval _x))
))
and used this way:
(foo '(expression))
It would appear that environments are unnecessary. The Revised↑3
report does not include any description of "make-environment", "eval",
or "access".
Neal Gafter <neal@cs.rochester.edu>
--
Arpa: neal@cs.rochester.edu (Neal Gafter)
UUCP: ...{rocksvax|allegra|decvax}!rochester!neal
USnail: Department of Computer Science, U. of Rochester, N.Y. 14627
phone: (716) 275 - 1348 (office) or (716) 473 - 2361 (home)
∂11-Feb-88 1948 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: Yale T (compiling)
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 11 Feb 88 19:48:27 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 11 Feb 88 22:45:08 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA11848; Thu, 11 Feb 88 19:37:11 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 9 Feb 88 16:14:19 GMT
From: broman@cod.nosc.mil (Vincent P. Broman)
Organization: Naval Ocean Systems Center, San Diego
Subject: Re: Yale T (compiling)
Message-Id: <976@cod.NOSC.MIL>
References: <13258@cornell.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Yale T v3.0 may be able to compile itself, but the method used is
an _undocumented_ feature of the system, seemingly not intended
for the unwashed masses. There seem to be various compile and load
scripts floating around in the source directories, but I couldn't
intuit the grand scheme intended.
Vincent Broman, code 632, Naval Ocean Systems Center, San Diego, CA 92152, USA
Phone: +1 619 553 1641 Internet: broman@nosc.mil Uucp: sdcsvax!nosc!broman
∂12-Feb-88 0357 @MC.LCS.MIT.EDU:HAL@AI.AI.MIT.EDU KMP's reply to standardizaiotn meeting note
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 12 Feb 88 03:57:39 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 12 Feb 88 06:57:18 EST
Date: Fri, 12 Feb 88 06:57:36 EST
From: Hal Abelson <HAL@AI.AI.MIT.EDU>
Subject: KMP's reply to standardizaiotn meeting note
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <325467.880212.HAL@AI.AI.MIT.EDU>
From KMP@STONY-BROOK.SCRC.Symbolics.COM Thu Feb 11 15:13:32 1988
Date: Thu, 11 Feb 88 11:41 EST
From: Kent M Pitman <KMP@STONY-BROOK.SCRC.Symbolics.COM>
Subject: call for standardization meeting
To: HAL@AI.AI.MIT.EDU
Cc: KMP@STONY-BROOK.SCRC.Symbolics.COM
In-Reply-To: <8802111557.AA12523@zohar>
I'm am terribly worried about the whole thing.
I'm interested in attending to lobby against a standard.
The week of Mar 14-18 several of us (me and Bartley anyway -- maybe
Will and a few others) will be at X3J13 in Palo Alto. I'd like to have
both weekends adjacent to that available for spending time there.
I have no times prior to that free. Mar 26 is my very strong preference.
∂12-Feb-88 1508 @MC.LCS.MIT.EDU,@RELAY.CS.NET:adams%tekchips.CRL@tektronix.tek.com Re: call for standardization meeting
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 12 Feb 88 15:08:09 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 12 Feb 88 18:07:51 EST
Received: from relay2.cs.net by RELAY.CS.NET id ad29909; 12 Feb 88 15:51 EST
Received: from tektronix.tek.com by RELAY.CS.NET id ao06872; 12 Feb 88 15:46 EST
Received: by tektronix.TEK.COM (5.51/6.24)
id AA10898; Fri, 12 Feb 88 09:00:37 PST
Received: by tekchips.CRL.TEK.COM (5.51/6.24)
id AA10250; Fri, 12 Feb 88 09:01:06 PST
Date: Fri, 12 Feb 88 09:01:06 PST
From: Norman Adams <adams%tekchips.CRL%tektronix.tek.com@RELAY.CS.NET>
Message-Id: <8802121701.AA10250@tekchips.CRL.TEK.COM>
Subject: Re: call for standardization meeting
To: rrrs-authors@mc.lcs.mit.edu
In-Reply-To: Hal Abelson <hal@zohar.ai.mit.edu>, Thu, 11 Feb 88 10:57:35 est
I can attend the 19th or 26th. -Norman
-------
∂15-Feb-88 0756 @MC.LCS.MIT.EDU:hal@MURREN.AI.MIT.EDU [hudak-paul@YALE.ARPA: Re: call for standardization meeting]
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 15 Feb 88 07:56:09 PST
Received: from kleph (TCP 2206400254) by MC.LCS.MIT.EDU 15 Feb 88 10:55:02 EST
Received: from murren (murren.ai.mit.edu) by KLEPH.AI.MIT.EDU; Mon, 15 Feb 88 10:56:15 est
Received: by MURREN.AI.MIT.EDU; Mon, 15 Feb 88 11:00:04 est
Date: Mon, 15 Feb 88 11:00:04 est
From: hal@MURREN.AI.MIT.EDU (Hal Abelson)
Message-Id: <8802151600.AA10418@murren>
To: rrrs-authors%mc@KLEPH.AI.MIT.EDU
Subject: [hudak-paul@YALE.ARPA: Re: call for standardization meeting]
Reply-To: hal@ai.ai.mit.edu
Date: Mon, 15 Feb 88 10:43:06 EST
From: Paul Hudak <hudak-paul@YALE.ARPA>
Subject: Re: call for standardization meeting
To: hal@ZOHAR.AI.MIT.EDU (Hal Abelson)
In-Reply-To: hal@ZOHAR.AI.MIT.EDU (Hal Abelson), Thu, 11 Feb 88 10:57:35 est
I would like to hold a one-day meeting of RRRS authors to address the
standardization question.
Hal, as you know I am not a super active member of the RRRS committee,
but am very interested in Scheme and its promotion. I won't be able
to attend the standardization meeting, but if you're interested, here's
my opinion about the whole matter:
I am morderately in favor of standarization for two simple reasons:
1) Historically the standardization of a language seems to have helped
the promotion of the language.
2) In the face of CL standarization, Scheme's NOT being standarized
may give the impression that the Lisp community is more confident
in CL and is thus endorsing it's use in production-quality software
systems, etc.
With regard to the latter comment, I must say that I've been somewhat
surprised by the amount of discussion about Scheme being as different
from CL as Pascal is from Algol, etc. etc. I certainly agree with
that argument, and it's a compelling argument against having the
standarization efforts combined, but in the context of how the "real
world" views things, it may be irrelevant. The fact is, "Lisps" in
general offer many common advantages, and when a programmer/manager/
whomever decides that Lisp is best for a particular application, they
will tend to look for the best-documented/supported/tried/standardized
etc. language available. (This same kind of reasoning will be used by
the software/hardware manufacturers when trying to decide what
languages to support.) Ok, so they'll also ask which is best from a
programming language standpoint, but my point is that there are many
other, often overriding, issues that they will consider as well.
The awkward conclusion I find myself making is that I think Scheme
needs to be standarized primarily because CL is. Otherwise, I think
(as everyone else apparently does) that it's too early. (The awkward
thing about this conclusion is that I also think it's too early to
standarize CL, so implicit in my conlusion is that one wrong justifies
another...)
-Paul
P.S. I have no opinion about which of the various means for standarization
is best (or worst).
P.P.S. If you think it's appropriate I don't mind if you cc this to RRRS.
-------
∂15-Feb-88 1012 NET-ORIGIN@MC.LCS.MIT.EDU Re: call for standardization
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 15 Feb 88 10:12:50 PST
Received: from EDDIE.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 15 FEB 88 13:12:59 EST
Received: by EDDIE.MIT.EDU with UUCP with smail2.5 with sendmail-5.45/4.7 id <AA09879@EDDIE.MIT.EDU>; Mon, 15 Feb 88 13:10:45 EST
Received: from purdue.UUCP by gatech.edu with UUCP (5.58/7.3.GT)
id AA12415; Mon, 15 Feb 88 13:05:17 EST
Received: by arthur.cs.purdue.edu; (5.54/3.16)
id AA01125; Mon, 15 Feb 88 12:55:16 EST
Message-Id: <8802151755.AA01125@arthur.cs.purdue.edu>
Date: Mon, 15 Feb 88 11:16:10 EST
From: R. Kent Dybvig <gatech!purdue!iuvax!dyb@EDDIE.MIT.EDU>
To: rrrs-authors@mc.lcs.mit.edu.UUCP
Subject: Re: call for standardization
[Please excuse me if this note is duplicated---our arpanet link went
down Friday and hasn't come back yet, so I'm trying to send via uucp]
---------
* you would prefer to have the meeting somewhere else, with suggested
place and dates.
We would like to offer to hold the meeting here at Indiana University
on March 26. I will handle local arrangements.
Kent
∂15-Feb-88 1725 @MC.LCS.MIT.EDU,@RELAY.CS.NET:bartley@home.csc.ti.com (rationalize x y)
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 15 Feb 88 17:25:16 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 15 Feb 88 20:06:20 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa07509; 15 Feb 88 19:43 EST
Received: from csc.ti.com by RELAY.CS.NET id ak25765; 15 Feb 88 19:36 EST
Received: from home by tilde id AA10951; Mon, 15 Feb 88 17:43:05 CST
Received: by home id AA21446; Mon, 15 Feb 88 17:41:29 CST
Date: Mon, 15 Feb 88 17:41:29 CST
From: David Bartley <bartley%home.csc.ti.com@RELAY.CS.NET>
Message-Id: <8802152341.AA21446@home>
To: rrrs-authors@mc.lcs.mit.edu
Subject: (rationalize x y)
Ed Ferguson and I want to clarify some issues concerning the Scheme
procedure "rationalize", which is documented in R3RS as follows:
[...]
(rationalize x y) procedure
(rationalize x) procedure
These procedures create integers and rationals. Their
results are exact if and only if their arguments are exact.
[...] With two arguments, RATIONALIZE produces the rational
number with smallest denominator differing from X by no more
than Y. With one argument, RATIONALIZE produces the best
rational approximation to X, preserving all of the precision in
its representation.
(1) When Y is supplied and is non-zero, it would seem more proper to
return an inexact result (unless perhaps that result is `=' to X and X
is exact).
(2) Although the notation indicates that the argument X is real, would
it be frivolous to say that (RATIONALIZE Z Y), where Z is a non-real
complex number, is defined by
(make-rectangular (rationalize (real-part z y))
(rationalize (imag-part z y))) ?
Two objections come to mind: (2a) this discriminates against an
implementation that uses polar representation, and (2b) one might want
to interpret Y as a error term for the magnitude rather than for the
real and imaginary parts separately.
(3) Do we really want an absolute error test or is a relative error
test sometimes more appropriate?
(4) The wording ``rational number with smallest denominator differing
from X by no more than Y'' seems to rule out using Euclid's algorithm
and continued fractions. That is, suppose W is the first number whose
difference from X is less than Y in the continued fraction series of
successively better approximations to X. Euclid doesn't guarantee
that there is no number within Y of X with smaller denominator than
W's. Did the author of these words have a different algorithm in mind?
As an example, consider (RATIONALIZE 11/16 1/4). The successive
convergents to 11/16 using continued fractions are 0, 1, 2/3, and
11/16. The first number in that series which is within 1/4 of 11/16
is 2/3, but the value 1/2 is also within 1/4 of 11/16 and has a
smaller denominator.
Regards,
David Bartley
∂15-Feb-88 2019 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: Scheme for the Amiga, size constraints
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 15 Feb 88 20:18:53 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 15 Feb 88 23:15:41 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA13502; Mon, 15 Feb 88 19:46:00 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 16 Feb 88 03:33:21 GMT
From: agate!eris!mwm@ucbvax.Berkeley.EDU (Mike (My watch has windows) Meyer)
Organization: Missionaria Phonibalonica
Subject: Re: Scheme for the Amiga, size constraints
Message-Id: <6996@agate.BERKELEY.EDU>
References: <518@acf3.NYU.EDU>, <2194@bloom-beacon.MIT.EDU>, <gW2-2wy00jWTMDQ0Gq@andrew.cmu.edu>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
In article <gW2-2wy00jWTMDQ0Gq@andrew.cmu.edu> ah4h+@andrew.cmu.edu (Andrew Hudson) writes:
<
<>I have implemented scheme 6.1 on my Amiga. I'll tell you, it's not an
<>easy thing to do. First of all,there is no way CScheme will work on a
<>machine with only 0.5M of RAM.
<
<I can hardly believe this! MacScheme ran well on a Mac with only 512k. What
<does a Mac have that an Amiga doesn't?
The Mac has a Scheme written for the Mac, that's what! :-)
CScheme 6.1 is a large C program, with portability and readability
being more important than size (and speed?). As a result, you get
something very large that runs on a fair number of machine running
Unix.
MacScheme (and the TI PCScheme) are reimplementations from scratch for
the target machine. Knowing exactly what your target is, and not
needing to write in an HLL[+] helps a lot for size.
I finally decided that the only way I was going to get a serious LISP
of reasonable size on the Amiga was to write it myself (in that
mythical entity known as "spare time"). The result should be quite
happy on a 1Meg Amiga (the "defacto standard" these days), and
shouldn't be unusable on a 512K Amiga. Putting it on a 68020 is
another problem. Putting it on an 80*6 will be _very_ hard.
[+] If someone can tell me how to write a tail-recursive eval/apply in
a non-tr HLL that's more readable than the assembler code that does
the same, I'd appreciate it!
<mike
--
The handbrake penetrates your thigh. Mike Meyer
A tear of petrol is in your eye. mwm@berkeley.edu
Quick, let's make love before we die. ucbvax!mwm
On warm leatherette. mwm@ucbjade.BITNET
∂15-Feb-88 2156 @MC.LCS.MIT.EDU,@RELAY.CS.NET:willc%tekchips.CRL@tektronix.tek.com Gabriel benchmarks in Scheme
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 15 Feb 88 21:56:20 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 15 Feb 88 23:49:03 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa09662; 15 Feb 88 23:47 EST
Received: from tektronix.tek.com by RELAY.CS.NET id af26831; 15 Feb 88 23:43 EST
Received: by tektronix.TEK.COM (5.51/6.24)
id AA08700; Mon, 15 Feb 88 16:37:05 PST
Received: by tekchips.CRL.TEK.COM (5.51/6.24)
id AA10267; Mon, 15 Feb 88 16:37:33 PST
Message-Id: <8802160037.AA10267@tekchips.CRL.TEK.COM>
To: scheme@mc.lcs.mit.edu
Cc: scheme-librarian@mc.lcs.mit.edu, ayu%aquinas.csl.uiuc.edu@RELAY.CS.NET,
edh%HNYKUN52.BITNET@cunyvm.cuny.edu, net%tub.bitnet@RELAY.CS.NET,
dumas@SUMEX-AIM.STANFORD.EDU, mcvax!dutesta!brouw@uunet.uu.net,
nttca!Shasta!ll-xn!lll-crg!lll-tis!dgis!jkrueger@SHASTA.STANFORD.EDU
Subject: Gabriel benchmarks in Scheme
Date: 15 Feb 88 16:37:29 PST (Mon)
From: willc%tekchips.CRL%tektronix.tek.com@RELAY.CS.NET
Someone asked for volunteers to collect/collate/report results for the
Scheme versions of the Gabriel benchmarks. I volunteer, but it would be
better if we had a volunteer who wasn't associated with a Scheme vendor.
If you're thinking of volunteering, please re-read the comments in Gabriel's
book so you'll know what you're getting into.
I'm sending copies of the Gabriel benchmarks in Scheme to those of you
listed in the "cc:" line. (If you don't receive a copy of this message,
then maybe I need a better address.) They will be arriving in four parts,
each about 20K bytes.
Because the benchmarks are so large, I would in the future prefer to send a
Macintosh- or IBM PC-compatible floppy disk to those of you who can use them.
Please send requests for the source code to:
Semantic Microsystems
4470 SW Hall Blvd Suite 340
Beaverton OR 97005
(503) 643-4539
I'd appreciate a donation of $5 or so to cover the cost of the disk and its
shipping. I suspect that's much less than it costs the network to transmit
these things.
William Clinger
∂16-Feb-88 0252 @MC.LCS.MIT.EDU:iuvax!dyb@ee.ecn.purdue.edu Re: call for standardization meeting
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 16 Feb 88 02:52:00 PST
Received: from ee.ecn.purdue.edu (TCP 20013500417) by MC.LCS.MIT.EDU 16 Feb 88 05:47:15 EST
Received: by ee.ecn.purdue.edu (5.54/1.12jrs)
id AA22845; Tue, 16 Feb 88 05:46:13 EST
Message-Id: <8802161046.AA22845@ee.ecn.purdue.edu>
Date: Sat, 13 Feb 88 10:57:19 EST
From: R. Kent Dybvig <iuvax!dyb@ee.ecn.purdue.edu>
To: hal@mc.lcs.mit.edu
Subject: Re: call for standardization meeting
Cc: rrrs-authors@mc.lcs.mit.edu
* you would prefer to have the meeting somewhere else, with suggested
place and dates.
We would like to offer to hold the meeting here at Indiana University
on March 26. I will handle local arrangements.
Kent
∂16-Feb-88 1242 @MC.LCS.MIT.EDU:ALAN@AI.AI.MIT.EDU (rationalize x y)
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 16 Feb 88 12:42:17 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 16 Feb 88 14:09:23 EST
Date: Tue, 16 Feb 88 14:08:28 EST
From: Alan Bawden <ALAN@AI.AI.MIT.EDU>
Subject: (rationalize x y)
To: bartley%home.csc.ti.com@RELAY.CS.NET
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Mon 15 Feb 88 17:41:29 CST from David Bartley <bartley%home.csc.ti.com at RELAY.CS.NET>
Message-ID: <327379.880216.ALAN@AI.AI.MIT.EDU>
Definition: A rational r1 is "simpler" than a rational r2, written
r1 <* r2, if r1 = p1/q1 and r2 = p2/q2 (both in lowest terms) and
|p1| <= |p2| and |q1| <= |q2|.
So 1/2 <* 1/3 and 1/2 <* 3/2 but 1/3 and 3/2 are incomparable. This
definition works for Gaussian rationals as well.
Theorem: The relation <* is a partial order on rationals. Also, zero is
simpler than any other rational (0 <* r for all r).
Theorem: For any two incomparable (under <*) rationals r < s, there exists
a rational t such that r < t < s, and t <* r and t <* s.
Theorem: Any interval of the real numbers (open, half-open, or closed)
contains a simplest rational number.
I think that the proofs of these theorems are all straightforward enough
that I don't need to give them here.
Date: Mon, 15 Feb 88 17:41:29 CST
From: David Bartley <bartley%home.csc.ti.com at RELAY.CS.NET>
Ed Ferguson and I want to clarify some issues concerning the Scheme
procedure "rationalize", which is documented in R3RS as follows:
[...]
(rationalize x y) procedure
(rationalize x) procedure
These procedures create integers and rationals. Their
results are exact if and only if their arguments are exact.
[...] With two arguments, RATIONALIZE produces the rational
number with smallest denominator differing from X by no more
than Y. With one argument, RATIONALIZE produces the best
rational approximation to X, preserving all of the precision in
its representation.
(1) When Y is supplied and is non-zero, it would seem more proper to
return an inexact result (unless perhaps that result is `=' to X and X
is exact).
The phrase "the rational number with smallest denominator" unfortunately
leaves RATIONALIZE slightly underspecified. (RATIONALIZE 3/2 1) is free to
be either 1 or 2, since they both have a denominator of 1. I presume that
what R3RS is trying to say is that (RATIONALIZE X Y) returns the simplest
rational number in the interval [X-Y, X+Y]. (When there is a unique
rational number with smallest denominator it is also the simplest.)
Since the theorem above guarantees the uniqueness and existence of a
simplest rational, it would seem to me that if X and Y are exact, then the
answer should be exact as well.
It is less clear to me what R3RS is trying to say that the one argument
case of RATIONALIZE is supposed to do. One possible interpretation seems
to be that (RATIONALIZE X) is the same as (RATIONALIZE X #E0), since then
in the case where X is an inexact floating point number, it might well return
the same (inexact) rational that the Common Lisp RATIONALIZE function
returns. (And if X was an exact floating point number, it might return the
same (exact) rational that the Common Lisp RATIONAL function would return.)
The description doesn't say what should happen if Y is negative...
(2) Although the notation indicates that the argument X is real, would
it be frivolous to say that (RATIONALIZE Z Y), where Z is a non-real
complex number, is defined by
(make-rectangular (rationalize (real-part z y))
(rationalize (imag-part z y))) ?
Two objections come to mind: (2a) this discriminates against an
implementation that uses polar representation, and (2b) one might want
to interpret Y as a error term for the magnitude rather than for the
real and imaginary parts separately.
I would object because the definition doesn't work.
(RATIONALIZE 2/5+1/5i 1/12) would return 1/3+1/4i. But in lowest terms
2/5+1/5i is 1/(2-i) and 1/3+1/4i is (4+3i)/12, so the input was a simpler
rational than the output!
(3) Do we really want an absolute error test or is a relative error
test sometimes more appropriate?
You can always construct the relative case given the absolute case. It's
just a way of letting you specify an interval.
(4) The wording ``rational number with smallest denominator differing
from X by no more than Y'' seems to rule out using Euclid's algorithm
and continued fractions. That is, suppose W is the first number whose
difference from X is less than Y in the continued fraction series of
successively better approximations to X. Euclid doesn't guarantee
that there is no number within Y of X with smaller denominator than
W's. Did the author of these words have a different algorithm in mind?
As an example, consider (RATIONALIZE 11/16 1/4). The successive
convergents to 11/16 using continued fractions are 0, 1, 2/3, and
11/16. The first number in that series which is within 1/4 of 11/16
is 2/3, but the value 1/2 is also within 1/4 of 11/16 and has a
smaller denominator.
What you do is compute the continued fractions of the two endpoints of the
interval in question. In this case 7/16 = 0+1/(2+1/(3+1/2)) and 15/16 =
0+1/(1+1/15). Since the continued fraction of the answer has the same
initial terms as the continued fractions of the endpoints, you stop the
continued fraction expansion as soon as you see that the next term will
differ. Then the final term is the smallest integer in the interval
between the two remainders. In this case 7/16 = 0+1/(2+2/7) and 15/16 =
0+1/(1+1/15), so since the smallest integer between 2+2/7 and 1+1/15 is 2,
the answer is 0+1/2 = 1/2.
Since you only need to compute the continued fractions until they differ,
and since you can accumulate the answer as you go, this computation isn't
all that expensive.
∂16-Feb-88 1440 @MC.LCS.MIT.EDU:MKATZ@A.ISI.EDU DO in Scheme
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 16 Feb 88 14:40:01 PST
Received: from A.ISI.EDU (TCP 3200600147) by MC.LCS.MIT.EDU 16 Feb 88 16:18:38 EST
Date: Tue 16 Feb 88 15:23:51-EST
From: Morris Katz <MKATZ@A.ISI.EDU>
Subject: DO in Scheme
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <12375254602.54.MKATZ@A.ISI.EDU>
A couple of times recently I have seen suggestions that DO be removed from
Scheme. I must concur in that I find DO to be one of the cruftiest and most
opaque constructs in the language (and would hate to see it become part of any
standard). However, it seems to me that before we can remove such constructs,
we need to agree on a macro standard so that they can be reintroduced as macros
through the Yellow Pages. There are undoubtedly many users within our
community who make extensive use of DO, and it seems unkind and unnecessary to
leave them high and dry. On the topic of macros, didn't we appoint a commity
at the last Scheme meeting composed, I believe, of Chris Hanson, Jonathan Rees,
et. al. to look into the macro question and report back to us. What ever
happened to this effort. It actually seemed to me that they had a starting
proposal which was reasonably close to being acceptable to nearly all parties
concerned.
At the risk of pushing my luck, I would suggest that with the death of DO we
reintroduce named-let to at least optional status. Having used all of DO,
named-let, and the equivalent letrec forms over several years, I have found
named-let to be by far the simplest to read and therefore the most elegant. It
is convenient to be able to specify the initial bindings of loop variables at
loop entry (an advantage of named-let over letrec) without being forced to go
to the more complex and convoluted form of DO.
Morry Katz
-------
∂16-Feb-88 1721 @MC.LCS.MIT.EDU:hal@MURREN.AI.MIT.EDU Standardization meeting on March 26
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 16 Feb 88 17:21:05 PST
Received: from kleph (TCP 2206400254) by MC.LCS.MIT.EDU 16 Feb 88 20:14:29 EST
Received: from murren (murren.ai.mit.edu) by KLEPH.AI.MIT.EDU; Tue, 16 Feb 88 17:31:44 est
Received: by MURREN.AI.MIT.EDU; Tue, 16 Feb 88 17:35:36 est
Date: Tue, 16 Feb 88 17:35:36 est
From: hal@MURREN.AI.MIT.EDU (Hal Abelson)
Message-Id: <8802162235.AA11693@murren>
To: rrrs-authors%mc@KLEPH.AI.MIT.EDU
Subject: Standardization meeting on March 26
Reply-To: hal@ai.ai.mit.edu
The responses over the past week indicate a clear preference for
meeting on March 26th.
This will be a 1-day meeting to discuss standardization.
Both MIT and Indiana have volunteered to host the meeting.
Please respond within a week (to RRRS-AUTHORS, not only to me) saying
A. Will you come if the meeting is at Indiana?
B. Will you come if the meeting is at MIT?
--- if you answer yes to either of the above then ---
C. Given a choice, would you prefer to meet at MIT or at Indiana?
∂16-Feb-88 1756 @MC.LCS.MIT.EDU:HAL@AI.AI.MIT.EDU standardization meeting March 26
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 16 Feb 88 17:56:11 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 16 Feb 88 20:21:58 EST
Date: Tue, 16 Feb 88 19:14:08 EST
From: Hal Abelson <HAL@AI.AI.MIT.EDU>
Subject: standardization meeting March 26
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <327556.880216.HAL@AI.AI.MIT.EDU>
The responses over the past week indicate a clear preference for
meeting on March 26th.
This will be a 1-day meeting to discuss standardization.
Both MIT and Indiana have volunteered to host the meeting.
Please respond within a week (to RRRS-AUTHORS, not only to me) saying
A. Will you come if the meeting is at Indiana?
B. Will you come if the meeting is at MIT?
--- if you answer yes to either of the above then ---
C. Given a choice, would you prefer to meet at MIT or at Indiana?
-- Hal
∂16-Feb-88 1839 @MC.LCS.MIT.EDU:Pavel.pa@Xerox.COM Re: DO in Scheme
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 16 Feb 88 18:39:48 PST
Received: from Xerox.COM (TCP 1500006350) by MC.LCS.MIT.EDU 16 Feb 88 21:27:05 EST
Received: from Cabernet.ms by ArpaGateway.ms ; 16 FEB 88 15:00:46 PST
Date: Tue, 16 Feb 88 15:00:27 PST
From: Pavel.pa@Xerox.COM
Subject: Re: DO in Scheme
In-reply-to: <12375254602.54.MKATZ@A.ISI.EDU>
To: Morris Katz <MKATZ@A.ISI.EDU>
Cc: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <880216-150046-4099@Xerox>
Morris Katz says:
``At the risk of pushing my luck, I would suggest that with the death of DO we
reintroduce named-let to at least optional status.''
Am I confused? It looks to me that the named version of LET is still in the
language. In fact, its description directly follows that of DO in R3RS.
Pavel
∂16-Feb-88 1910 @MC.LCS.MIT.EDU:gjs@ZOHAR.AI.MIT.EDU Standardization meeting on March 26
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 16 Feb 88 19:10:32 PST
Received: from kleph (TCP 2206400254) by MC.LCS.MIT.EDU 16 Feb 88 22:00:10 EST
Received: from zohar (zohar.ai.mit.edu) by KLEPH.AI.MIT.EDU; Tue, 16 Feb 88 22:01:21 est
Received: by ZOHAR.AI.MIT.EDU; Tue, 16 Feb 88 22:02:32 est
Date: Tue, 16 Feb 88 22:02:32 est
From: gjs@ZOHAR.AI.MIT.EDU (Gerald Jay Sussman)
Message-Id: <8802170302.AA03068@zohar>
To: hal@ai.ai.mit.edu
Cc: rrrs-authors%mc@KLEPH.AI.MIT.EDU
In-Reply-To: Hal Abelson's message of Tue, 16 Feb 88 17:35:36 est <8802162235.AA11693@murren>
Subject: Standardization meeting on March 26
March 26th is fine with me.
A. Reluctantly
B. Enthusiastically and cheerfully
C. I much prefer MIT because
1. To be in Indiania I have to find someone to cover my class on the 25th.
2. I will have spent altogether too much time on airplanes this year.
The cost to you of me coming to Indiana is that
I will be grumpy and unpleasant.
∂16-Feb-88 1923 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU DO in Scheme
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 16 Feb 88 19:23:42 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 16 Feb 88 22:16:32 EST
Date: Tue, 16 Feb 88 20:05:46 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: DO in Scheme
To: MKATZ@A.ISI.EDU
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Tue 16 Feb 88 15:23:51-EST from Morris Katz <MKATZ at A.ISI.EDU>
Message-ID: <327582.880216.JAR@AI.AI.MIT.EDU>
I like DO. I don't think I need to repeat Steele's defense of it, which
was posted one of the previous times this came up.
Named LET is there in the report, under a separate heading from LET
(somewhere near DO, I think -- probably why you missed it, sorry).
The macro proposal still needs some work. For example, it lacks a user
interface.
∂17-Feb-88 0606 @MC.LCS.MIT.EDU,@ZERMATT.LCS.MIT.EDU:rhh@VX.LCS.MIT.EDU Standardization meeting on March 26
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 17 Feb 88 06:05:37 PST
Received: from ZERMATT.LCS.MIT.EDU (CHAOS 17316) by MC.LCS.MIT.EDU 17 Feb 88 09:04:57 EST
Received: from ASPEN.LCS.MIT.EDU by ZERMATT.LCS.MIT.EDU via CHAOS with CHAOS-MAIL id 123312; Wed 17-Feb-88 09:03:48 EST
Date: Wed, 17 Feb 88 09:03 EST
From: Robert Halstead <rhh@VX.LCS.MIT.EDU>
Subject: Standardization meeting on March 26
To: hal@AI.AI.MIT.EDU
cc: rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: <8802162235.AA11693@murren>
Message-ID: <880217090332.1.RHH@ASPEN.LCS.MIT.EDU>
This will be a 1-day meeting to discuss standardization.
I don't feel I have much to contribute to the process, nor do I have any
very strong feelings pro or con on the standardization issue; on the
other hand, it would be rewarding to have the opportunity to get
together with the RRRS authors again; on the other hand, there are
other things to be done and there are only so many days in a week.
Therefore,
A. Will you come if the meeting is at Indiana?
No, I don't think I can swing that.
B. Will you come if the meeting is at MIT?
This is a possibility, if I'm not too snowed under with other things.
C. Given a choice, would you prefer to meet at MIT or at Indiana?
I think the players more central to this issue should make this decision
based on their constraints, so I abstain from this decision. -Bert Halstead
∂17-Feb-88 0904 @MC.LCS.MIT.EDU:MKATZ@A.ISI.EDU Named-let
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 17 Feb 88 09:04:11 PST
Received: from A.ISI.EDU (TCP 3200600147) by MC.LCS.MIT.EDU 17 Feb 88 12:03:35 EST
Date: Wed 17 Feb 88 12:00:40-EST
From: Morris Katz <MKATZ@A.ISI.EDU>
Subject: Named-let
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <12375479760.30.MKATZ@A.ISI.EDU>
I apologize for my oversight on named-let. Apparently, just references
to named-lambda were removed and named-let was moved from the let section of
RRRS to a location where I failed to find it.
Morry Katz
-------
∂17-Feb-88 1031 @MC.LCS.MIT.EDU,@RELAY.CS.NET:brooks@mips.csc.ti.com standardization meeting March 26
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 17 Feb 88 10:31:44 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 17 Feb 88 13:31:26 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa13759; 17 Feb 88 12:47 EST
Received: from csc.ti.com by RELAY.CS.NET id ap08439; 17 Feb 88 12:35 EST
Received: from mips by tilde id AA22231; Wed, 17 Feb 88 10:33:23 CST
Received: by mips id AA15838; Wed, 17 Feb 88 10:33:19 CST
Date: Wed, 17 Feb 88 10:33:19 CST
From: Gary Brooks <brooks%mips.csc.ti.com@RELAY.CS.NET>
Message-Id: <8802171633.AA15838@mips>
To: rrrs-authors@mc.lcs.mit.edu
Cc: HAL@mc.lcs.mit.edu
Subject: standardization meeting March 26
Both Indiana and MIT are fine with me. As we decided at the last RRRS
meeting, I think we should meet in Bloomington.
-- brooks
∂17-Feb-88 1044 @MC.LCS.MIT.EDU,@RELAY.CS.NET:bartley@home.csc.ti.com standardization meeting March 26
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 17 Feb 88 10:44:16 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 17 Feb 88 13:35:22 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa13779; 17 Feb 88 12:48 EST
Received: from csc.ti.com by RELAY.CS.NET id aq08439; 17 Feb 88 12:35 EST
Received: from home by tilde id AA21514; Wed, 17 Feb 88 10:10:36 CST
Received: by home id AA23991; Wed, 17 Feb 88 10:00:07 CST
Date: Wed, 17 Feb 88 10:00:07 CST
From: David Bartley <bartley%home.csc.ti.com@RELAY.CS.NET>
Message-Id: <8802171600.AA23991@home>
To: HAL@mc.lcs.mit.edu
Cc: rrrs-authors@mc.lcs.mit.edu
In-Reply-To: Hal Abelson's message of Tue, 16 Feb 88 19:14:08 EST <327556.880216.HAL@AI.AI.MIT.EDU>
Subject: standardization meeting March 26
A. Will you come if the meeting is at Indiana?
Yes.
B. Will you come if the meeting is at MIT?
Yes.
C. Given a choice, would you prefer to meet at MIT or at Indiana?
No preference.
-- Hal
--db--
∂17-Feb-88 1103 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU standardization meeting March 26
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 17 Feb 88 11:03:24 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 17 Feb 88 13:51:51 EST
Date: Wed, 17 Feb 88 13:51:33 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: standardization meeting March 26
To: HAL@AI.AI.MIT.EDU
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Tue 16 Feb 88 19:14:08 EST from Hal Abelson <HAL at AI.AI.MIT.EDU>
Message-ID: <327974.880217.JAR@AI.AI.MIT.EDU>
Date: Tue, 16 Feb 88 19:14:08 EST
From: Hal Abelson <HAL at AI.AI.MIT.EDU>
A. Will you come if the meeting is at Indiana?
Probably not.
B. Will you come if the meeting is at MIT?
Probably.
Not that I have anything against Indiana (I'm a midwesterner myself),
but the standardization issue isn't important enough to me one way or
another for me to go much out of my way for it; I'm confident that
someone else out there will express my views if I don't.
∂17-Feb-88 1806 @MC.LCS.MIT.EDU:dyb@iuvax.cs.indiana.edu Re: standardization meeting March 26
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 17 Feb 88 18:06:02 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 17 Feb 88 21:06:18 EST
Received: by iuvax.cs.indiana.edu; id AA15956; Wed, 17 Feb 88 21:05:48 EST
Date: Wed, 17 Feb 88 21:05:48 EST
From: R. Kent Dybvig <dyb@iuvax.cs.indiana.edu>
Message-Id: <8802180205.AA15956@iuvax.cs.indiana.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: Re: standardization meeting March 26
A. Will you come if the meeting is at Indiana?
Yes.
B. Will you come if the meeting is at MIT?
I'm not sure yet.
--- if you answer yes to either of the above then ---
C. Given a choice, would you prefer to meet at MIT or at Indiana?
Indiana.
Kent
∂18-Feb-88 0025 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Scheme for a 3B15/3B2
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 18 Feb 88 00:25:15 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 18 Feb 88 03:22:25 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA12742; Thu, 18 Feb 88 00:09:50 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 17 Feb 88 18:22:08 GMT
From: vu-vlsi!lehi3b15!flash@psuvax1.cs.psu.edu (Stephen Corbesero)
Organization: CSEE Dept., Lehigh University
Subject: Scheme for a 3B15/3B2
Message-Id: <308@lehi3b15.CSEE.Lehigh.EDU>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I recently tried compiling the Scheme that comes with GnuEmacs on a
3B15, but ran into some run-time problems. If anyone has already
ported scheme to a member of the 3Bx (x>1) family, could you please
send me any pertinent info. please use E-mail as I am not a regular
reader of this list.
∂18-Feb-88 0057 @MC.LCS.MIT.EDU,@RELAY.CS.NET:jmiller%mephi@BRANDEIS.CSNET Standardization meeting on March 26
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 18 Feb 88 00:56:55 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 18 Feb 88 03:46:43 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa05707; 18 Feb 88 3:29 EST
Received: from brandeis by csnet-relay.csnet id ab13761; 18 Feb 88 3:21 EST
Received: by brandeis.ARPA (5.51/4.7)
id AA23825; Wed, 17 Feb 88 20:37:47 EST
Received: by mephi.earth1.com (3.2/SMI-3.2)
id AA01306; Wed, 17 Feb 88 20:36:25 PST
Date: Wed, 17 Feb 88 20:36:25 PST
From: James Miller <jmiller%mephi%brandeis.csnet@RELAY.CS.NET>
Message-Id: <8802180436.AA01306@mephi.earth1.com>
To: rrrs-authors%mc.lcs.mit.edu@RELAY.CS.NET
In-Reply-To: Hal Abelson's message of Tue, 16 Feb 88 17:35:36 est <8802162235.AA11693@murren>
Subject: Standardization meeting on March 26
I can attend only if the meeting is at MIT. I would attend there.
--Jim
∂18-Feb-88 0119 @MC.LCS.MIT.EDU,@RELAY.CS.NET:adams%tekchips.CRL@tektronix.tek.com standardization meeting March 26
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 18 Feb 88 01:19:43 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 18 Feb 88 04:20:11 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa05903; 18 Feb 88 3:51 EST
Received: from tektronix.tek.com by RELAY.CS.NET id ag13818; 18 Feb 88 3:40 EST
Received: by tektronix.TEK.COM (5.51/6.24)
id AA08019; Wed, 17 Feb 88 14:33:48 PST
Received: by tekchips.CRL.TEK.COM (5.51/6.24)
id AA14162; Wed, 17 Feb 88 14:34:16 PST
Date: Wed, 17 Feb 88 14:34:16 PST
From: Norman Adams <adams%tekchips.CRL%tektronix.tek.com@RELAY.CS.NET>
Message-Id: <8802172234.AA14162@tekchips.CRL.TEK.COM>
Subject: standardization meeting March 26
To: rrrs-authors@mc.lcs.mit.edu
In-Reply-To: David Bartley <bartley%home.csc.ti.com@relay.cs.net>, Wed, 17 Feb 88 10:00:07 CST
A. Will you come if the meeting is at Indiana?
B. Will you come if the meeting is at MIT?
My attendance is equally likely (say about 60%) at either location.
C. Given a choice, would you prefer to meet at MIT or at Indiana?
If choosing a place to spend a weekend away from home next month, I would
prefer Boston to Bloomington.
-Norman
-------
∂18-Feb-88 0742 @MC.LCS.MIT.EDU:dfried@iuvax.cs.indiana.edu standardization meeting March 26
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 18 Feb 88 07:42:28 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 18 Feb 88 10:42:42 EST
Received: by iuvax.cs.indiana.edu; id AA05198; Thu, 18 Feb 88 08:41:45 EST
Date: Thu, 18 Feb 88 08:41:45 EST
From: Dan Friedman <dfried@iuvax.cs.indiana.edu>
Message-Id: <8802181341.AA05198@iuvax.cs.indiana.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: standardization meeting March 26
A. Will you come if the meeting is at Indiana?
Yes.
B. Will you come if the meeting is at MIT?
Yes.
C. Given a choice, would you prefer to meet at MIT or at Indiana?
Bloomington.
Dan
∂18-Feb-88 0756 @MC.LCS.MIT.EDU:hieb@iuvax.cs.indiana.edu standardization meeting
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 18 Feb 88 07:54:09 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 18 Feb 88 10:52:29 EST
Received: by iuvax.cs.indiana.edu; id AA14812; Thu, 18 Feb 88 10:51:54 EST
Date: Thu, 18 Feb 88 10:51:54 EST
From: Robert Hieb <hieb@iuvax.cs.indiana.edu>
Message-Id: <8802181551.AA14812@iuvax.cs.indiana.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: standardization meeting
Cc: hieb@iuvax.cs.indiana.edu
In response to Hal's survey:
A: IU: yes
B: MIT: no, unless I receive unexpected funding
C: choice: IU
Bob Hieb
∂18-Feb-88 1055 @MC.LCS.MIT.EDU:chaynes@iuvax.cs.indiana.edu Scheme standardization meeting vote
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 18 Feb 88 10:55:07 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 18 Feb 88 13:52:16 EST
Received: by iuvax.cs.indiana.edu; id AA24978; Thu, 18 Feb 88 13:51:46 EST
Date: Thu, 18 Feb 88 13:51:46 EST
From: Chris Haynes <chaynes@iuvax.cs.indiana.edu>
Message-Id: <8802181851.AA24978@iuvax.cs.indiana.edu>
To: rrrs-authors@mc.lcs.mit.edu
Cc: dyb@iuvax.cs.indiana.edu
Subject: Scheme standardization meeting vote
A. yes
B. yes
C. Indiana
∂18-Feb-88 1207 @MC.LCS.MIT.EDU:Fischer.pa@Xerox.COM Common Lisp functions for Scheme?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 18 Feb 88 12:07:10 PST
Received: from Xerox.COM (TCP 1500006350) by MC.LCS.MIT.EDU 18 Feb 88 14:50:08 EST
Received: from Cabernet.ms by ArpaGateway.ms ; 18 FEB 88 11:00:06 PST
Date: 18 Feb 88 10:59 PST
From: Fischer.pa@Xerox.COM
Subject: Common Lisp functions for Scheme?
To: scheme@mc.lcs.mit.edu
Reply-to: Fischer.pa@Xerox.COM
Message-ID: <880218-110006-7381@Xerox>
I'm porting a Common Lisp application to Scheme (to be run on a Mac). In so
doing I've started to implement some Common Lisp semantics, notably its lambda
argument types. Anyone done this already? (I can't affored Allegro CL).
Also, is there any way to do the equivalent of macroexpand-1 in Scheme?
(ron)
∂19-Feb-88 0416 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA Standardization meeting on March 26 and teleconferencing
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 19 Feb 88 04:15:51 PST
Received: from mitre-bedford.ARPA (TCP 3200600102) by MC.LCS.MIT.EDU 19 Feb 88 07:16:10 EST
From: ramsdell%linus@mitre-bedford.ARPA
Posted-From: The MITRE Corp., Bedford, MA
Received: from darwin.sun.uucp by linus.research (3.2/4.7)
id AA29469; Fri, 19 Feb 88 07:14:47 EST
Posted-Date: Fri, 19 Feb 88 07:13:27 EST
Received: by darwin.sun.uucp (3.2/SMI-3.0DEV3)
id AA00841; Fri, 19 Feb 88 07:13:27 EST
Date: Fri, 19 Feb 88 07:13:27 EST
Message-Id: <8802191213.AA00841@darwin.sun.uucp>
To: rrrs-authors@mc.lcs.mit.edu
In-Reply-To: Hal Abelson's message of Tue, 16 Feb 88 17:35:36 est <8802162235.AA11693@murren>
Subject: Standardization meeting on March 26 and teleconferencing
A. I will try to make it to Indiana, but I just don't know yet.
B. I will come to a meeting at MIT.
C. MIT is preferable.
Maybe this is an issue we could decide using teleconferencing. Would
someone at both MIT and Indiana find out if a teleconference is an
option?
John
∂19-Feb-88 1431 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: Common Lisp functions for Scheme?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 19 Feb 88 14:30:36 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 19 Feb 88 17:25:55 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA28077; Fri, 19 Feb 88 13:52:11 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 19 Feb 88 19:04:39 GMT
From: ah4h+@andrew.cmu.edu (Andrew Hudson)
Organization: Carnegie Mellon University
Subject: Re: Common Lisp functions for Scheme?
Message-Id: <UW78f6y00jWTykM11e@andrew.cmu.edu>
References: <880218-110006-7381@Xerox>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
excerpted message follows:
I'm porting a Common Lisp application to Scheme (to be run on a Mac). In so
doing I've started to implement some Common Lisp semantics, notably its lambda
argument types. Anyone done this already? (I can't affored Allegro CL).
I understand that BBN as part of the Butterfly project implemented some form
of CommonLISP in Scheme. Any takers on this, BBN?
- Andrew Hudson
∂20-Feb-88 0053 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Lisp Innards Wanted!
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 20 Feb 88 00:53:34 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 20 Feb 88 03:50:19 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA09863; Sat, 20 Feb 88 00:18:18 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 20 Feb 88 05:46:00 GMT
From: shebs@cs.utah.edu (Stanley Shebs)
Organization: PASS Research Group
Subject: Lisp Innards Wanted!
Message-Id: <5274@utah-cs.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
As part of my dissertation, I've been collecting info on the internal data
representations of various Lisp systems. Lisp here is broadly defined as
any language ultimately based on Lisp 1.5, and includes Scheme. What I'm
looking for is the grungiest of machine-level details on the layout of cons
cells, type discrimination schemes, memory organization, and storage recovery.
Moon's description of the Symbolics architecture in the January 87 Computer is
an excellent example, especially the pictures. Not every single detail is
needed; just those that required conscious decisions by an implementor. (For
instance, if arrays are tagged with a 0 to avoid masking, that is interesting,
but if it was only because "array" is the first type name in the dictionary,
that is not interesting.) Implementations embedded in other Lisps (Scheme 84,
PCLS) are not of interest, but this does not exclude those written in other
high-level languages (as can be seen from the list below).
At present I have reasonably complete descriptions of the following systems,
mostly derived from published material, manuals, or source code:
7090 Lisp 1.5
M-460 Lisp
Q-32 Lisp
Lisp 1.6
UCI Lisp
MacLISP (PDP-10)
Interlisp (VAX, PDP-10)
LISP-11
Cambridge LISP (IBM)
Zetalisp
Franz Lisp
PSL
NIL
Spice Lisp
S-1 Lisp
Franz Extended Common Lisp
T
MIT Scheme
PC Scheme
XLISP
VT-LISP
Kyoto Common Lisp
On the other hand, I have only sketchy or no data on the following systems:
PDP-1 Lisp
PDP-6 Lisp
MacLISP (Multics)
muLisp
TLC-Lisp
Prime Lisp
Lisp F3
Lisp/370
Lisp/VM
Cambridge Lisp (ST)
Interlisp-D
Apollo Domain Lisp (the PSL deriv)
Rutgers Lisp-20
Rutgers DEC-20 Common Lisp
Golden Common Lisp
HP Common Lisp
VAXLisp
Pyramid Common Lisp
Lucid Lisp
There are certainly others I've forgotten or simply don't know about - any
info on these is quite welcome! Long-ago implementations are just as worth
knowing about as more recent ones.
Details received will go into my dissertation, and possibly into a separate
tech report; any contributor who wants one will get a copy when this work is
completed, perhaps in three months or so. The dissertation itself is about
Lisp data structure design in general, and how it might be formalized.
Of course, all contributions will be properly credited, not to mention
greatly appreciated!
stan shebs
shebs@cs.utah.edu
uunet!utah-cs!shebs
∂21-Feb-88 1021 @MC.LCS.MIT.EDU:hal@MURREN.AI.MIT.EDU standardization meeting -- vote early, vote often
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 21 Feb 88 10:21:24 PST
Received: from kleph (TCP 2206400254) by MC.LCS.MIT.EDU 21 Feb 88 13:22:17 EST
Received: from murren (murren.ai.mit.edu) by KLEPH.AI.MIT.EDU; Sun, 21 Feb 88 13:22:54 est
Received: by MURREN.AI.MIT.EDU; Sun, 21 Feb 88 13:26:57 est
Date: Sun, 21 Feb 88 13:26:57 est
From: hal@MURREN.AI.MIT.EDU (Hal Abelson)
Message-Id: <8802211826.AA15904@murren>
To: rrrs-authors%mc@KLEPH.AI.MIT.EDU
Subject: standardization meeting -- vote early, vote often
Reply-To: hal@ai.ai.mit.edu
The following people (listed as authors on the published version of
RRRS) have not indicated their preference as to the meeting on March
26:
Kohlbecker Oxley Wand Pitman
Please let us know:
Will you come if the meeting will be at IU?
Will you come if the meeting will be at MIT?
Given a choice, would you prefer to meet at IU or at MIT ?
-- Hal
∂21-Feb-88 1124 @MC.LCS.MIT.EDU:rabin.pa@Xerox.COM Re: Lisp Innards Wanted!
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 21 Feb 88 11:24:48 PST
Received: from Xerox.COM (TCP 1500006350) by MC.LCS.MIT.EDU 21 Feb 88 14:22:38 EST
Received: from Cabernet.ms by ArpaGateway.ms ; 21 FEB 88 11:21:01 PST
Date: 21 Feb 88 11:20 PST
From: rabin.pa@Xerox.COM
Subject: Re: Lisp Innards Wanted!
In-reply-to: shebs@cs.utah.edu (Stanley Shebs)'s message of 20 Feb 88 05:46:00
GMT
To: shebs@cs.utah.edu
cc: scheme@mc.lcs.mit.edu
Message-ID: <880221-112101-10931@Xerox>
Some details on Lucid Lisp are given in papers in the 1986 Lisp and Functional
Programming Conference proceedings. The bignum implementation has a paper of
its own. I also recall an article on a RISC implementation in a recent (last
year and a half) IEEE Computer or Software.
Dan Rabin
∂22-Feb-88 1008 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU nonorthogonality among list/vector/string procedures
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 22 Feb 88 10:07:14 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 22 Feb 88 13:08:02 EST
Date: Mon, 22 Feb 88 13:08:20 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: nonorthogonality among list/vector/string procedures
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <330081.880222.JAR@AI.AI.MIT.EDU>
The answer to the below question is that we made no attempt to make the
set of available sequence manipulation procedures uniform accross the
various sequence types. But this doesn't mean we shouldn't consider
making things more uniform, either by adding or removing procedures;
doing so would make the language easier to learn.
-Jonathan
Date: Sun, 21 Feb 88 23:15:45 est
From: Michael R. Blair <ziggy at VX.LCS.MIT.EDU>
To: jar
Re: More RRRS questions
Why are the following missing?
VECTOR-COPY
LIST-COPY
LIST-FILL!
LIST-SET!
(MAKE-LIST k)
~Ziggy
∂22-Feb-88 1756 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Scheme for Amiga
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 22 Feb 88 17:56:34 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 22 Feb 88 20:53:44 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA05882; Mon, 22 Feb 88 17:30:20 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 20 Feb 88 19:38:07 GMT
From: rlcarr@athena.mit.edu (Richard L. Carreiro)
Organization: Massachusetts Institute of Technology
Subject: Scheme for Amiga
Message-Id: <3088@bloom-beacon.MIT.EDU>
References: <2608@gryphon.CTS.COM>, <1771@phoenix.Princeton.EDU>, <3086@bloom-beacon.MIT.EDU>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Does anyone have, or know where to get, Scheme for the Amiga computer?
Please EMAIL or post to comp.sys.amiga.
Thanks in advance,
******************************************************************************
* Richard L. Carreiro GO CELTS! * "He gets it out deep and *
* rlcarr@athena.mit.edu * HAVLICEK STEALS IT!!" - J. Most *
******************************************************************************
∂23-Feb-88 0726 @MC.LCS.MIT.EDU:bsg@STONY-BROOK.SCRC.Symbolics.COM Lisp representation data.
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 23 Feb 88 07:26:42 PST
Received: from STONY-BROOK.SCRC.Symbolics.COM (TCP 20024224620) by MC.LCS.MIT.EDU 23 Feb 88 10:24:38 EST
Received: from PEGASUS.SCRC.Symbolics.COM by STONY-BROOK.SCRC.Symbolics.COM via CHAOS with CHAOS-MAIL id 349234; Tue 23-Feb-88 10:19:54 EST
Received: by scrc-pegasus id AA09162; Tue, 23 Feb 88 10:00:52 est
Date: Tue, 23 Feb 88 10:00:52 est
From: Bernard S. Greenberg <bsg@scrc-pegasus>
To: shebs%cs.utah.edu@stony
Subject: Lisp representation data.
Cc: ed@stony, greenwald@stony, scheme%mc.lcs.mit.edu@stony, sgr@stony
Date: 20 Feb 88 05:46:00 GMT
From: shebs@cs.utah.edu (Stanley Shebs)
Organization: PASS Research Group
Subject: Lisp Innards Wanted!
Message-Id: <5274@utah-cs.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
As part of my dissertation, I've been collecting info on the internal data
representations of various Lisp systems. Lisp here is broadly defined as
It has become profoundly difficult for me to edit and send computer mail.
If you (BSG@SYMBOLICS.COM) send me a paper address, I will send you all
the relevant representation data on Multics MacLisp, may its memory rest
in peace.
∂23-Feb-88 0803 @MC.LCS.MIT.EDU:bsg@STONY-BROOK.SCRC.Symbolics.COM As I was saying (superseding letter)
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 23 Feb 88 08:03:21 PST
Received: from STONY-BROOK.SCRC.Symbolics.COM (TCP 20024224620) by MC.LCS.MIT.EDU 23 Feb 88 10:24:51 EST
Received: from PEGASUS.SCRC.Symbolics.COM by STONY-BROOK.SCRC.Symbolics.COM via CHAOS with CHAOS-MAIL id 349236; Tue 23-Feb-88 10:20:19 EST
Received: by scrc-pegasus id AA09170; Tue, 23 Feb 88 10:02:07 est
Date: Tue, 23 Feb 88 10:02:07 est
From: Bernard S. Greenberg <bsg@scrc-pegasus>
To: shebs%cs.utah.edu@stony
Subject: As I was saying (superseding letter)
Cc: ed@stony, greenwald@stony, scheme%mc.lcs.mit.edu@stony, sgr@stony
Date: 20 Feb 88 05:46:00 GMT
From: shebs@cs.utah.edu (Stanley Shebs)
Organization: PASS Research Group
Subject: Lisp Innards Wanted!
Message-Id: <5274@utah-cs.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
As part of my dissertation, I've been collecting info on the internal data
representations of various Lisp systems. Lisp here is broadly defined as
It has become profoundly difficult for me to edit and send computer mail.
If you send me (BSG@SYMBOLICS.COM) a paper address, I will send you all
the relevant representation data on Multics MacLisp, may its memory rest
in peace.
∂23-Feb-88 1115 @MC.LCS.MIT.EDU:iuvax!chaynes@ee.ecn.purdue.edu comments on recent remarks
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 23 Feb 88 11:15:29 PST
Received: from ee.ecn.purdue.edu (TCP 20013500417) by MC.LCS.MIT.EDU 23 Feb 88 14:16:11 EST
Received: by ee.ecn.purdue.edu (5.54/1.12jrs)
id AA20244; Tue, 23 Feb 88 14:14:01 EST
Message-Id: <8802231914.AA20244@ee.ecn.purdue.edu>
Date: Tue, 23 Feb 88 14:13:49 EST
From: Chris Haynes <iuvax!chaynes@ee.ecn.purdue.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: comments on recent remarks
Hal concisely summarized the reasons I feel a standard is probably desirable.
... serious concerns have been raised about (1) some other group
standardizing something called "Scheme" (2) Scheme getting overshadowed by
Common Lisp (3) Scheme not being viewed as a "real language". So I think
it is worthwhile to see if we can go the standards route without blowing
it. ...
I expect that as Scheme becomes more widely used, there will be
increasing pressure to standardize it. And I am sure that as time
goes on, it will be increasingly difficult to standardize it in "the
right spirit."
My original attempt at making the later point was criticized, with some
justification, for sounding elitist. That was never my intent.
Mitch clarified it nicely:
As Scheme matures and its user community grows, it is no longer
controlled by a group of 2 or 5 or 18 or 31. We (meaning the members
of any of these sets) can no longer control or direct the growth of
the language; such direction must be shared with other as yet unknown
persons or institutions which may or may not share the intellectual
goals of the original group.
Hal continued:
"Blowing it" means setting up a situation where people feel that they
have to agree about large chunks of Scheme before they can work on
Scheme. That turns Scheme design into a political process rather than
an intellectual one. It also, unfortunately, is often the express
purpose of creating a standard.
You don't need a large standardized chunk of a language to do
teaching and research, which are still the main applications of
Scheme. These applications generally do not require a large
language, and because portability is not essential it need not be
completely standard. Political pressures of this sort become intense
when the language is being used for large commercial applications,
for which a significantly larger standardized chunk is often needed.
Part of my concern is that in a few years industrial applications of
Scheme will become important and standardization will then become
more political. Thus I think it will be possible for us to avoid
blowing it in this way if we proceed now, and much more difficult if
we delay several years.
In general I would like to see a VERY conservative and VERY
minimal standard.
I agree completely. I also like Hal's "manifesto".
From: ramsdell%linus@MITRE-BEDFORD.ARPA
Subject: Standardization (A conservative approach)
...
My view is that informal Scheme design meetings, such as the Scheme
workshop of June 1987, are the places to talk about evolutionary changes
to Scheme.
I agree.
Are those meetings going to be replaced by formal
standards meetings,
I sincerely hope not.
or are the standards meetings going to only codify
the time tested ideas that originated in workshops and other
locations?
John
Yes, that is the proper role of standardization (with emphasis on
"time tested").
From: Hal Abelson <hal@zohar.ai.mit.edu>
Subject: call for standardization meeting
...
My bias is that if we do decide to go ahead with a standard, then the
standard itself should be essentially identical to the next version of
R*S. (But I would like to hear from people who have contrary
opinions.)
I could live with this if the standards organizations would tolerate
it (which is questionable), but I'd rather give the working group
(and the report group) somewhat more scope. This scope should not be
license to add things to the language, but rather to change style and
perhaps remove doubtful features until we have had more confident of
them. For example, I'm glad the Reports include a formal semantics,
but its appropriateness for a standard is debatable; and I'd rather
we didn't allow improper formal parameter lists until Dybvig and
Heeb's optional argument proposal is seriously considered.
-- Chris
∂23-Feb-88 1142 @MC.LCS.MIT.EDU:iuvax!chaynes@ee.ecn.purdue.edu standardization mtg agenda
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 23 Feb 88 11:42:21 PST
Received: from ee.ecn.purdue.edu (TCP 20013500417) by MC.LCS.MIT.EDU 23 Feb 88 14:43:14 EST
Received: by ee.ecn.purdue.edu (5.54/1.12jrs)
id AA20183; Tue, 23 Feb 88 14:11:48 EST
Message-Id: <8802231911.AA20183@ee.ecn.purdue.edu>
Date: Tue, 23 Feb 88 14:11:38 EST
From: Chris Haynes <iuvax!chaynes@ee.ecn.purdue.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: standardization mtg agenda
The following is offered as a tentative agenda for the proposed March
standardization meeting:
1) Presentation on standardization organizations and procedures
(IEEE, X3, ...).
2) Discussion of when should Scheme standardization begin.
I say when, not whether, because I believe it is inevitable sooner
or later, for better or for worse. If there are cogent arguments
for delaying a couple of years or so, we should here them.]
3) Discussion of which official standardization organization would be best
serve our purposes.
This discussion can't really be separated from 2); for example,
I suspect IEEE standardization would be a good thing, but doubt
we should proceed if that is ruled out.
4) Develop a charter for the standardization working group.
I suspect we should keep this group separate from the R*S author's group.
(To avoid confusion, I suggest we call the former the "working
group" and the later the "report group".) Clearly the working and
report group memberships should have a large intersection, and
their meetings might whenever possible be held back-to-back in
the interest of those participating in both. The purpose of the
charter is to clarify the respective roles of the two groups. For
example, we could agree that no language feature be in the standard
that is not in the report, but allow the documents to differ
somewhat in style and allow the reports to include experimental
features. I see the present report as somewhere in between these
two documents (some features might be left out in the standard and
some less tried features might be added to the report).
5) Choose officers (Chair, Vice Chair, others if necessary) for the
Working Group.
The umbrella standards organization actually appoints the officers
(at least in the IEEE), but presumably they will accept our suggestions.
6) Discuss location, time and agenda of first working group meeting.
This might be at the L&FP conference, or we might prefer to devote
all the available time there to the report group meeting.
6) Discussion of the next report group agenda.
6) and 7) will be included only as time allows after the above items
have been given adequate consideration.
7) Discuss possible changes to the R3RS for the standard.
This is clearly beginning the work of the working group, and should only
be undertaken if their is time (unlikely) or some item is thought
to be important enough that it will influence the decisions above.
I would rather discuss things to leave out of the standard (there
are several possibilities I can think of) instead of discussing
possible additions (which are more the business of the report group).
8) Final consensus on points 2)-5) above.
Since the points for discussion above are tightly interwoven, we
should probably conclude with a final motion for consensus.
(I hope voting is not necessary, and if it is a "clear majority",
not a simple majority, should be in favor of whatever action
we resolve on.)
-- Chris
∂23-Feb-88 1233 @MC.LCS.MIT.EDU:iuvax!duba@ee.ecn.purdue.edu standardization meeting
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 23 Feb 88 12:32:52 PST
Received: from ee.ecn.purdue.edu (TCP 20013500417) by MC.LCS.MIT.EDU 23 Feb 88 15:33:22 EST
Received: by ee.ecn.purdue.edu (5.54/1.12jrs)
id AA23645; Tue, 23 Feb 88 15:31:21 EST
Message-Id: <8802232031.AA23645@ee.ecn.purdue.edu>
Date: Tue, 23 Feb 88 15:30:12 EST
From: Bruce F. Duba <iuvax!duba@ee.ecn.purdue.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: standardization meeting
A: (IU) yes
B: (MIT) no
C: definitely IU
∂23-Feb-88 1837 @MC.LCS.MIT.EDU,@RELAY.CS.NET:manis%instr.camosun.bcc.cdn@ean.ubc.ca Scheme as an introductory programming language
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 23 Feb 88 18:37:08 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 23 Feb 88 19:34:07 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa13913; 23 Feb 88 13:29 EST
Received: from ubc by RELAY.CS.NET id ac05109; 23 Feb 88 13:18 EST
Received: by ean.ubc.ca id AA26188; Tue, 23 Feb 88 10:04:52 pst
Date: 23 Feb 88 10:03 -0800
From: Vincent Manis <manis%instr.camosun.bcc.cdn%ean.ubc.ca@RELAY.CS.NET>
To: scheme@mc.lcs.mit.edu
MMDF-Warning: Parse error in original version of preceding line at RELAY.CS.NET
Message-Id: <488*manis@instr.camosun.bcc.cdn>
Subject: Scheme as an introductory programming language
I'd like to get some information on the experiences of people who have
used Scheme as the programming language for introductory, first-year,
courses in Computer Science (at, e.g., the ACM CS-1/CS-2 level). I'm
particularly interested in building a list of institutions which offer
introductory programming courses using Scheme, but I'm also interested
in textbooks and other resources they use, or any other information
which might be available. Experience with in-class use of the various
Scheme implementations which are generally available would also be
helpful. If you looked at Scheme and then decided on Pascal or
something instead, I'd be interested in your rationale, too.
I'm well aware of Abelson and Sussman (with Sussman), as well as
the Friedman and Dybvig books. I've also used PC Scheme extensively and
MacScheme a little bit.
I'm less interested in other Lisp dialects than Scheme (though T would
certainly be of great interest).
I will of course post a summary of the replies.
AtDhVaAnNkCxE
Vincent Manis manis@instr.camosun.bcc.cdn
The Invisible City of Kitezh ihnp4 |
Camosun College seismo |!ubc-vision!instr.camosun.bcc.cdn!manis
3100 Foul Bay Road uw-beaver|
Victoria, BC V8P 4X8 manis%instr.camosun.bcc.cdn@ubc.csnet
(604) 592-1281 x480 manis%instr.camosun.bcc.cdn%ubc.csnet@relay.cs.net
∂24-Feb-88 1722 @MC.LCS.MIT.EDU,@RELAY.CS.NET:oxley@home.csc.ti.com Standardization Mtg
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 24 Feb 88 17:21:54 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 24 Feb 88 20:21:10 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa10317; 24 Feb 88 18:50 EST
Received: from csc.ti.com by RELAY.CS.NET id ao16956; 24 Feb 88 18:40 EST
Received: from home by tilde id AA00575; Wed, 24 Feb 88 17:11:02 CST
Received: by home id AA15961; Wed, 24 Feb 88 17:09:54 CST
Date: Wed, 24 Feb 88 17:09:54 CST
From: Don Oxley <oxley%home.csc.ti.com@RELAY.CS.NET>
Message-Id: <8802242309.AA15961@home>
To: rrrs-authors@mc.lcs.mit.edu
Subject: Standardization Mtg
Sorry for the delay in responding. I'm not yet sure that I will
attend. This is a combination of personal conflicts, the (non)need for
additional representatives from TI, and confidence that my viewpoints
are already well represented by many others. If things work out, I
would like to come.
Either MIT or IU is fine. I have a slight preference for IU. They
have offered to host the Scheme group a number of times now and we
have not accepted the invitation. I think we do need to move around.
(besides I get to Boston frequently anyway, I would like to go to
Bloomington!).
--Don
∂25-Feb-88 0940 @MC.LCS.MIT.EDU:kempf@Sun.COM New Address
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 25 Feb 88 09:40:19 PST
Received: from Sun.COM (TCP 1201600002) by MC.LCS.MIT.EDU 25 Feb 88 12:39:07 EST
Received: from snail.sun.com by Sun.COM (4.0/SMI-4.0)
id AA05538; Thu, 25 Feb 88 09:38:38 PST
Received: from suntana.sun.com by snail.sun.com (4.0/SMI-3.2)
id AA02868; Thu, 25 Feb 88 09:40:05 PST
Received: from localhost by suntana.sun.com (3.2/SMI-3.2)
id AA01672; Thu, 25 Feb 88 09:32:11 PST
Message-Id: <8802251732.AA01672@suntana.sun.com>
To: rrrs-authors@mc.lcs.mit.edu
Subject: New Address
Date: Thu, 25 Feb 88 09:32:09 -0800
From: kempf@Sun.COM
Apologies for sending this to the entire list, but there doesn't seem
to be an rrrs-authors-request list for adminstrative details, as is
the usual convention.
Please change my e-mail address to jkempf@sun.com from kempf@hplabs.hp.com.
Thanks.
jak
∂25-Feb-88 1140 @MC.LCS.MIT.EDU:HAILPERIN@Sushi.Stanford.EDU SICP query lang. compiler
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 25 Feb 88 11:40:14 PST
Received: from Sushi.Stanford.EDU (TCP 4402000065) by MC.LCS.MIT.EDU 25 Feb 88 14:36:37 EST
Date: Thu 25 Feb 88 11:31:10-PST
From: Max Hailperin <HAILPERIN@Sushi.Stanford.EDU>
Subject: SICP query lang. compiler
To: scheme@MC.LCS.MIT.EDU
Message-ID: <12377604308.11.HAILPERIN@Sushi.Stanford.EDU>
I want to assign some modest amount of logic programming in a class I'm teaching
using Structure and Interpretation of Computer Programs, and was stymied by
the molasses-like quality of the query-language interpreter. So I wrote a
99% compatable query-language compiler. It is ugly, and itself slower than
it should really be, but it beats the pants off the interpreter. It runs
undre CScheme version 5.3; I suspect it would take non-trivial but doable
effort to port it to a different scheme. In case anyone else is in the
same position, I'd be happy to send other instructors the code, on a
completely and utterly as-is basis.
-------
∂25-Feb-88 1244 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU New Address
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 25 Feb 88 12:44:04 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 25 Feb 88 15:31:31 EST
Date: Thu, 25 Feb 88 15:33:38 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: New Address
To: kempf@SUN.COM
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Thu 25 Feb 88 09:32:09 -0800 from kempf at Sun.COM
Message-ID: <331882.880225.JAR@AI.AI.MIT.EDU>
Date: Thu, 25 Feb 88 09:32:09 -0800
From: kempf at Sun.COM
To: rrrs-authors at mc.lcs.mit.edu
Re: New Address
Apologies for sending this to the entire list, but there doesn't seem
to be an rrrs-authors-request list for adminstrative details, as is
the usual convention. ...
I have created RRRS-AUTHORS-REQUEST@MC.LCS.MIT.EDU.
∂25-Feb-88 1710 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: Lisp Innards Wanted!
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 25 Feb 88 17:10:42 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 25 Feb 88 20:07:09 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA08693; Thu, 25 Feb 88 16:51:10 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 24 Feb 88 06:25:39 GMT
From: pyramid!nsc!taux01!yuval@hplabs.hp.com (Gideon Yuval)
Organization: National Semiconductor (Israel) Ltd.
Subject: Re: Lisp Innards Wanted!
Message-Id: <492@taux01.UUCP>
References: <5274@utah-cs.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Berkeley&Bobrow's book "The Programming Language LISP" (MIT press, ISBN
0-262-59004-2) has the full PDP-1 LISP interpreter listings, plus some
design documents (by Deutsch&Berkeley), on pp. 326-375.
--
Gideon Yuval, +972-52-522255 (work), -2-690992 (home), yuval@taux02.nsc.com
∂25-Feb-88 2323 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Scheme book request
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 25 Feb 88 23:22:58 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 26 Feb 88 02:13:00 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA16535; Thu, 25 Feb 88 23:00:30 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 24 Feb 88 18:31:02 GMT
From: sdcrdcf!csun!csuna!acphssrw@burdvax.prc.unisys.com (Stephen R. Walton)
Organization: California State University, Northridge
Subject: Scheme book request
Message-Id: <1079@csuna.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I'm new to Scheme, having just acquired version 0.3 of David Betz's
XSCHEME from BIX. (He is supposedly working on a compiler for it.)
While I'm pretty well aware of the good books on Lisp, I do not know
of any books for Scheme. Recommendations are wanted. As usual,
please e-mail responses and I'll summarize to the net if warrented.
In addition to the .signature file, {hplabs|ihnp4}!csun!csuna!acphssrw
works.
Stephen Walton, representing myself swalton@solar.stanford.edu
Cal State, Northridge rckg01m@calstate.BITNET
∂26-Feb-88 0002 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: Info needed on scheme research
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 26 Feb 88 00:02:29 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 26 Feb 88 02:17:23 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA16422; Thu, 25 Feb 88 22:54:27 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 24 Feb 88 17:37:03 GMT
From: otter!ange@hplabs.hp.com (Andy Norman)
Organization: Hewlett-Packard Laboratories, Bristol, UK.
Subject: Re: Info needed on scheme research
Message-Id: <1510009@otter.hple.hp.com>
References: <1510005@otter.HP.COM>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
ange@otter.HP.COM (Andy Norman) writes:
>If anyone knows what work is being / has been done with _Scheme_ in the
>following areas, could they please _MAIL_ me, and I will summarise to the
>net.
>Modules.
>Formal definitions of both data types and language semantics.
>Type checking.
>Frames, OOPS, Active Values and Daemons.
Here is a summary of the replies that I have received:
--------------------------------------------------------------------------------
From: Will Clinger <willc%tekchips.CRL%tektronix.tek.com@RELAY.CS.NET>
Mitch Wand has done a lot of work with denotational semantics expressed
in Scheme. I've done a little -- I wrote the semantics of Scheme itself
in Scheme in order to test it. I think Mitch is now working with formal
semantics of data types, objects, and inheritance. ML would undoubtedly
be a better language for this sort of thing than Scheme, but Scheme is
more widely available and the implementations are often better.
Mitch built an ML-style type checker for use with Scheme 311. It was
buggy and crude but useful because Scheme 311 had no debugger. David
Gifford and his students are currently working on FX, which is a statically
typed language with type inference that can be thought of as a dialect of
Scheme.
TI built an object-oriented system called SCOOPS for their PC Scheme that
was used in their Personal Consultant series of expert system shells.
They made the source code available, and there is at least one independent
implementation of SCOOPS for MacScheme. The T object system came earlier,
though, and is a more elegant system. Norman Adams of Tektronix has
recently been working on a system similar to the T object system.
There's someone at Carnegie Mellon who's applying flow analysis to the
type inference problem for Scheme.
That's about it for my knowledge, but I'm sure lots of other stuff has
been done.
--------------------------------------------------------------------------------
From: willc%tekchips.CRL%tektronix.tek.com@RELAY.CS.NET
Uwe Pleban's MESS system for building compilers from denotational
specifications uses Scheme as well as Turbo Prolog (for the code
generator) and an ML-like language (for the semantics; the ML-like
language is implemented in Scheme).
--------------------------------------------------------------------------------
Many thanks to Will for taking the time to reply.
ange
------------------------------------------------------------------
ange%anorman@hplabs.HP.COM | Andy Norman (ange) |
ange@hplb.csnet | Hewlett-Packard Labs, --+--
ange%hplb.csnet@csnet-relay.arpa | Bristol, U.K., |
...!mcvax!ukc!hplb!ange | England. BS12 6QZ |
∂26-Feb-88 0137 @MC.LCS.MIT.EDU:cph@kleph.AI.MIT.EDU Scheme for a 3B15/3B2
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 26 Feb 88 01:37:03 PST
Received: from kleph (TCP 2206400254) by MC.LCS.MIT.EDU 26 Feb 88 04:32:13 EST
Received: by kleph.AI.MIT.EDU; Fri, 26 Feb 88 04:33:15 est
Date: Fri, 26 Feb 88 04:33:15 est
From: cph@kleph.AI.MIT.EDU (Chris Hanson)
Message-Id: <8802260933.AA05803@kleph>
To: vu-vlsi!lehi3b15!flash@psuvax1.cs.psu.edu
Cc: scheme@mc.lcs.mit.edu
In-Reply-To: (Stephen Corbesero's message of 17 Feb 88 18:22:08 GMT <308@lehi3b15.CSEE.Lehigh.EDU>
Subject: Scheme for a 3B15/3B2
Reply-To: cph@mc.lcs.mit.edu
Date: 17 Feb 88 18:22:08 GMT
From: vu-vlsi!lehi3b15!flash@psuvax1.cs.psu.edu (Stephen Corbesero)
I recently tried compiling the Scheme that comes with GnuEmacs on a
3B15, but ran into some run-time problems. If anyone has already
ported scheme to a member of the 3Bx (x>1) family, could you please
send me any pertinent info. please use E-mail as I am not a regular
reader of this list.
Without more information I can't help you. Unfortunately, the Scheme
distributed with Emacs is an old version. I believe that the current
version has been ported to those machines without much trouble.
∂26-Feb-88 0938 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: !
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 26 Feb 88 09:38:02 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 26 Feb 88 12:34:27 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA26726; Fri, 26 Feb 88 07:57:40 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 24 Feb 88 21:14:00 GMT
From: duba@iuvax.cs.indiana.edu
Organization: Indiana University CSCI, Bloomington
Subject: Re: !
Message-Id: <56700001@iuvax>
References: <880208@<323426>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
;; This is how we would write the "set!-free" make-cell in Scheme
;; extended with the F-operator and prompts (see Felleisen POPL88).
(define (make-cell)
(# (rec state
(F (lambda (set-state)
(lambda (op)
(case op
[(get) state]
[(set) set-state])))))))
;; Now with just F
(define (make-cell)
(F (lambda (return-cell)
(rec state
(F (lambda (set-state)
(return-cell
(lambda (op)
(case op
[(get) state]
[(set) set-state])))))))))
;; Of course what this code shows is that in a language with call/cc or F
;; either rec and letrec must be considered side-effects, or they must
;; be fixed so that it is not possible to find out that they are
;; implemented with side-effects.
;; Bruce Duba and Matthias Felleisen
∂26-Feb-88 1944 @MC.LCS.MIT.EDU:hal@MURREN.AI.MIT.EDU standardization meeting, March 26
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 26 Feb 88 19:43:56 PST
Received: from kleph (TCP 2206400254) by MC.LCS.MIT.EDU 26 Feb 88 22:35:07 EST
Received: from murren (murren.ai.mit.edu) by kleph.AI.MIT.EDU; Fri, 26 Feb 88 22:36:55 est
Received: by MURREN.AI.MIT.EDU; Fri, 26 Feb 88 22:41:04 est
Date: Fri, 26 Feb 88 22:41:04 est
From: hal@MURREN.AI.MIT.EDU (Hal Abelson)
Message-Id: <8802270341.AA21269@murren>
To: rrrs-authors%mc@kleph.AI.MIT.EDU
Subject: standardization meeting, March 26
Reply-To: hal@ai.ai.mit.edu
The standardization meeting will take place on March 26 at Indiana
University. Stay tuned to this station for further information from
our IU hosts about specific place and times.
∂26-Feb-88 2248 @MC.LCS.MIT.EDU:mcvax!crcge3.cge.fr!adams@uunet.UU.NET SICP query lang. compiler
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 26 Feb 88 22:48:31 PST
Received: from uunet.UU.NET (TCP 30003106601) by MC.LCS.MIT.EDU 27 Feb 88 00:53:34 EST
Received: from mcvax.UUCP by uunet.UU.NET (5.54/1.14) with UUCP
id AA19643; Sat, 27 Feb 88 00:52:37 EST
Received: by mcvax.cwi.nl; Fri, 26 Feb 88 22:05:56 +0100 (MET)
Received: by inria.inria.fr; Fri, 26 Feb 88 20:40:37 +0100 (MET)
Received: from crcge3.cge.fr (crcge3.ARPA) by crcge1.cge.fr, Fri, 26 Feb 88 19:39:05 -0100
Date: Fri, 26 Feb 88 19:38:51 -0100
Received: by crcge3.cge.fr, Fri, 26 Feb 88 19:38:51 -0100
From: mcvax!crcge3.cge.fr!adams@uunet.UU.NET (Drew Adams)
Message-Id: <8802261838.AA09716@crcge3.cge.fr>
To: HAILPERIN@sushi.stanford.edu, scheme@mc.lcs.mit.edu
Subject: SICP query lang. compiler
I would be interested in your compiler code. Thank you.
∂27-Feb-88 0710 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu SCOOPS
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 27 Feb 88 07:10:36 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 27 Feb 88 10:07:06 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA23221; Sat, 27 Feb 88 06:39:04 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 25 Feb 88 14:23:12 GMT
From: mcvax!diku!daimi!zapp@uunet.uu.net (Michael Hoffmann Olsen)
Organization: DAIMI: Computer Science Department, Aarhus University, Denmark
Subject: SCOOPS
Message-Id: <1330@daimi.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I've heard about an object oriented extension of
Scheme called SCOOPS. Does anybody know where I can
find something about it?
Michael Olsen,
Computer Science Department, Aarhus University,
Ny Munkegade - DK 8000 Aarhus C - DENMARK
E-Mail: zapp@daimi.dk
∂27-Feb-88 1707 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu xscheme
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 27 Feb 88 17:07:34 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 27 Feb 88 20:03:15 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA01061; Sat, 27 Feb 88 15:54:40 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 27 Feb 88 23:10:46 GMT
From: csclea!medlin@ncsuvx.ncsu.edu (Todd Medlin)
Organization: Computer Science , NCSU, Raleigh NC
Subject: xscheme
Message-Id: <1538@ncsuvx.ncsu.edu>
References: <1079@csuna.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Can someone out there post some information on xscheme ?
Thanks in advance.
---todd medlin (medlin@csclea.ncsu.edu)
I'm just an undergraduate, my opinion doesn't matter.
∂28-Feb-88 0857 @MC.LCS.MIT.EDU,@RELAY.CS.NET:jmiller%mephi@BRANDEIS.CSNET Standards
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 28 Feb 88 08:49:27 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 28 Feb 88 11:24:26 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa08163; 28 Feb 88 11:26 EST
Received: from brandeis by csnet-relay.csnet id ab11679; 28 Feb 88 11:18 EST
Received: by brandeis.ARPA (5.51/4.7)
id AA12871; Sun, 28 Feb 88 08:18:22 EST
Received: by mephi.earth1.com (3.2/SMI-3.2)
id AA04308; Sun, 28 Feb 88 08:16:48 PST
Date: Sun, 28 Feb 88 08:16:48 PST
From: James Miller <jmiller%mephi%brandeis.csnet@RELAY.CS.NET>
Message-Id: <8802281616.AA04308@mephi.earth1.com>
To: RRRS-Authors%mc.lcs.mit.edu@RELAY.CS.NET
Subject: Standards
Since I won't be able to attend the meeting, I'd like to very briefly
state my feelings on the subject:
(1) I think standardization is now unavoidable.
(2) Because of the time and expense involved in the process, I will
not be able to participate except by network message. The people who
will directly be involved in the process should decide what
organization they would prefer to deal with.
(3) The R↑nS as it stands, after fixing bugs (as in numbers) is an
excellent starting point. I feel it should be issued as an "interim
standard" if there is such a thing.
(4) Before making a final standard, however, I strongly believe that
the language must have a standard and portable mechanism for extending
the syntax (macros). Without this the ability to experiment with
language changes and exchange code based on these changes will become
quite difficult; it is already fairly severe when dealing with widely
differing implementations with which one is not intimately familiar.
It would be well worth a two year delay, if necessary, to work out a
solution to this problem that is acceptable to the entire community.
--Jim
∂28-Feb-88 1211 @MC.LCS.MIT.EDU:mhs@HT.AI.MIT.EDU Info needed on Scheme research
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 28 Feb 88 12:10:53 PST
Received: from HT.AI.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 28 FEB 88 15:06:58 EST
Received: by ht.ai.mit.edu; 28 Feb 88 15:01:07 est
Date: 28 Feb 88 15:01:07 est
From: Mark Shirley <mhs@ht.ai.mit.edu>
To: scheme@mc
Subject: Info needed on Scheme research
Quoting "From: otter!ange@hplabs.hp.com (Andy Norman)"
From: Will Clinger <willc%tekchips.CRL%tektronix.tek.com@RELAY.CS.NET>
======================================================================
There's someone at Carnegie Mellon who's applying flow analysis to the
type inference problem for Scheme.
Will, do you mean Olin Shivers at CMU? Or is there someone else working on
flow analysis?
In a vein similar to Andy's question, What is the state-of-the-art in
optimizing compilers for Lisp / Scheme? If people would send references to
papers, e.g. something on Orbit, I'll collect and summarize the responses.
(Apologies to everybody if this question has been asked recently. I'm new to
this list and looking through the archives available to me didn't turn up
anything.)
- Mark Shirley
∂28-Feb-88 1857 @MC.LCS.MIT.EDU:dyb@iuvax.cs.indiana.edu standardization meeting---travel and local arrangements
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 28 Feb 88 18:57:49 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 28 Feb 88 21:57:39 EST
Received: by iuvax.cs.indiana.edu; id AA02446; Sun, 28 Feb 88 21:57:41 EST
Date: Sun, 28 Feb 88 21:57:41 EST
From: R. Kent Dybvig <dyb@iuvax.cs.indiana.edu>
Message-Id: <8802290257.AA02446@iuvax.cs.indiana.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: standardization meeting---travel and local arrangements
The meeting to discuss standardization will be held on Saturday March
26, 1988 in Bloomington, Indiana. We plan to begin the meeting at 9:00
AM, so you should arrive by Friday evening. We plan to adjourn no
later than 5:00 PM on Saturday; this will allow those of you planning
to depart that evening to reserve a 7:00 or later flight out of
Indianapolis.
It is usually best to travel into the Indianapolis airport, which is
about one hour and 15 minutes from Bloomington. The Louisville airport
is sometimes a reasonable alternative at two hours and 15 minutes from
Bloomington. Sometimes there are nonstop flights into Louisville even
when there are no nonstop flights into Indianapolis (especially from
the South). Bloomington has an airport; flights connect through
Chicago or Indianapolis. We rarely use the Bloomington airport since
it usually takes longer to fly into Bloomington than to fly into
Indianapolis and drive to Bloomington.
From the Indianapolis airport, there are three possibilities: (1) rent
a car, (2) take a limo, or (3) have someone pick you up. From the
Louisville airport, only the first option is reasonable. The car
rental is as cheap as if not cheaper than the limo, but I've heard that
the limo is very nice. If you are interested in taking the limo, let
me know and I'll find out how to reserve it.
We have reserved a block of rooms at the Bloomington Ramada Inn. The
price for one night at the Ramada is around $50. Let me know if you
plan to stay at the Ramada and we will sign you up. We need to know by
March 10th at the latest).
We will arrange for coffee and donuts on the morning of the 26th, and
lunch around noon. We will also set up an informal gathering on Friday
night. On Saturday night, we're planning to have a dinner party.
Please let me know as soon as possible if you will be attending. Also,
we may be able to help with travel between Indy and Bloomington if we
have enough advance notice. So please let us know your flight plans as
soon as possible. If I can be of any assistance, don't hesitate to
send mail (dyb@iuvax.cs.indiana.edu) or call (812/335-6486).
Stay tuned...
Kent
∂28-Feb-88 2236 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu looking for Cscheme on 3b1
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 28 Feb 88 22:36:20 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 29 Feb 88 01:09:27 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA26358; Sun, 28 Feb 88 21:33:28 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 29 Feb 88 03:44:07 GMT
From: oxtrap!sendai!rich@umix.cc.umich.edu (K. Richard Magill)
Organization: Digital Works Ltd, Ann Arbor
Subject: looking for Cscheme on 3b1
Message-Id: <172@sendai.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Could someone who is running C-scheme on 3b1/unix-pc please get in
touch with me? What version are you running? Can/will you share your
configuration?
∂29-Feb-88 2146 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu CScheme5.0 Availability (Was: Scheme for Amiga)
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 29 Feb 88 21:46:27 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 29 Feb 88 23:09:16 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA10082; Mon, 29 Feb 88 18:11:34 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 29 Feb 88 20:23:29 GMT
From: rlcarr@athena.mit.edu (Richard L. Carreiro)
Organization: Massachusetts Institute of Technology
Subject: CScheme5.0 Availability (Was: Scheme for Amiga)
Message-Id: <3343@bloom-beacon.MIT.EDU>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I have been told that CScheme5.0 is PD and will compile *as is* on the
Amiga. The same person said it was available via anonymous FTP on several
sites, but neglected to mention any. Can someone post or email where these
sites are? Thank you.
ARPAnet: rlcarr@athena.mit.edu
UUCP : rlcarr%athena@eddie(.mit.edu)
BITNET : rlcarr%athena@mitvma(.mit.edu)
*******************************************************************************
* Richard L. Carreiro "Havlicek stole the ball!!!!" *
* rlcarr@athena.mit.edu -- Johnny Most 4/15/65 *
*******************************************************************************
∂01-Mar-88 0056 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu does c scheme support X windows?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 1 Mar 88 00:56:33 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 1 Mar 88 02:22:35 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA09677; Mon, 29 Feb 88 17:46:59 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 29 Feb 88 18:54:39 GMT
From: hao!umigw!angel@AMES.ARC.NASA.GOV (angel li)
Organization: University of Miami
Subject: does c scheme support X windows?
Message-Id: <131@umigw.MIAMI.EDU>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I was wondering if C-scheme has support for X Windows, version 11.
--
Angel Li
University of Miami/RSMAS
Internet: angel@miami.miami.edu UUCP: hao!umigw!angel
∂03-Mar-88 1009 @MC.LCS.MIT.EDU:gjs@ZOHAR.AI.MIT.EDU xscheme
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 3 Mar 88 10:08:53 PST
Received: from zohar (TCP 2206400256) by MC.LCS.MIT.EDU 3 Mar 88 02:48:13 EST
Received: by ZOHAR.AI.MIT.EDU; Wed, 2 Mar 88 23:20:57 est
Date: Wed, 2 Mar 88 23:20:57 est
From: gjs@ZOHAR.AI.MIT.EDU (Gerald Jay Sussman)
Message-Id: <8803030420.AA03247@zohar>
To: csclea!medlin@ncsuvx.ncsu.edu
Cc: scheme@mc.lcs.mit.edu
In-Reply-To: (Todd Medlin's message of 27 Feb 88 23:10:46 GMT <1538@ncsuvx.ncsu.edu>
Subject: xscheme
You said:
I'm just an undergraduate, my opinion doesn't matter.
Why do you feel that way? You have an unhealthy self-image problem.
Your opinion does matter, at least it does to me.
∂05-Mar-88 0717 @MC.LCS.MIT.EDU:dyb@iuvax.cs.indiana.edu moderator
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 5 Mar 88 07:17:37 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 5 Mar 88 09:38:12 EST
Received: by iuvax.cs.indiana.edu; id AA11037; Thu, 3 Mar 88 10:04:42 EST
Date: Thu, 3 Mar 88 10:04:42 EST
From: R. Kent Dybvig <dyb@iuvax.cs.indiana.edu>
Message-Id: <8803031504.AA11037@iuvax.cs.indiana.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: moderator
Since Mitch will not be coming to the March 26 meeting, I suggest
that Hal take Mitch's place as moderator. I asked Hal if he would
be willing, and he said that he would.
Kent
∂06-Mar-88 0647 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: SCOOPS
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 6 Mar 88 06:47:14 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 6 Mar 88 08:49:42 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA25639; Sat, 5 Mar 88 23:52:30 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 29 Feb 88 01:58:00 GMT
From: render@b.cs.uiuc.edu
Subject: Re: SCOOPS
Message-Id: <189900005@uiucdcsb>
References: <1330@daimi.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Steve Sherin at the Univ. of Penn. has an implementation of SCOOPS. His
e-mail address is sherin@linc.cis.upenn.edu. The code is also available via
anonymous ftp.
∂07-Mar-88 1603 @MC.LCS.MIT.EDU,@RELAY.CS.NET:manis%instr.camosun.bcc.cdn@ean.ubc.ca Scheme as an introductory programming language
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 7 Mar 88 16:03:05 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 7 Mar 88 18:03:24 EST
Received: from relay2.cs.net by RELAY.CS.NET id ab08835; 7 Mar 88 15:04 EST
Received: from ubc by RELAY.CS.NET id ag02903; 7 Mar 88 14:51 EST
Received: by ean.ubc.ca id AA22993; Mon, 7 Mar 88 11:38:16 pst
Date: 7 Mar 88 11:35 -0800
From: Vincent Manis <manis%instr.camosun.bcc.cdn%ean.ubc.ca@RELAY.CS.NET>
To: scheme@mc.lcs.mit.edu
MMDF-Warning: Parse error in original version of preceding line at RELAY.CS.NET
Message-Id: <568*manis@instr.camosun.bcc.cdn>
Subject: Scheme as an introductory programming language
About two weeks ago, I posted a request for information on the use of
Scheme in first-year computer science courses. I've had a sense for a
while that the Pascal paradigm isn't really suitable for introductory
students (BC post-secondary institutions generally report combined
failure/attrition rates of 30-40% in these courses, higher than for most
other non-honours courses), and that Scheme might provide a better
approach.
One obvious criticism of this approach is that not all students are as
smart as MIT students. (I quite often have to deal with students who
have completed Grade 12 Algebra/Trigonometry/Calculus yet are
functioning on about a Grade 9 or 10 level. Such students find
evaluating a Pascal expression such as 3 + 4 DIV 5 * 2 a challenge.) If
in fact such poorer students found Scheme completely mystifying, then it
could immediately be ruled out. (One might have extensive arguments
about whether such students should be in a post-secondary institution at
all, but probably not in this mailing list. A propos marginal students,
one of my colleagues said to me, "I only teach to that fraction of the
students which doesn't suffer from 100% rigor mortis.")
I did *not* receive any responses of the form "We tried it, and it was
an unmitigated disaster". A few respondents had a few qualms, but
nothing which argued that the use of Scheme was *worse* than the status
quo. Obviously, one should take the responses below with a grain of
salt: if anyone had found Scheme completely unsuitable, such a person
wouldn't be terribly likely to continue reading here.
I've edited the responses, mostly in the interests of brevity. On a few
occasions, I've combined two or more separate messages from the same
person.
One note: the books referred to in the following are:
Abelson, Harold, and Gerald Sussman, with Julie Sussman.
"Structure and Interpretation of Computer Programs". MIT Press,
1985. ISBN 0-262-01077-1 (MIT Press) or 0-07-000-422-6
(McGraw-Hill).
Dybvig, R. Kent. "The Scheme Programming Language", Prentice-Hall,
1987. ISBN 0-13-791864-X.
Friedman, Daniel P., and Matthias Felleisen. "The Little LISPer (2nd
ed.)". Science Research Associates, 1986. [This is also available
in a Trade Edition from some other publisher, but I don't know the
difference between the two editions.]
If I get any followup responses, I'll post a summary.
Vincent Manis manis@instr.camosun.bcc.cdn
The Invisible City of Kitezh ihnp4 |
Camosun College seismo |!ubc-vision!instr.camosun.bcc.cdn!manis
3100 Foul Bay Road uw-beaver|
Victoria, BC V8P 4X8 manis%instr.camosun.bcc.cdn@ubc.csnet
(604) 592-1281 x480 manis%instr.camosun.bcc.cdn%ubc.csnet@relay.cs.net
------------------------------------------------------------
From: Franklyn Turbak <lyn@basel.ai.mit.edu>
------------------------------------------------------------
In addition to using the Sussman and Abelson book in the core computer
course at MIT, several instructors have prepared a number of useful
class notes. (These notes introduce new models and examples, extend
and clarify some of the main themes of the book, and introduce some
new material.) I have prepared several such handouts and hope to
combine them with other instructor's materials to form a student workbook in
the not-too-distant future (i.e. this summer).
Other notes of interest (which you may or may not know):
* There is a (very useful) Instructor's Manual available for the
Sussman and Abelson book. [This book is published by McGraw-Hill,
not MIT Press. -- vm]
* You can obtain from MIT a data base of all the problem sets
ever used for the course (eight year's worth!).
* Mike Eisenberg (duck%oz.ai.mit.edu@xx.lcs.mit.edu) is in the final stages
of preparing a new book on programming in Scheme. (It's a gentler
introduction to Scheme than Sussman and Abelson, intended primarily for
a high school audience.)
* The Center for Advanced Engineering Study (CAES) at MIT offers the
whole 6.001 course on videotape (with Gerry Sussman and Hal Abelson as
lecturers). These tapes are excellent for seeing how well the course
can be taught; however, I hear they're expensive. Call CAES
Information at (617) 253-7400 to find out more information. (In
addition to the tapes, I believe that other course materials are also
available from CAES.)
------------------------------------------------------------
From: Martin Ward <martin@EASBY.DUR.AC.uk>
------------------------------------------------------------
I was involved (in 1986) in teaching a computing option to 2nd year
mathematicians at Oxford University (they choose 8 options from ↑25 for the
second year). T was the language used because of the simple semantics, the
ability to get started quickly (using the interpreter) and the ability
to write recursive functions, data directed programs etc. and not worry
about details of syntax, arithmetic overflow etc. Since 1987 there has been
a joint honours course in maths and computing, I rhink using T.
For more up to date information try:
Bernard Sufren,
Programming Research Group
Oxford University
8-11 Keble Rd
Oxford
------------------------------------------------------------
From: Simon Kaplan <uiucdcs!kaplan.cs.uiuc.edu!kaplan@ihnp4.uucp>
------------------------------------------------------------
I'm currently well into the first iteration of teaching scheme as an intro
language here for the first time. The course is an ``experiment'', open
only to selected students. The class size is around 35 students; we get
around 300 students taking our intro course for majors each semester.
The experience of the students ranges from >10 years programming to
nothing.
The students really seem to enjoy the course, I'm loving teaching it, and
the sort of work you can cover is just amazing. In regular Pascal courses,
you spend far too much time on the language and not enough on principles;
examples tend to illustrate language constructs, not concepts. With
Scheme, all that vanishes, and we focus on the concepts. Within 2 weeks,
students are writing fairly complex recursive routines, and after a month
are working with upward and downward funargs, and learned a lot about
control abstractions. Next I plan to cover data abstractions, and then
modules, object-oriented programming, and so forth. More or less I cover
the first 2.5 chapters of A,S&S, and a significant part of a data
structures text such as Reingold and Hansen (data structures in pascal
(except i dont use pascal)). Also a fair amount on orders of evaluation
and correctness.
Why scheme? because there are a small number of orthognal constructs out
of which almost all the programming structures the students need can be
built. This allows a focus on what I think is the single most important
message to give to the students, viz. the concept of building layuers of
abstraction. In an article in this month's byte, A&S call this ``adding to
the language'' or some such and they have a good point
I am using A,S&S as the text, primarily because there is nothing else
available right now (dybvig is a reference manual and doesnt count). It
is not a good book for an intro course. It covers too much, gets too cute,
and focuses too much on numeric examples. I think that the examples in
chapter 2 are a good example of this: while they are good examples, the
average student is likely to just be bored to death by them, not seeing the
relevence of all this number crunching. And thereby miss the entire point
of the chapter. Another problem is their use of the (define (name args) ...)
form in their examples, which makes iontroducing lambda awkward. I use the
form (define name (lambda (args) ...))
I built my own notes for the course. I follow A,S&S closely in the
beginning (was more nervous then) and then branch off. The skeleton of the
course resembles A,S&S but the details are mostly mine own. Specifically i
do a lot more on non-numeric data abstraction, and object-oriented
programming. And then there's a lot of stuff on data structures and
algorithms that they dont get into.
I believe that George Springer at Indiana is workking on a book, which
should be finished soon. I'm looking forward to seeing what he has done.
To conclude: I firmly believe that a better job of introducing students to
programming can be done in scheme. Just read A,S&S to see that this is
so!!
On the software side, we use MacScheme. I highly recommend this. It's
good, reliable, easy to use. The students would find operating system +
editor + language as we usually do with unix/pascal a bit of a mouthful;
using the macs obviates this. Some students use PC-scheme (this is just
ti-scheme) and like it, but of course have to learn the edwin editor,
almost emacs, and dos, almost unix. So the mac is the route of least
resistance for the students. DONT use mit scheme or T if you can avoid it,
mostly because their debuggers are just terrible. Mit scheme gives errors
in hex. T assumes you can program continuation-style to read the debugger.
while this might be true, the freshmen will get blown away...
MacScheme has a lovely debugger, and a good compiler also.
Some personal background: I am not an AI type; I work in programming
environments. And did all my work in C/pascal till last summer. I was put
on a committee to revise the 1st year courses and read abelson & sussman as
part of that, and came away a convert.
Would I use scheme in the future? you bet! I hope the rest of the
department agrees and adopts the experimental course.
------------------------------------------------------------
From: Richard Pattis <pattis@june.cs.washington.edu>
------------------------------------------------------------
Places that I know that use Scheme are Brandies, UC Berkeley, Univ of Oregon
(at Eugene). Contact Harry Mairson at Brandeis, Mike Clancy at Berkeley, and
I don't know who at Oregon.
I think off and on about teaching Scheme (we teach Modula-2 here) and would
be interested in getting the list that you make up of other people already
teaching it.
Rich Pattis
------------------------------------------------------------
From: Joel Spolsky <spolsky@eniac.seas.upenn.edu>
------------------------------------------------------------
The U. of Pennsylvania Computer Science and Engineering curiculum teaches
Abelson and Sussman Scheme (using TI Scheme on IBM-AT's and CScheme on a
VAX) as the *second* part of the introductory programming course; the first
semester is designated "Pascal and Data Structures". They also teach some
ML in this second course.
Of course, MIT uses A&S as their *first* course.
------------------------------------------------------------
From: Stephen Robbins <Stever@waikato.s4cc.symbolics.com>
------------------------------------------------------------
I learned SCHEME at MIT in 6.001, "The Structure and Interpretation of Computer
Programs." A year later, the course notes came out in now-famous book form.
6.001 is one of the most popular courses at MIT, and seems to give people an
excellent (though sometimes grueling) introduction to CS.
Now, I work at Symbolics as an instructor. Two weeks ago, I taught my first
Common Lisp One course.
The SICP approach is one I'm very fond of: use SCHEME as a vehicle for
teaching people to \think/. That you're learning SCHEME, in particular, is
secondary.
At Symbolics, we teach students a mental model for understanding the Lisp World
before they ever sit down at a terminal. That seems to work far better than
the approach that most Lisp texts (e.g. LISP by Winston & Horn) take.
Overall: teach students how to THINK. And SCHEME is flexible enough that it
doesn't get in your way a whole lot when you try to translate thought into
program.
[Stephen goes on to compare Scheme with C and Pascal as an introductory
language. I've omitted that in the interests of space, but would be
happy to forward the details to those interested. He argues that it's
possible to teach the basics of the language in about a day. -- vm]
------------------------------------------------------------
From: Erik Talvola <laba-5ac%widow.Berkeley.EDU@violet.berkeley.edu>
------------------------------------------------------------
At UC Berkeley, the introductory CS class for EE and CS majors is CS60A -
namely, Scheme. We use Abelson & Sussman for the textbook, and MIT Scheme
running on Sun 3/50's for the language. I found it to be an interesting
approach, since, as the teacher pointed out, everyone is pretty much equal
going into the class since nobody learns Scheme/Lisp in high school.
In A&S, we covered up to the Meta-Circular Evaluator and some of the logic
programming stuff. This year, they are doing the entire logic programming
section and are doing a little on the register-machine simulator. Who
knows? Maybe next year they will cover the whole book in CS60A. To
summarize, I enjoyed the class because I was expecting a boring Pascal
class (that is what the course catalog says about 60A!) - instead, I got
a chance to use a language I had virtually no experience with (I used
Lisp a little on an Apple II - but that was it).
The CS60A class at Berkeley is intended for incoming freshman in their
first semester. Math 1A (Calculus) is listed as a prerequisite, but no
math is really necessary in the course - maybe a little knowledge of
what integration and differentiation are, but that's it.
------------------------------------------------------------
From: Dan Grim <grim@louie.udel.edu>
------------------------------------------------------------
The Electrical Engineering Department at the University of Delaware uses
Abelson & Sussman (with Sussman) to teach our first-term freshman course
in programming concepts and algorithms. We did this for the first time
last fall and have not had sufficient experience to decide whether it has
been more successful than the Pascal programming course that we taught
previously. However, from the instructors point of view (mine), I found
it much easier to concentrate on the ideas of programs and algorithms
rather than the details of programming. We used CScheme on a Pyramid
98-XE for the associated lab!
I think that the student reaction was somewhat negative which was not
unexpected. However, the good students, who would have been bored
silly by Pascal were challenged by Scheme, while the poorer students
had to work harder. We made an explicit decision to try to challenge
the good students rather than cater to the poorer ones. Much of what
is in Abelson & Sussman is quite subtle and I was surprised how many
students got it!
------------------------------------------------------------
End of summary
------------------------------------------------------------
∂07-Mar-88 2003 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Eugene Kohlbecker's net address
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 7 Mar 88 20:03:44 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 7 Mar 88 23:00:31 EST
Date: Mon, 7 Mar 88 23:00:18 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Eugene Kohlbecker's net address
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <337749.880307.JAR@AI.AI.MIT.EDU>
According to the postmaster at uriecl, the address I have for Eugene,
namely
ihnp4!uriecl!csc2::eek@ucbvax.berkeley.edu,
is not currently working, and hasn't been working for a while. If
there's something you need to tell him (e.g. about the upcoming
meeting(s)) you should probably use phone or US mail.
Does anyone have a different, possibly working, net address for him?
∂08-Mar-88 1605 @MC.LCS.MIT.EDU:mcvax!cwi.nl!uucp@uunet.UU.NET standardization meeting
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 8 Mar 88 16:05:43 PST
Received: from uunet.UU.NET (TCP 30003106601) by MC.LCS.MIT.EDU 8 Mar 88 18:51:54 EST
Received: from mcvax.UUCP by uunet.UU.NET (5.54/1.14) with UUCP
id AA21270; Tue, 8 Mar 88 18:50:48 EST
Received: by mcvax.cwi.nl; Wed, 9 Mar 88 00:22:53 +0100 (MET)
Received: by diku.dk (5.51/smail2.5/ease)
id AA22694; Tue, 8 Mar 88 20:16:12 +0100
Date: Tue, 8 Mar 88 20:16:12 +0100
From: mcvax!diku.dk!danvy@uunet.UU.NET (Olivier Danvy)
Message-Id: <8803081916.AA22694@diku.dk>
To: rrrs-authors@mc.lcs.mit.edu
Subject: standardization meeting
Hi,
I won't be able to participate to the next Scheme meeting at IU,
but will attempt to come to the one around the Lisp Conference.
(Coming from Europe is a bit of a long way for one Saturday.)
Could it be possible to communicate the schedule of events
the next 26th of March, for the absent participants?
What about, in particular, voting?
Olivier
∂08-Mar-88 1624 @MC.LCS.MIT.EDU:mcvax!cwi.nl!uucp@uunet.UU.NET next report on Scheme
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 8 Mar 88 16:24:34 PST
Received: from uunet.UU.NET (TCP 30003106601) by MC.LCS.MIT.EDU 8 Mar 88 19:12:47 EST
Received: from mcvax.UUCP by uunet.UU.NET (5.54/1.14) with UUCP
id AA21254; Tue, 8 Mar 88 18:50:37 EST
Received: by mcvax.cwi.nl; Wed, 9 Mar 88 00:23:30 +0100 (MET)
Received: by diku.dk (5.51/smail2.5/ease)
id AA22809; Tue, 8 Mar 88 20:18:15 +0100
Date: Tue, 8 Mar 88 20:18:15 +0100
From: mcvax!diku.dk!danvy@uunet.UU.NET (Olivier Danvy)
Message-Id: <8803081918.AA22809@diku.dk>
To: rrrs-authors@mc.lcs.mit.edu
Subject: next report on Scheme
The denotational specification of Scheme in the r3rs does not
address the mappings of variables (car, cdr, etc.)
to functions (car, cdr, etc.) in the initial environment,
although these functions are described.
Should this be fixed in the next report?
In particular, it would cover how variables shadow each other,
as in
((lambda (car) (car '(1 2 3))) cdr) ---> (2 3)
Also, quote is not described, and it needs some precautions
because it realizes an upward connection: it translate a syntactic
construct to a semantic object.
Finally, has someone proposed already a
call-with-current-environment
similar in spirit to call-with-current-continuation?
(1) The environment could be a function
Variable --> Value
to model the evaluation of a variable
and/or
Bound-Variable * Value ---> Unspecified
to model set!
(2) Or it could be a function
Variable --> Location
although it would introduce the concept of location,
and of accessing and updating a location.
Similarly to define a new location, at the top level or internally.
Anyway it would functionalize the environments got from THE-ENVIRONMENT
in CScheme.
Olivier
∂10-Mar-88 0550 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu search for IBM-PC (compatible) scheme
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 10 Mar 88 05:50:27 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 10 Mar 88 08:46:55 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA13279; Thu, 10 Mar 88 04:37:54 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 4 Mar 88 22:39:36 GMT
From: ola@cs.duke.edu (Owen L. Astrachan)
Organization: Duke University CS Dept.; Durham, NC
Subject: search for IBM-PC (compatible) scheme
Message-Id: <11230@duke.cs.duke.edu>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I would appreciate pointers to any version of scheme that will run on an IBM
pc or compatible. I have heard of pc-scheme (from TI?) but don't know
anything about it. Does it work well, how much does it cost, from where is
it obtainable, etc.
Any pointers to public domain (hah hah) schemes that run on such machines
would be appreciated as well.
Please respond via e-mail, I'll summarize if requested.
Thanks.
Owen L. Astrachan CSNET: ola@duke
Dept.of Computer Science ARPA: ola@cs.duke.edu
Duke University UUCP: {ihnp4!decvax}!duke!ola
Durham NC 27706 Phone (919)684-5110 Ext. 229
∂10-Mar-88 1722 @MC.LCS.MIT.EDU,@RELAY.CS.NET:willc%tekchips.CRL@tektronix.tek.com false
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 10 Mar 88 17:22:37 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 10 Mar 88 20:20:02 EST
Received: from relay2.cs.net by RELAY.CS.NET id ad14661; 10 Mar 88 19:47 EST
Received: from tektronix.tek.com by RELAY.CS.NET id dc01153; 10 Mar 88 19:38 EST
Received: by tektronix.TEK.COM (5.51/6.24)
id AA10652; Thu, 10 Mar 88 14:40:39 PST
Received: by tekchips.CRL.TEK.COM (5.51/6.24)
id AA26765; Thu, 10 Mar 88 14:39:27 PST
Message-Id: <8803102239.AA26765@tekchips.CRL.TEK.COM>
To: rrrs-authors@mc.lcs.mit.edu
Cc: willc%tekchips.crl.tek.com@RELAY.CS.NET
Subject: false
Date: 10 Mar 88 14:39:25 PST (Thu)
From: willc%tekchips.CRL%tektronix.tek.com@RELAY.CS.NET
I would like to request that the next revision of the Scheme
report not specify whether the empty list counts as true or
as false.
I think we all recognize that the empty list counts as false
only because Scheme came out of a Lisp tradition in which NIL
served as both the empty list and as the false value. When
we decided to distinguish #f from the empty list, we felt
that we had to make allowances for existing implementations
that confuse the two. Since such implementations could not
possibly have the empty list count as true, we made it count
as false. This was a mistake; we should have left it
unspecified, just as it was unspecified whether the empty
list was distinct from #f.
The R3RS states quite explicitly that the reason the empty
list counts as false is "for compatibility with existing
programs and implementations that assume this to be the
case". As I explain later in this message, compatibility
can be maintained without requiring that all implementations
perpetuate this mistake; we did not realize this at the time.
Existing implementations would not have to change. They
could take advantage of the underspecification to have the
empty list continue to count as false, just as many
implementations take advantage of the loophole that lets
the empty list be identical to #f.
Five or ten years from now, after we've required the empty
list to be distinct from #f, perhaps we can require that the
empty list count as true. Not now.
REASONS FOR CHANGE
If we are thinking of formal standardization, we should keep
things out of the standard that we might regret later. The
fact that the empty list counts as false falls into that
category.
Having the empty list count as false makes it harder to do
type inference, because for example you can't tell whether
a procedure that returns the empty list is supposed to return
a boolean or a list.
That is why it is considered bad style for a programmer to
write '() when returning a boolean value, because this makes
it hard for human readers to do the "type inference". The
existence of implementation modes that detect the use of the
empty list as a boolean would help programmers to develop
better style. (For example, my translations of the Gabriel
benchmarks into Scheme have many such stylistic horrors,
but it was impractical for me to track them down because
I didn't have an implementation that would catch them for
me.)
The way that the R3RS is written encourages readers to believe
that the empty list is distinct from #f. So far as I know, it
goes out of its way to allow them to be the same only in the
English description of NULL?. This shows that we expected
future implementations of Scheme to distinguish #f from the
empty list.
People learning Scheme are confused if the empty list is the
same as #f (unless their brains have already been addled by
exposure to some other dialect of Lisp). This shows that
future implementations of Scheme should distinguish #f from
the empty list.
One of the things that discourages implementors from making
the empty list distinct from #f is the fact that the empty
list counts as false. On many architectures this makes it
slower to test a boolean value (unless the implementor
biases the representations to take this problem into account,
which would probably make other operations slower). In
MacScheme, for example, testing a boolean return value
currently looks like
cmp.l #F,RESULT
beq ---
but would look like
cmp.l #NULL,RESULT
beq ---
cmp.l #F,RESULT
beq ---
if #f were different from the empty list.
So the change is useful to preserve our flexibility for the
future, for type inference/checking, to encourage good
style, and to prevent implementations that work the way we
intended and the way users expect from paying a (very small)
performance penalty.
COMPATIBILITY
Suppose I want to build an implementation in which the empty
list does not count as false. (I do.) Won't I be breaking
a lot of code?
Surprisingly not. I can provide a compiler switch that
people can use to compile their code as though the empty
list counts as false. That will keep users of old code
happy without penalizing writers of new code.
What about the procedure library? The only standard Scheme
procedure affected by the change is the NOT procedure. I
will thus have to provide two versions of NOT, one for
compatibility with old code and another for new code, and
have the compiler switch arrange to compile in an environment
which differs from the standard environment only for NOT.
Not all implementors will want to take even this minimal
trouble to support a compatibility mode, and that's fine.
All I'm asking is that Scheme let me and like-minded
implementors support a "progressive" mode in which the
empty list counts as true, and let me and like-minded users
write code using that mode.
What do you say?
BOOKS
From glancing at S&ICP and TLL, I don't think they would be
significantly affected by this. Both are written as though
(= 3 4) returns the symbol NIL, so they would be no less
accurate than before. Abelson and Sussman early define
false as NIL and true as non-NIL, and use the terms "true"
and "false" throughout the rest of the book, so there are
only a couple of pages where a teacher would have to make
a correction, and teachers have to make a correction there
even now.
William Clinger
∂10-Mar-88 1747 @MC.LCS.MIT.EDU:Pavel.pa@Xerox.COM Re: false
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 10 Mar 88 17:47:21 PST
Received: from Xerox.COM (TCP 1500006350) by MC.LCS.MIT.EDU 10 Mar 88 20:46:03 EST
Received: from Cabernet.ms by ArpaGateway.ms ; 10 MAR 88 17:45:27 PST
Date: Thu, 10 Mar 88 17:44:50 PST
From: Pavel.pa@Xerox.COM
Subject: Re: false
In-reply-to: <8803102239.AA26765@tekchips.CRL.TEK.COM>
To: willc%tekchips.CRL%tektronix.tek.com@RELAY.CS.NET
Cc: Plass.pa@Xerox.COM
Cc: rrrs-authors@mc.lcs.mit.edu
Message-ID: <880310-174527-2808@Xerox>
I very much support this change. Cedar Scheme already has false not equal to
the empty list and it would certainly make our lives easier (and our code
faster) if we didn't have to treat them as though they were the same for the
purposes of testing predicates. Since we are intending to push very hard
towards a strong typing discipline, this will also help our type inference
engine, as pointed out by Will. Since we don't have to maintain compatibility
with any old Scheme/Lisp code, we are feeling free to make our implementation
maximally strict about all of the other undefined values and effects; this makes
it possible for code that runs in Cedar Scheme to run in any other
implementation. Will's change would be a fine addition to that set of
strictnesses.
Pavel Curtis
Xerox PARC/CSL
∂11-Mar-88 0910 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU false
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 11 Mar 88 09:10:04 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 11 Mar 88 12:09:41 EST
Date: Fri, 11 Mar 88 12:09:07 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: false
To: willc%tekchips.tek.com@RELAY.CS.NET
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of 10 Mar 88 14:39:25 PST (Thu) from willc%tekchips.CRL%tektronix.tek.com at RELAY.CS.NET
Message-ID: <339858.880311.JAR@AI.AI.MIT.EDU>
I support this change. However:
Date: 10 Mar 88 14:39:25 PST (Thu)
From: willc%tekchips.CRL%tektronix.tek.com at RELAY.CS.NET
One of the things that discourages implementors from making
the empty list distinct from #f is the fact that the empty
list counts as false. On many architectures this makes it
slower to test a boolean value (unless the implementor
biases the representations to take this problem into account,
which would probably make other operations slower). In
MacScheme, for example, testing a boolean return value
currently looks like
cmp.l #F,RESULT
beq ---
but would look like
cmp.l #NULL,RESULT
beq ---
cmp.l #F,RESULT
beq ---
if #f were different from the empty list.
Unless I'm overlooking some vagaries of the way byte and word
instructions work on the 680x0, then I think you can do better than
this, if you can arrange that the low N bits (for N = 8 or 16) of #f and
() are the same, and different from the low N bits of every other
object. Then the false test becomes
cmp.w #NO,RESULT ;Or cmb.b
beq ---
where NO is the distinctive false bit pattern.
On the 680x0, if RESULT is not a register, then an offset of 2 or 3 must
be added to the effective address. On the little-endian VAX the right thing
happens automatically.
"Always looking for better kludges to promote inelegance."
And another nit:
Having the empty list count as false makes it harder to do
type inference, because for example you can't tell whether
a procedure that returns the empty list is supposed to return
a boolean or a list.
If type inference is a concern, then it seems to me that accepting, say,
the symbol T as a true value is just as much of a problem as accepting
the empty list as a false one; in either case you are going to have
trouble deducing that something is a boolean. Seems to me that the only
way to make type inference work well is to not only separate () from #f,
but make it be an error to allow anything other than a boolean as the
value of a test in an IF. I suspect this position would be too radical
to be accepted by most of us, perhaps even including me.
In spite of these objections: as stated above, I support making the
trueness or falseness of () be unspecified.
∂11-Mar-88 0953 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU (SYMBOL? #t) ==> ?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 11 Mar 88 09:53:19 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 11 Mar 88 12:50:18 EST
Date: Fri, 11 Mar 88 12:50:11 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: (SYMBOL? #t) ==> ?
To: ziggy@VX.LCS.MIT.EDU
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Thu 10 Mar 88 14:12:19 est from Michael R. Blair <ziggy at VX.LCS.MIT.EDU>
Message-ID: <339871.880311.JAR@AI.AI.MIT.EDU>
Date: Thu, 10 Mar 88 14:12:19 est
From: Michael R. Blair <ziggy at VX.LCS.MIT.EDU>
To: jar
Re: (SYMBOL? #t) ==> ?
Chris Hanson and I noticed a possible non-ideality in the
Revised↑3 report. Specifically,
(SYMBOL? #t) ==> ?
We think it should be #f but the manual does not specify?
I'm not sure why you single out the question of disjointness of the
boolean and symbol types; the report is also mute on the question of
what (pair? 3) returns. One might infer from the formal semantics that
the types explicitly listed in the domain equation for expressed values
are disjoint, but some uncertainty is in order since
(a) the semantics of the built-in type predicates aren't given,
(b) the text says that certain deviations from the domain equations are
allowed (e.g. characters needn't be a distinct type, and () possibly=
#f); so why not others?
My interpretation is that types must be disjoint except where explcitly
stated otherwise in the text of the report. In particular:
(number? 'a) => #f
(symbol? #t) => #f
(boolean? 't) => #f
(vector? #\c) => unspecified
(boolean? '()) => unspecified
Common Lisp: The Language addresses the question of type disjointness in
a brief section devoted to that purpose. The scheme report should also
say something explicit on this topic. Before the report can say
something comprehensive, however, the rrrs-authors will have to decide
some sticky, previously unraised questions:
- Are the input-port and output-port types distinct from the others?
[My opinion: yes, as long as all implementations already do this.]
- Is the procedure type disjoint from others?
[Yes.]
- Is the type of promises disjoint from the others?
[No, it's acceptable to implement them as procedures or vectors.]
- Is the type of eof-objects disjoint from the others?
[I don't care.]
From the above it's clear that we don't really have adequate terminology
to talk about this question. I want adjectives to apply to the word
"type" to distinguish the class of types that are known to be disjoint
from each other (and thus distinguishable using type predicates: (foo?
x) = (bar? x) iff foo = bar) from the class of types that
aren't (in which case you might have a foo? predicate but no claim about
what other predicates return for things for which foo? returns true).
Suggestions? Something like "latent" and "manifest", except that those
mean something different.
Fortunately, Scheme as it stands doesn't have subtyping like Common Lisp
does (except among number types, which are already dealt with), so it
should be possible to make the discussion tighter and less confusing
than that in CLtL.
∂11-Mar-88 1014 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU [cmb%DERRZE0.BITNET: Clyde Camp's PC Scheme utilities?]
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 11 Mar 88 10:14:44 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 11 Mar 88 12:58:35 EST
Date: Fri, 11 Mar 88 12:58:28 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: [cmb%DERRZE0.BITNET: Clyde Camp's PC Scheme utilities?]
To: scheme@MC.LCS.MIT.EDU
Reply-to: cmb%DERRZE0.BITNET at CUNYVM.CUNY.EDU (Clemens Beckstein, IMMD VI - Uni Erlangen)
Message-ID: <339873.880311.JAR@AI.AI.MIT.EDU>
Date: Thu, 10 Mar 88 12:24:06 MET
From: cmb%DERRZE0.BITNET at CUNYVM.CUNY.EDU (Clemens Beckstein, IMMD VI - Uni Erlangen)
To: scheme-request at mc.lcs.mit.edu
Re: Clyde Camp's PC Scheme utilities?
Who can show me a way to the latest version of Clyde Camp's utilities
for PC Scheme (TI Scheme)? The version I have (from a colleague who is
unreachable for quite some time) has compatibility problems with the new
PC Scheme V3.0 (e.g. the utility package NEWSTL.FSL because of the changed
READ-LINE function of Version 3.0 and UTILITY.FSL because of changes to
the set of MACRO handling PC Scheme functions).
I'd prefer a way via email from my BITNET account but a floppy transfer
is OK too...
- Clemens Beckstein
c/o Dept. of Comp. Science #6
University of Erlangen
Martenstr. 3
D-8520 Erlangen, W.Germany
email: cmb@derrze0.bitnet (derrze zero .bitnet)
∂11-Mar-88 1053 @MC.LCS.MIT.EDU:ALAN@AI.AI.MIT.EDU false
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 11 Mar 88 10:53:06 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 11 Mar 88 13:00:54 EST
Date: Fri, 11 Mar 88 13:00:23 EST
From: Alan Bawden <ALAN@AI.AI.MIT.EDU>
Subject: false
To: willc%tekchips.tek.com@RELAY.CS.NET
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Fri 11 Mar 88 12:09:07 EST from Jonathan A Rees <JAR at AI.AI.MIT.EDU>
Message-ID: <339877.880311.ALAN@AI.AI.MIT.EDU>
Let me make sure I understand the proposal.
(define (false-test) (list (eq? '() '#F) (not '())))
Currently a conforming Scheme implementation may return either (#T #T) or
(#F #T) as the value of (FALSE-TEST). The proposal is to allow
implementations in which (#F #F) is returned.
It might be argued that (#T #T) and (#F #F) should be the only legal cases,
and (#F #T) should be eliminated. But that is not the current proposal.
Correct?
∂11-Mar-88 1132 @MC.LCS.MIT.EDU:MKATZ@A.ISI.EDU Re: false
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 11 Mar 88 11:32:38 PST
Received: from A.ISI.EDU (TCP 3200600147) by MC.LCS.MIT.EDU 11 Mar 88 13:17:29 EST
Date: Fri 11 Mar 88 13:15:38-EST
From: Morris Katz <MKATZ@A.ISI.EDU>
Subject: Re: false
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <12381522718.29.MKATZ@A.ISI.EDU>
I agree in principle with Will's suggestion regarding #f and the empty list;
but, I would advocate going one step farther. I believe that it is important
semantically that (null? #f) return #f and therefore whether the empty
list is equivalent to #f cannot be left unspecified. While I understand
the desire not to become gratuitously incompatible with either Commonlisp
or old revisions of Scheme, I feel that the equivalence of #f and the empty
list is a serious semantic error which should no longer be propogated. If
we were able to decide that (car '()) would no longer be required to return
'(), then I see no reason why we can't make this improvement as well.
Morry Katz
-------
∂11-Mar-88 1203 @MC.LCS.MIT.EDU:jinx@CHAMARTIN.AI.MIT.EDU next report on Scheme
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 11 Mar 88 12:03:20 PST
Received: from chamarti (TCP 2206400253) by MC.LCS.MIT.EDU 11 Mar 88 14:50:51 EST
Received: by CHAMARTIN.AI.MIT.EDU; Fri, 11 Mar 88 14:59:02 est
Date: Fri, 11 Mar 88 14:59:02 est
From: jinx@CHAMARTIN.AI.MIT.EDU (Guillermo J. Rozas)
Message-Id: <8803111959.AA23113@chamarti>
To: mcvax!diku.dk!danvy@uunet.UU.NET
Cc: rrrs-authors@mc.lcs.mit.edu
In-Reply-To: Olivier Danvy's message of Tue, 8 Mar 88 20:18:15 +0100 <8803081918.AA22809@diku.dk>
Subject: next report on Scheme
Reply-To: jinx@zurich.ai.mit.edu
Finally, has someone proposed already a
call-with-current-environment
similar in spirit to call-with-current-continuation?
(1) The environment could be a function
Variable --> Value
to model the evaluation of a variable
and/or
Bound-Variable * Value ---> Unspecified
to model set!
(2) Or it could be a function
Variable --> Location
although it would introduce the concept of location,
and of accessing and updating a location.
Similarly to define a new location, at the top level or internally.
Anyway it would functionalize the environments got from THE-ENVIRONMENT
in CScheme.
This procedure has been proposed in the past. There are a few
problems with it, some political and some technical:
1) Not all implementations support first class environments.
Furthermore, some designers/implementors abhor them. It is therefore
unlikely that consensus will be reached on anything involving them.
2) The semantics of a procedural CALL-WITH-CURRENT-ENVIRONMENT are not
clear. In particular, which environment is handed to the receiver?
Many possibilities come to mind, including the following:
1: The environment where CALL-WITH-CURRENT-ENVIRONMENT is closed.
2: The environment where the variable CALL-WITH-CURRENT-ENVIRONMENT is
evaluated.
3: The environment where the combination which results in an
application of the value of CALL-WITH-CURRENT-ENVIRONMENT is
evaluated.
4: The environment where the receiver is closed.
5: The environment where the body of the receiver will be evaluated.
None of these are really adequate:
1: Pretty useless. May as well define it as a constant.
2: It makes some variables special, hard to handle by
compiler/interpreter. Furthermore, it probably does not have the
desired effect in cases like
(define (foo) call-with-current-environment)
(let ((x 3))
((foo) (lambda (env) env)))
3: This is probably the desired semantics. It has the nice
property that THE-ENVIRONMENT can expand trivially into
((absolute call-with-current-environment) (lambda (env) env))
Unfortunately, it forbids certain kinds of EVLIST tail recursion.
4: This is pretty good. The same expansion that works in 3 above
works here too. Unfortunately it forbids certain kinds of
environment optimization. For example in,
(call-with-current-environment (generate-proc 2 3))
GENERATE-PROC must return a procedure whose format can be
understood by CALL-WITH-CURRENT-ENVIRONMENT. Since GENERATE-PROC
might be compiled out of line, this forces the compiler to avoid
environment optimization in most environments.
5: This has the same problems that 4 does and it harms incremental
definition as well: The environment obtained is most likely not
the one where the definitions are desired (the parent environment
frame is the one the user probably wants).
The real issue is that by being a special form, the correct things
"happen":
The environment where the special form is evaluated is the environment
desired, so it is certainly available when the code is executed.
A convenient syntactic marker is provided so that optimizing compilers
can discriminate at compile time between environments used in a
"first-class" way, and those which cannot be examined by the user in a
similar way (modulo debuggers, etc, which are always special). The
compiler has full freedom to implement these other environments, since
only code generated by the compiler at that time (or the debugger)
will ever need to examine them.
In order to understand my point, please consider the following
(somewhat forced) analogy:
Eliminate LAMBDA as a special form from the language in favor of a
procedural constructor:
(lambda (x y z) <code>)
becomes
(make-procedure '(x y z) '<code>)
The "bad" cases arise from things similar to
(foo '<code>)
where FOO is compiled in a separate file and is defined as
(define (foo code)
(make-procedure '(a b c) code))
or
(make-procedure (generate-arg-list) '<some code>)
∂11-Mar-88 1326 @MC.LCS.MIT.EDU:andy%hobbes@ads.com Re: (SYMBOL? #t) ==> ?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 11 Mar 88 13:26:13 PST
Received: from ads.com (TCP 20071200430) by MC.LCS.MIT.EDU 11 Mar 88 16:18:49 EST
Received: from hobbes.ads.com by ads.com (5.58/1.9)
id AA00697; Fri, 11 Mar 88 12:35:07 PST
Received: by hobbes.ads.arpa (3.2/SMI-3.2)
id AA00448; Fri, 11 Mar 88 12:31:28 PST
Date: Fri, 11 Mar 88 12:31:28 PST
From: andy%hobbes@ads.com (Andy Cromarty)
Message-Id: <8803112031.AA00448@hobbes.ads.arpa>
To: JAR@ai.ai.mit.edu
Subject: Re: (SYMBOL? #t) ==> ?
Cc: rrrs-authors@mc.lcs.mit.edu
I am concerned that specifying type disjointedness gets us into the
very messy business of
(a) unintentionally and unnecessarily specifying implementation details and
(b) reinforcing the distinction between system-defined and user-defined types.
For example, it should be possible for an implementor to choose to implement
vectors as tagged lists, if lists happen to be unusually efficient in this
implementation (or vice-versa). It appears to me that we do not (yet)
subscribe to the TYPEP model, in which an object "has a type," and that it
is good that we don't. Instead, we treat types as attributes of an object
-- consider (INTEGER? 3) and (NUMBER? 3) -- allowing us to recognize more
cleanly in our code that (a) an object may have several attributes and
(b) there may (or may not) be important relationships between those attributes.
This suggests that if v is a vector and p a pair, then (VECTOR? v) and
(PAIR? p) should be true, but (VECTOR? p) and (PAIR? v) should be
undefined in the Report (i.e. considered to be implementation-dependent).
If there are important counterexamples where it is necessary to know what
an object's type is, as distinct from knowing whether it satisfies the
criteria of a given equivalence class, I suggest we bring out those examples
directly for public scrutiny and discussion. (They could lead to a more
Common LISP-like type model.) My intuition is that such a change is
unnecessary and that Scheme's type model gives the software more latitude
in defining the relationships between different types, given that
[BEGIN OPINION]
the computer science community still seems to be mired in this abstract
data practice of defining types in terms of other types
[END OPINION],
and that instead we might wish to protect and capitalize on Scheme's
apparent underspecification of the types of objects and the relationships
that obtain between those type classes.
asc
p.s. I suspect this represents an argument that (if '() #t #f)
should be undefined in the Report (i.e. implementation-dependent).
Of course, good programming practice would dictate the use of NULL?
where the test-object is a (possibly-empty) list in either case.
∂11-Mar-88 1543 @MC.LCS.MIT.EDU,@RELAY.CS.NET:manis%instr.camosun.bcc.cdn@ean.ubc.ca Paging Simon Kaplan <kaplan@kaplan.cs.uiuc.edu>
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 11 Mar 88 15:42:54 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 11 Mar 88 18:37:25 EST
Received: from relay2.cs.net by RELAY.CS.NET id aa15932; 11 Mar 88 17:28 EST
Received: from ubc by RELAY.CS.NET id aa07824; 11 Mar 88 17:18 EST
Received: by ean.ubc.ca id AA01722; Fri, 11 Mar 88 13:54:23 pst
Date: 11 Mar 88 13:54 -0800
From: Vincent Manis <manis%instr.camosun.bcc.cdn%ean.ubc.ca@RELAY.CS.NET>
To: scheme@mc.lcs.mit.edu
MMDF-Warning: Parse error in original version of preceding line at RELAY.CS.NET
Message-Id: <585*manis@instr.camosun.bcc.cdn>
Subject: Paging Simon Kaplan <kaplan@kaplan.cs.uiuc.edu>
[Sorry about this folks, but...]
Simon, I've tried twice to send you mail at the above address, but both
times it was rejected. Could you please send me a message with a
workable return address? -- v
∂11-Mar-88 1855 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU (SYMBOL? #t) ==> ?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 11 Mar 88 18:55:31 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 11 Mar 88 21:55:21 EST
Date: Fri, 11 Mar 88 21:55:03 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: (SYMBOL? #t) ==> ?
To: andy%hobbes@ADS.COM
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Fri 11 Mar 88 12:31:28 PST from andy%hobbes at ads.com (Andy Cromarty)
Message-ID: <340276.880311.JAR@AI.AI.MIT.EDU>
Date: Fri, 11 Mar 88 12:31:28 PST
From: andy%hobbes at ads.com (Andy Cromarty)
This suggests that if v is a vector and p a pair, then (VECTOR? v) and
(PAIR? p) should be true, but (VECTOR? p) and (PAIR? v) should be
undefined in the Report (i.e. considered to be implementation-dependent).
I knew this topic would spark a lively debate.
As I understand your message, you are saying that a Scheme
implementation in which, say, ALL type predicates returned #T ALWAYS,
would be a correct one. For example, it could be the case that (symbol?
'(a b)) => #t and (pair? 'a) => #t. (I guess it would also have to have
no type errors, but that's a detail.) It seems to me that this makes
the type predicates nearly useless. In that case, they should be
eliminated from the language, making Scheme more like ML (and C and
FORTRAN and ...). Then to make up for this absence, we should have
strong typing.
I think this would break a lot of programs and annoy many users.
I am not an opponent of subtyping or of abstract data types. I
certainly don't want to promote a notion of "the type of" an object,
since an object can have many types. All I am suggesting is that we
specify some set of circumstances in which the type predicates will
return false. We all make some assumptions implicitly now; I just want
the report to codify existing practice. Language like that in CLtL
would be fine -- take a look at it, you'll notice that some things are
left unspecified -- but I would hope for something a little tighter.
∂11-Mar-88 1920 @MC.LCS.MIT.EDU:Pavel.pa@Xerox.COM Re: (SYMBOL? #t) ==> ?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 11 Mar 88 19:20:08 PST
Received: from Xerox.COM (TCP 1500006350) by MC.LCS.MIT.EDU 11 Mar 88 22:19:55 EST
Received: from Salvador.ms by ArpaGateway.ms ; 11 MAR 88 19:10:32 PST
Date: Fri, 11 Mar 88 19:10:23 PST
From: Pavel.pa@Xerox.COM
Subject: Re: (SYMBOL? #t) ==> ?
In-reply-to: <340276.880311.JAR@AI.AI.MIT.EDU>
To: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Cc: andy%hobbes@ADS.COM, rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <880311-191032-2412@Xerox>
Mind you, I'm not sure that I like Andy's proposal, but I thought that I should
correct one of Jon's statements.
Jon says: ``As I understand your message, you are saying that a Scheme
implementation in which, say, ALL type predicates returned #T ALWAYS, would be a
correct one. For example, it could be the case that (symbol? '(a b)) => #t and
(pair? 'a) => #t. (I guess it would also have to have no type errors, but
that's a detail.) It seems to me that this makes the type predicates nearly
useless.''
The type predicates are not useless in general, their use is simply unnecessary
in *that* implementation of Scheme. They are still necessary for the writing of
portable code. Some implementations, such as Cedar Scheme so long as I'm
involved with it, would have all of the disjointness properties you could ask
for and so code written to run under it would need all of those predicates.
Michael Plass here pointed out that one benefit of allowing the various types to
share members is that a very small conforming implementation could be written in
which, for example, all of lists, vectors and strings were implemented as cons
cells (vectors and strings would, of course, use some special marker in the
first CAR). I'm not particularly impressed with this argument, but it does seem
to be valid.
Pavel
∂11-Mar-88 1943 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU (SYMBOL? #t) ==> ?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 11 Mar 88 19:43:09 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 11 Mar 88 22:42:27 EST
Date: Fri, 11 Mar 88 22:41:43 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: (SYMBOL? #t) ==> ?
To: Pavel.pa@XEROX.COM
cc: andy%hobbes@ADS.COM, rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Fri 11 Mar 88 19:10:23 PST from Pavel.pa at Xerox.COM
Message-ID: <340292.880311.JAR@AI.AI.MIT.EDU>
Date: Fri, 11 Mar 88 19:10:23 PST
From: Pavel.pa at Xerox.COM
The type predicates are not useless in general, their use is simply
unnecessary in *that* implementation of Scheme. They are still
necessary for the writing of portable code.
I must be missing something. How could a predicate that might always
return true be at all useful in portable code?
Tell me how to write a symbolic differentiation program, or an
evaluator, that operates on the "obvious" s-expression inputs
(e.g. the list (/ 1 (sqrt (+ 1 x)))) in a world where the types number,
pair, symbol are not disjoint.
∂11-Mar-88 2006 @MC.LCS.MIT.EDU:Pavel.pa@Xerox.COM Re: (SYMBOL? #t) ==> ?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 11 Mar 88 20:05:58 PST
Received: from Xerox.COM (TCP 1500006350) by MC.LCS.MIT.EDU 11 Mar 88 23:05:25 EST
Received: from Salvador.ms by ArpaGateway.ms ; 11 MAR 88 20:03:13 PST
Date: Fri, 11 Mar 88 20:03:09 PST
From: Pavel.pa@Xerox.COM
Subject: Re: (SYMBOL? #t) ==> ?
In-reply-to: <340292.880311.JAR@AI.AI.MIT.EDU>
To: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Cc: andy%hobbes@ADS.COM, rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <880311-200313-1033@Xerox>
Jon asks: ``Tell me how to write a symbolic differentiation program, or an
evaluator, that operates on the "obvious" s-expression inputs (e.g. the list (/
1 (sqrt (+ 1 x)))) in a world where the types number, pair, symbol are not
disjoint.''
Suppose that my only two disjoint types are characterized by the predicates
NULL? and PAIR?. Then I can certainly define other types by making them lists
with various internal structures and unique, particular cons cells as ``tags''
in the car of the top-level cons-cell of the value. Then my other predicates,
SYMBOL? and NUMBER?, simply check for PAIR? first and then test that the CAR is
the special cons cell for that type. Thus, in such an implementation (please,
please keep in mind that I'm not necessarily in favor of the proposal and
certainly not in favor of this implementation; my reputation is at stake
here...) we would have the following implications:
(number? x) => (pair? x)
(symbol? x) => (pair? x)
(number? x) => (not (symbol? x))
(pair? x) => (not (null? x))
and no others not deducible from these. I claim that in such a system I could
write the code you describe by simply checking number? and symbol? before
checking pair? at each point.
Note however, that while I've written (in the sense of a mathematician) the code
you requested, that code would not be portable to an implementation in which any
of the implications above were reversed. In particular, if an implementation
represented symbols and pairs in terms of numbers (never mind about how they get
the right semantics for set-car!), my code would fail because I would be testing
for things in the wrong order.
Hmm. This is a very persuasive argument against all kinds of things not being
disjoint. I think I just firmly moved into the anti-proposal camp. I think
that the issue is unrelated to questions of ``the type'' of an object and is
much more related to the question of which types I want to be able to
distinguish and treat differently. In particular, Andy proposed that one
implementation might want to represent vectors by pairs and another might want
to do the reverse. By the kind of portability argument I've just given, the
Scheme spec would have to specify that at least one of these was not legal, so
that I could figure out the proper portable order in which to test things.
However, I can see no reason to prefer one of these representation choices to
the other, so I would be forced to forbid both of them, since I certainly want
to be able to distinguish pairs and vectors.
Hmm. I guess I'm really firmly in the disjointness camp. I hope no one gets
whiplash reading this note...
Pavel
∂11-Mar-88 2208 @MC.LCS.MIT.EDU:dyb@iuvax.cs.indiana.edu Re: (SYMBOL? #t) ==> ?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 11 Mar 88 22:08:12 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 12 Mar 88 00:05:40 EST
Received: by iuvax.cs.indiana.edu; id AA19307; Fri, 11 Mar 88 23:35:42 EST
Date: Fri, 11 Mar 88 23:35:42 EST
From: R. Kent Dybvig <dyb@iuvax.cs.indiana.edu>
Message-Id: <8803120435.AA19307@iuvax.cs.indiana.edu>
To: JAR@mc.lcs.mit.edu, Pavel.pa@XEROX.COM
Subject: Re: (SYMBOL? #t) ==> ?
Cc: andy%hobbes@ADS.COM, rrrs-authors@mc.lcs.mit.edu
I believe there are two uses for type predicates: (1) to determine
if an object is of a given type, and (2) to determine if an object is
*not* of a given type.
(1) is useful for writing type-safe code, since it allows us to verify,
for example, that an object is a pair before calling "car". In this
case it doesn't matter whether the object happens also to be a string
or symbol, so under Andy's proposal the type predicates would still be
useful. ("doesn't matter" may be a little strong---since it would
matter if I want to be sure not to apply "car" to a string represented
as a list of characters. Therefore, "useful" may be a little strong,
at least if a predicate such as "pair?" returns true for all objects.
The point is we can still use the predicates to write "type-safe" code,
though maybe not "type-sensible" code).
(2) is useful when the type itself determines what operation we want to
perform, as with "write" and "display". It would not be friendly if a
system printed all objects as integers, as it might if they were all
considered integers by "integer?". (I already dislike that I can enter
#\a and receive 97 back.) One might argue that printing objects is for
the system to worry about, but what if I want to write a portable pretty
printer or editor? Or a generic "sequence" mapping procedure, defined
something like:
(define gmap
(lambda (proc seq)
(cond
[(list? seq) ... code for mapping over lists ...]
[(vector? seq) ... code for mapping over vectors ...]
[(string? seq) ... code for mapping over strings ...]
[else 'error])))
I'm likely to get burned if vectors are represented as tagged lists.
If a "minimal" implementation is to be built from pairs using the first
element of the list as a tag, then it should have a tag for pairs as
well as for symbols, vectors, strings, etc. In this way, it can
maintain the illusion of disjoint types, even though the underlying
structure (at one level) is the same. The "pair?", "cons", "car", and
"cdr" procedures provided to the programmer would have to take account
of the tag, of course. This is no different from a standard tagged
object typing system at the machine level.
Kent
∂11-Mar-88 2218 @MC.LCS.MIT.EDU:dyb@iuvax.cs.indiana.edu Re: false
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 11 Mar 88 22:18:20 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 12 Mar 88 00:07:17 EST
Received: by iuvax.cs.indiana.edu; id AA20531; Sat, 12 Mar 88 00:07:30 EST
Date: Sat, 12 Mar 88 00:07:30 EST
From: R. Kent Dybvig <dyb@iuvax.cs.indiana.edu>
Message-Id: <8803120507.AA20531@iuvax.cs.indiana.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: Re: false
I agree with Will that we should make the falseness of () unspecified,
if we can't do better.
But why don't we go all the way on this one, and require that () be
distinct from #f and that only #t and #f be treated as booleans in
conditional expressions? Yes, it would affect a lot of code and a few
books, but only a fraction of what is yet to be written, unless we are
are wasting our time. It is a shame we didn't do it right a long time
ago. Surely it would have been less painful three years ago than now,
and surely it will be less painful now than in another three years.
If we can't agree that it is a good idea to treat only #t and #f as
boolean values, then maybe we can agree that it is a good idea to
require that () be distinct from #f.
∂12-Mar-88 0942 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Scheme on IBM PC
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 12 Mar 88 09:42:27 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 12 Mar 88 12:38:55 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA10602; Sat, 12 Mar 88 09:31:03 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 8 Mar 88 10:07:57 GMT
From: mcvax!diku!daimi!cp@uunet.uu.net (Claus Pedersen)
Organization: DAIMI: Computer Science Department, Aarhus University, Denmark
Subject: Scheme on IBM PC
Message-Id: <1357@daimi.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
We are interested in Scheme for IBM PC's. Please mail references to.
Claus H. Pedersen / cp@daimi.dk (..uunet!mcvax!diku!daimi!cp)
Computer Science Department, Aarhus University
Ny Munkegade 116, DK-8000 Aarhus C, DENMARK
phone: +45 6 12 71 88 / telefax: +45 6 13 99 19 / telex: 64767 aausci dk
∂12-Mar-88 1123 @MC.LCS.MIT.EDU:dyb@iuvax.cs.indiana.edu travel plans
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 12 Mar 88 11:23:22 PST
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 12 Mar 88 14:22:46 EST
Received: by iuvax.cs.indiana.edu; id AA12351; Sat, 12 Mar 88 14:00:58 EST
Date: Sat, 12 Mar 88 14:00:58 EST
From: R. Kent Dybvig <dyb@iuvax.cs.indiana.edu>
Message-Id: <8803121900.AA12351@iuvax.cs.indiana.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: travel plans
Our arpanet link was down for four days last week, from Monday to
Thursday. If anyone tried to send me mail, and it bounced, please
resend. To be safe, you might want to send mail via uucp as well as
arpanet; my arpanet address is dyb@iuvax.cs.indiana.edu and my uucp
address is dyb@iuvax.
The following people have informed me that they are coming to the
meeting from out of town: Hal Abelson, Will Clinger, Gary Brooks, Clyde
Camp, and John Ramsdell. I have also heard that Gerry Sussman and Bill
Rozas are coming. So far I have Will, Gary, and John signed up for
rooms at the Bloomington Ramada Inn. I was supposed to tell the Ramada
Inn the list of names yesterday, but they are willing to give us a few
more days. Please let me know if you plan to attend and about your
travel plans.
If you are interested in sharing a rental car with others who are
travelling to Bloomington, please let me know your flight times and
I'll try to hook you up.
More later...
∂12-Mar-88 1459 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Scheme and C
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 12 Mar 88 14:59:19 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 12 Mar 88 17:41:53 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA15685; Sat, 12 Mar 88 14:34:05 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 10 Mar 88 19:37:34 GMT
From: tobias@locus.ucla.edu
Organization: UCLA Computer Science Department
Subject: Scheme and C
Message-Id: <10235@shemp.CS.UCLA.EDU>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I am interested in a version of Scheme that will
run on an IBM PC/AT and will allow itself either to
be called by a C program or to call a C program.
I have a copy of TI Scheme, but nowhere in the
documentation does it refer to this issue.
Plese send any information by e-mail,
or if you can't reach me, feel free to post your
answer. I will summarize any findings.
Jay Tobias
tobias@cs.ucla.edu
∂14-Mar-88 0529 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: Scheme and C
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 14 Mar 88 05:29:19 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 14 Mar 88 07:50:48 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA22196; Mon, 14 Mar 88 01:21:15 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 13 Mar 88 06:32:38 GMT
From: ncc!alberta!calgary!jameson@uunet.uu.net (Kevin Jameson)
Organization: U. of Calgary, Calgary, Ab.
Subject: Re: Scheme and C
Message-Id: <1456@vaxb.calgary.UUCP>
References: <10235@shemp.CS.UCLA.EDU>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
My version of TI Scheme came with lots of documentation for calling
between Scheme, along with actual examples for ASM, Pascal, and C
files.
∂14-Mar-88 1001 @MC.LCS.MIT.EDU:MKATZ@A.ISI.EDU Types in Scheme
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 14 Mar 88 10:01:09 PST
Received: from A.ISI.EDU (TCP 3200600147) by MC.LCS.MIT.EDU 14 Mar 88 12:40:59 EST
Date: Mon 14 Mar 88 12:38:07-EST
From: Morris Katz <MKATZ@A.ISI.EDU>
Subject: Types in Scheme
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <12382302321.36.MKATZ@A.ISI.EDU>
It is with some regret and with anticipation of a barrage of heated replies
that I make the following statements.
If the goals of our type predicates are to enable the writing of portable code
and to make the writing of some other forms of code easier, then I believe that
we really need two sets of type predicates: one based on the functionlity
intended for an object and the other based on its representation. I
will prefix the predicates of the latter type with the word primitive in the
following examples for expository purposes.
(symbol? 'a) ==> #t
(number? 'a) ==> #f
(primitive-number? 'a) ==> unspecified (depends on whether this implementation
represents symbols as numbers)
Such a type system allows complete flexibility in terms of implementation while
still supporting a maximum amount of type safety. It also allows the
programmer to specify exactly what he means when he uses a type predicate.
Does he care about how the object is being used or what its actual
representation is. These a two quite different things.
Morry Katz
-------
∂14-Mar-88 1037 @MC.LCS.MIT.EDU:gjs@ZOHAR.AI.MIT.EDU false
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 14 Mar 88 10:37:21 PST
Received: from zohar (TCP 2206400256) by MC.LCS.MIT.EDU 14 Mar 88 12:50:50 EST
Received: by ZOHAR.AI.MIT.EDU; Mon, 14 Mar 88 11:59:15 est
Date: Mon, 14 Mar 88 11:59:15 est
From: gjs@ZOHAR.AI.MIT.EDU (Gerald Jay Sussman)
Message-Id: <8803141659.AA26241@zohar>
To: willc%tekchips.CRL%tektronix.tek.com@RELAY.CS.NET
Cc: rrrs-authors@mc.lcs.mit.edu, willc%tekchips.crl.tek.com@RELAY.CS.NET
In-Reply-To: willc%tekchips.CRL%tektronix.tek.com@RELAY.CS.NET's message of 10 Mar 88 14:39:25 PST (Thu) <8803102239.AA26765@tekchips.CRL.TEK.COM>
Subject: false
I agree with Will that we no longer need to specify this crock.
∂14-Mar-88 1055 @MC.LCS.MIT.EDU:daniel@mojave.stanford.edu Types in Scheme
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 14 Mar 88 10:54:53 PST
Received: from mojave.stanford.edu (TCP 4402400016) by MC.LCS.MIT.EDU 14 Mar 88 13:20:57 EST
Received: by mojave.stanford.edu; Mon, 14 Mar 88 10:11:20 PST
Date: Mon, 14 Mar 88 10:11:20 PST
From: Daniel Weise <daniel@mojave.stanford.edu>
To: MKATZ@a.isi.edu
Cc: rrrs-authors@mc.lcs.mit.edu
Subject: Types in Scheme
It is with some regret and with anticipation of a barrage of heated
replies that I make the following statements. If the goals of our
type predicates are to enable the writing of portable code and to make
the writing of some other forms of code easier, then I believe that we
really need two sets of type predicates: one based on the functionlity
intended for an object and the other based on its representation.
I agree. This is the old intensional versus extensional dichotomy,
made clear by Andy's message in which pairs could be implemented as
vectors and vice versa. The portable type predicates want to be
extensional (does this object behave as a pair?), the unportable
type predicates are intensional (is this object a pair?). We obviously
want to ask both types of questions, and it is important that we keep
their differences clear.
Daniel
∂14-Mar-88 1917 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU Types in Scheme
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 14 Mar 88 19:17:08 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 14 Mar 88 22:16:43 EST
Date: Mon, 14 Mar 88 22:15:54 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: Types in Scheme
To: daniel@MOJAVE.STANFORD.EDU
cc: MKATZ@A.ISI.EDU, rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Mon 14 Mar 88 10:11:20 PST from Daniel Weise <daniel at mojave.stanford.edu>
Message-ID: <341753.880314.JAR@AI.AI.MIT.EDU>
Date: Mon, 14 Mar 88 10:11:20 PST
From: Daniel Weise <daniel at mojave.stanford.edu>
... The portable type predicates want to be
extensional (does this object behave as a pair?), the unportable
type predicates are intensional (is this object a pair?). We obviously
want to ask both types of questions, ...
I'm sorry, can you tell me again why you'd want to ask the unportable
("intensional") question in portable code, or in any code, for that
matter? As someone trying to write good code, I want my program to be
as insensitive as possible to the Scheme implementor's representation
decisions -- we all know how perverse implementors can be. Thus I
should never want to use the "intensional" predicates. It seems like
this is more of an argument for eliminating the CHAR? predicate (which
doesn't seem to mean much or me, since character is an "abstract type",
at least as the report stands) than an argument in favor of introducing
a PRIMITIVE-PAIR? predicate (which would be just as useless).
Abstract types may be good for static type checking and program
verification, but I assume we're not talking about that, we're talking
about the dynamic semantics of a dynamically typed language.
The only use I can think of for predicates like CHAR? and PRIMITIVE-PAIR?
is explicit run-time type checking in user code:
(if (not (char? x))
(error "X isn't a character" ...))
This kind of thing always seems kind of fishy to me; how does one decide
when to put these checks in and when not to? The Scheme programmer
can't really do this in any case, because ERROR isn't standard...
And speaking of CHAR?: I notice that CHAR? is an essential procedure.
To be consistent with my remarks above, I would like to suggest that if
characters are to remain not necessarily distinguishable from numbers,
pairs, etc., then this procedure should be made non-essential, and that
it should be present iff the implementation has a distinct
(extensional?) character type.
∂16-Mar-88 1201 @MC.LCS.MIT.EDU,@RELAY.CS.NET:willc%tekchips.CRL@tektronix.tek.com Re: false, (symbol #t), etc
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 16 Mar 88 12:01:09 PST
Received: from RELAY.CS.NET (TCP 1201000005) by MC.LCS.MIT.EDU 15 Mar 88 16:37:05 EST
Received: from relay2.cs.net by RELAY.CS.NET id ab04828; 15 Mar 88 15:54 EST
Received: from tektronix.tek.com by RELAY.CS.NET id aj05874; 15 Mar 88 15:43 EST
Received: by tektronix.TEK.COM (5.51/6.24)
id AA16747; Tue, 15 Mar 88 11:41:36 PST
Received: by tekchips.CRL.TEK.COM (5.51/6.24)
id AA28467; Tue, 15 Mar 88 11:40:13 PST
Message-Id: <8803151940.AA28467@tekchips.CRL.TEK.COM>
To: rrrs-authors@mc.lcs.mit.edu
Cc: willc%tekchips.crl.tek.com@RELAY.CS.NET
Subject: Re: false, (symbol #t), etc
Date: 15 Mar 88 11:40:11 PST (Tue)
From: willc%tekchips.CRL%tektronix.tek.com@RELAY.CS.NET
Reply to Alan Bawden:
In terms of Alan's (define (false-test) (list (eq? '() '#f) (not '()))), my
proposal was to allow (#F #F) as well as (#T #T) and (#F #T).
Reply to Jonathan Rees:
I was aware of the representation trick that Jonathan pointed out, but in the
implementation I am maintaining it is more important that Scheme fixnums have
the same representation as integers and pointers used by the Macintosh Toolbox
in ROM. Such is life.
Reply to Jonathan Rees and Kent Dybvig:
Type inference is a concern, but it will always be heuristic. (You can of
course restrict to the domain of the heuristics, which is how you obtain a
statically typed language). I think I could live with #t as the only true
value, and I might like it better. Regardless, the existence of two false
values seems more random than having all but one value count as true, and
that intuition is backed up by the complexity of implementation, so the
problem of two false values seems more urgent. Furthermore people seem
more confused about #f and the empty list than about #t, so non-#t true
values seem less troublesome in practice.
Reply to Morry Katz and Kent Dybvig:
The R3RS is generally silent on disjointness because we have never agreed on
what is disjoint, mainly because we wanted to "grandfather" existing
implementations of Scheme. It would have been embarrassing to have admitted,
for example, that pairs are not required to be disjoint from numbers, so the
R3RS was deliberately written in a way that encourages readers to jump to
possibly false but reasonable conclusions about disjointness. We expected
that implementations would take the hint and change over time so that we could
be more explicit in future reports. As I recall, the main reason we failed to
specify disjointness was that several implementations needed time to fix
problems such as:
1. vectors implemented as lists
2. characters implemented as integers or strings
3. #f implemented as the empty list
These "grandfather" provisions were discussed in October 1984, and sins #2
and #3, being the most widespread, were explicitly pardoned by the RRRS and
R3RS. I think five years is plenty of warning as well as a good round number,
so I think 1989 would be a good year to add disjointness to the report.
You should suspect my timetable, though, because it's awfully convenient
that while MacScheme currently has problems #2 and #3, I expect them to be
fixed early in 1989. I think the best way to get these changes made is for
users of Scheme to complain about implementations that haven't made them.
Implementors are likely to choose the status quo unless users' complaints
about their current system are much more serious than the complaints
feared from users whose code will break if the system changes.
That's why a number of very smart people designed something like Common Lisp
(which broke everyone's code anyway). Kent is right that the cost of
delaying a needed change is greater than the cost of making it. It's like
delaying a trip to the dentist.
Reply to Morry Katz and Daniel Weise:
(Weise may have been saying this.) I see no reason why the intensional,
implementation-dependent predicates deserve recognition as part of the
language.
Reply to John Ramsdell:
As Jonathan pointed out, the R3RS clearly prohibits the behavior you
abhor. The language designers can't do much about implementation bugs.
I think I speak for all implementors when I say: Please report bugs!
(While MacScheme handles your test case ok, its COND macro still
special-cases the variable t. This was a patch installed four years ago
to ease the transition from t to #t, and I thank you for reminding me
that I forgot to take it out. No one has ever reported it. I'm
surprised I haven't run across it myself, since I often use t as a
variable.)
Peace,
William Clinger
∂16-Mar-88 1201 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU t and nil
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 16 Mar 88 12:00:22 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 15 Mar 88 10:58:05 EST
Date: Tue, 15 Mar 88 10:57:29 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: t and nil
To: ramsdell%linus@MITRE-BEDFORD.ARPA
cc: rrrs-authors@MC.LCS.MIT.EDU
In-reply-to: Msg of Tue 15 Mar 88 07:22:46 EST from John D. Ramsdell <ramsdell%linus at mitre-bedford.ARPA>
Message-ID: <342005.880315.JAR@AI.AI.MIT.EDU>
Date: Tue, 15 Mar 88 07:22:46 EST
From: John D. Ramsdell <ramsdell%linus at mitre-bedford.ARPA>
On another subject, I would like to see that the variables T and NIL
not be treated specially. In particular, a user should be able to
type:
(let ((t '#f)) t) ==> #f
You can already do this, and indeed I do it often. T and NIL are
treated no differently from CAR or LENGTH, which you can also rebind.
The report doesn't mention this case explicitly because it doesn't
really need to; I think it's implied. An example to this effect should
probably be added somewhere, though, perhaps under the description of
LAMBDA.
I don't particularly care whether T and NIL remain. The fact that you
thought NIL was initially bound to () instead of to #F is a good
argument in favor of flushing NIL.
∂16-Mar-88 1201 @MC.LCS.MIT.EDU:jinx@CHAMARTIN.AI.MIT.EDU Types in Scheme
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 16 Mar 88 12:00:52 PST
Received: from chamarti (TCP 2206400253) by MC.LCS.MIT.EDU 15 Mar 88 12:41:19 EST
Received: by CHAMARTIN.AI.MIT.EDU; Tue, 15 Mar 88 12:49:29 est
Date: Tue, 15 Mar 88 12:49:29 est
From: jinx@CHAMARTIN.AI.MIT.EDU (Guillermo J. Rozas)
Message-Id: <8803151749.AA27754@chamarti>
To: JAR@AI.AI.MIT.EDU
Cc: daniel@MOJAVE.STANFORD.EDU, MKATZ@A.ISI.EDU, rrrs-authors@MC.LCS.MIT.EDU
In-Reply-To: Jonathan A Rees's message of Mon, 14 Mar 88 22:15:54 EST <341753.880314.JAR@AI.AI.MIT.EDU>
Subject: Types in Scheme
Reply-To: jinx@zurich.ai.mit.edu
I'm sorry, can you tell me again why you'd want to ask the unportable
("intensional") question in portable code, or in any code, for that
matter? As someone trying to write good code, I want my program to be
as insensitive as possible to the Scheme implementor's representation
decisions
I think you are being too "nitpicky" here. Just because a piece of
code is not portable it does not mean it is not good. To get some
efficiency (or detailed control of precision and accuracy), it may be
necessary, for example, to inquire whether a number (which might
otherwise be COMPLEX?, REAL?, RATNUM?, and INTEGER?) is a FIXNUM? in a
particular implementation. I'm not advocating for
implementation-specific predicates in the language, but it is clear to
me that they are necessary for certain pieces of admittedly
non-portable code. Each implementation should provide a set of
predicates about representation because it MAY matter to someone, and
s/he may have a valid use for them.
∂16-Mar-88 1230 @MC.LCS.MIT.EDU:ramsdell%linus@mitre-bedford.ARPA t and nil
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 16 Mar 88 12:00:05 PST
Received: from mitre-bedford.ARPA (TCP 3200600102) by MC.LCS.MIT.EDU 15 Mar 88 07:26:23 EST
Posted-From: The MITRE Corp., Bedford, MA
Received: from darwin.sun.uucp by linus.research (3.2/4.7)
id AA01458; Tue, 15 Mar 88 07:22:49 EST
From: John D. Ramsdell <ramsdell%linus@mitre-bedford.ARPA>
Posted-Date: Tue, 15 Mar 88 07:22:46 EST
Received: by darwin.sun.uucp (3.2/SMI-3.0DEV3)
id AA20533; Tue, 15 Mar 88 07:22:46 EST
Date: Tue, 15 Mar 88 07:22:46 EST
Message-Id: <8803151222.AA20533@darwin.sun.uucp>
To: rrrs-authors@mc.lcs.mit.edu
Cc: ramsdell@mitre-bedford.ARPA
In-Reply-To: willc%tekchips.CRL%tektronix.tek.com@RELAY.CS.NET's message of 10 Mar 88 14:39:25 PST (Thu) <8803102239.AA26765@tekchips.CRL.TEK.COM>
Subject: t and nil
I support Will's suggestion to not specify whether the empty list
counts as true or as false. I think now is the time for making
(not '()) ==> #f.
On another subject, I would like to see that the variables T and NIL
not be treated specially. In particular, a user should be able to
type:
(let ((t '#f)) t) ==> #f
I like using a local variable named "T". Experience shows that it is
not portable to do so. I think it should be.
I'm not sure why the standard suggests that T and NIL may have initial
values. Those writing portable code which uses T and NIL should start
there code with
(define t '#t)
(define nil '())
I suggest r↑xrs drop any reference to the variables T and NIL. Let T
and NIL be special only in that they have the same name as some Lisp
dialects.
∂17-Mar-88 2338 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu ML
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 17 Mar 88 23:38:22 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 18 Mar 88 02:33:19 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA08902; Thu, 17 Mar 88 21:52:45 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 18 Mar 88 05:42:55 GMT
From: iris!windley@ucdavis.ucdavis.edu (Phil Windley)
Organization: U.C. Davis - Robotics Research Laboratory
Subject: ML
Message-Id: <1478@ucdavis.ucdavis.edu>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
It seems that I remember a discussion in this newsgroup about ML several
months ago. At the time, I wasn't interested enough to save the stuff,
but now I need to know...
Is there a public domain ML interpreter available somewhere?
Phil Windley
Robotics Research Lab
University of California, Davis
∂18-Mar-88 0525 @MC.LCS.MIT.EDU:hal@MURREN.AI.MIT.EDU standardization meeting
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 18 Mar 88 05:25:30 PST
Received: from murren (TCP 2206400263) by MC.LCS.MIT.EDU 18 Mar 88 08:26:10 EST
Received: by MURREN.AI.MIT.EDU; Fri, 18 Mar 88 08:30:27 est
Date: Fri, 18 Mar 88 08:30:27 est
From: hal@MURREN.AI.MIT.EDU (Hal Abelson)
Message-Id: <8803181330.AA00533@murren>
To: rrrs-authors@mc
Subject: standardization meeting
Reply-To: hal@ai.ai.mit.edu
I have invited Dick Gabriel to attend the meeting this weekend.. I
think we need to understand what's been happening with the Lisp ISO
mess and what implications this has for Scheme. With Bartley,
Clinger, and Gabriel there, we should get a good idea.
∂18-Mar-88 0717 @MC.LCS.MIT.EDU:NIKHIL@XX.LCS.MIT.EDU ML
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 18 Mar 88 07:17:06 PST
Received: from XX.LCS.MIT.EDU (CHAOS 2420) by MC.LCS.MIT.EDU 18 Mar 88 10:14:53 EST
Date: Fri 18 Mar 88 10:14:24-EST
From: Rishiyur S. Nikhil <NIKHIL@XX.LCS.MIT.EDU>
Subject: ML
To: scheme@MC.LCS.MIT.EDU
Message-ID: <12383324733.11.NIKHIL@XX.LCS.MIT.EDU>
Dave Macqueen at ATT Bell Labs, Murray Hill, is distributing his implementation
of Standard ML. It is not public domain (there is a token license fee), but
it is meant as a research tool, not a commercial product. Try contacting him
at: dbm.btl@relay.cs.net
or: dbm%research.att.com@relay.cs.net
Nikhil (nikhil@xx.lcs.mit.edu)
-------
∂18-Mar-88 0930 @MC.LCS.MIT.EDU:dbm%research@att.arpa ML compiler -- Standard ML of NJ
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 18 Mar 88 09:30:45 PST
Received: from att.arpa (TCP 1201200131) by MC.LCS.MIT.EDU 18 Mar 88 12:28:10 EST
From: dbm@research.att.com
Date: Fri, 18 Mar 88 11:23:56 EST
To: scheme@mc.lcs.mit.edu
Subject: ML compiler -- Standard ML of NJ
Glad you asked!
I am distributing copies of Standard ML of New Jersey, an incremental
compiler that is currently available for Sun and Vax/Unix. Licenses
are available only to academic institutions at the moment, and there
is no charge. Eventually licenses should be available to anyone, and
then there may be a small license fee.
The version we are currently distributing is a "beta" version (Version
0.18). Version 1.0 should be out by this summer. Standard ML of New
Jersey is being written by Andrew Appel of Princeton, Trevor Jim, a
former student of Andrew's who is now at Bell Labs, and myself.
To obtain a license contract, send me mail, including your name, phone
number, mail address, and email address. It would also be useful if
you would indicate whether you have arpanet ftp access.
Dave MacQueen
macqueen%research.att.com@relay.cs.net
...!research!macqueen
Room 2C-322
AT&T Bell Laboratories
Murray Hill, NJ 07974
(201) 582-7691
∂19-Mar-88 1104 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Scheme for the PC
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 19 Mar 88 11:03:57 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 19 Mar 88 13:59:36 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA16680; Sat, 19 Mar 88 07:15:17 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 18 Mar 88 19:12:12 GMT
From: dxs1521@acf3.nyu.edu (David Suyλλλλλλλλavid Suna)
Organization: New York University
Subject: Scheme for the PC
Message-Id: <607@acf3.NYU.EDU>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I have seen discussions here of scheme for the pc.
How can I get it? ftp would be fine or someplace to
e-mail to for it.
Thanks in advance,
David Suna
dxs1521@acf3.nyu.edu
∂20-Mar-88 0847 @MC.LCS.MIT.EDU:gjs@ZOHAR.AI.MIT.EDU Scheme for the PC
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 20 Mar 88 08:47:42 PST
Received: from zohar (TCP 2206400256) by MC.LCS.MIT.EDU 20 Mar 88 11:39:52 EST
Received: by ZOHAR.AI.MIT.EDU; Sun, 20 Mar 88 11:42:23 est
Date: Sun, 20 Mar 88 11:42:23 est
From: gjs@ZOHAR.AI.MIT.EDU (Gerald Jay Sussman)
Message-Id: <8803201642.AA07040@zohar>
To: dxs1521@acf3.nyu.edu
Cc: scheme@mc.lcs.mit.edu
In-Reply-To: (David Suyavid Suna's message of 18 Mar 88 19:12:12 GMT <607@acf3.NYU.EDU>
Subject: Scheme for the PC
PC Scheme is available from Texas Instruments for $95.
Call 1-800-TI-PARTS.
∂20-Mar-88 1224 @MC.LCS.MIT.EDU:dybvig@silver.bacs.indiana.edu meeting
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 20 Mar 88 12:24:21 PST
Received: from silver.bacs.indiana.edu (TCP 30003147002) by MC.LCS.MIT.EDU 20 Mar 88 15:24:59 EST
Date: Sun, 20 Mar 88 15:22:26 est
From: R. Kent Dybvig <dybvig@silver.bacs.indiana.edu>
To: rrrs-authors@mc.lcs.mit.edu
Subject: meeting
I have sent a schedule for this weekend's meeting along with directions
from the airport to Bloomington to everyone I have heard from who is
planning to attend. If you do not receive this note and you are
planning to attend, please call me at 812/333-8653 or 812/335-6486.
Electronic mail to me is not reliable, but it will probably reach me if
you send it to both "dyb@iuvax.cs.indiana.edu" and
"dybvig@silver.bacs.indiana.edu".
Kent
∂21-Mar-88 0956 @MC.LCS.MIT.EDU:RPG@SAIL.Stanford.EDU Meeting
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 21 Mar 88 09:56:46 PST
Received: from SAIL.Stanford.EDU (TCP 1200000013) by MC.LCS.MIT.EDU 21 Mar 88 12:57:33 EST
Date: 21 Mar 88 0954 PST
From: Dick Gabriel <RPG@SAIL.Stanford.EDU>
Subject: Meeting
To: rrrs-authors@MC.LCS.MIT.EDU
The Chairman and Vice Chairman of X3J13 have asked me to attend the
upcoming Scheme meeting in Indiana. As some of you know, I am the
US representative to ISO/IEC JTC1/SC22/WG 16, which is the ISO Lisp
standardization working group. I was named US representative by ANSI
after nomination by X3. As the US representative, I am required to
represent the entire US Lisp community. Because I had no instructions
or direction from the Scheme community, my representation of it consisted
of these actions:
1. declaring to WG 16 that I had no instructions from the Scheme community
2. announcing my belief that the Scheme community was considering a
formal standardization process
3. declaring that the US had an interest in either Scheme or Common Lisp
as a departure point for ISLISP (the name of ISO Lisp)
4. lobbying against the use of the name ISO Common Lisp as the name of
ISO Lisp
5. lobbying against any actions or statements by WG 16 that would jeopardize
or constrain the activities of the Scheme community were they to pursue
standardization
The next ISO meeting will immediately follow the Lisp and Functional
Programming Conference, at Snowbird, Utah. At working group meetings I am
required to report on national standardization activities. Furthermore, if
there are any actions that the Scheme community wishes to take in the
working group, those actions must be taken by me. Therefore, my attendance
at this meeting is intended to accomplish the following:
1. I can report on the working group meeting
2. I can report on X3J13 activities and responses to the working group meeting
3. I can gather comments that you wish made at the next working group meeting
4. I can accept requests for attendance of the next working group meeting
(though I cannot guarantee such requests can be honored until there is an
ANSI-recognized standardization group for Scheme)
5. I can accept suggestions for the US position at the working group
meetings
6. I will takes notes and prepare a report to WG 16 on the activities at
the Scheme meeting
See you in Bloomington.
-rpg-
∂21-Mar-88 1503 NET-ORIGIN@MC.LCS.MIT.EDU Read Macros's in Scheme ?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 21 Mar 88 15:03:22 PST
Received: from EDDIE.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 21 MAR 88 18:01:03 EST
Received: by EDDIE.MIT.EDU with UUCP with smail2.5 with sendmail-5.45/4.7 id <AA18545@EDDIE.MIT.EDU>; Mon, 21 Mar 88 17:57:09 EST
From: pierce@golfer.Dayton.NCR.COM
Received: by XN.LL.MIT.EDU; Mon, 21 Mar 88 17:58:07 EST
Posted-Date: Mon, 21 Mar 88 16:41:05 EST
Received: by SCUBED.ARPA (1.2/5.20b)
id AA08436; Mon, 21 Mar 88 14:25:56 pst
Message-Id: <8803212225.AA08436@SCUBED.ARPA>
To: scheme@mc.lcs.mit.edu
Date: Mon, 21 Mar 88 16:41:05 EST
Subject: Read Macros's in Scheme ?
Cc: gene.pierce%dayton.ncr.com@relay.cs.net
X-Mailer: Elm [version 1.5]
I would like to know if read macros are possible in Scheme.
(e.g. Symbolics uses the "setsyntax" function)
Any and all reponses are appreciated.
Thanks,
gene pierce
gene.pierce%dayton.ncr.com@relay.cs.net
--
∂22-Mar-88 0647 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU [OMAHONY: Clyde Camp's Utilities]
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 22 Mar 88 06:47:45 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 22 Mar 88 09:46:14 EST
Date: Tue, 22 Mar 88 09:46:47 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: [OMAHONY: Clyde Camp's Utilities]
To: scheme@MC.LCS.MIT.EDU
Message-ID: <345723.880322.JAR@AI.AI.MIT.EDU>
...
Received: from IRLEARN.BITNET by MITVMA.MIT.EDU (Mailer X1.25) with BSMTP id
7540; Mon, 21 Mar 88 08:01:25 EST
...
Date: 21-MAR-1988 12:54:07 GMT
From: <OMAHONY at CSVAX1.TCD.IE>
To: scheme-request at mc.lcs.mit.edu
Re: Clyde Camp's Utilities
A little while back, someone sent in a request for the latest version
of Clyde Camps Utilities for TI-Scheme. I have not heard of these
before - what are they?
Donal O'Mahony omahony@cs.tcd.ie or (older mailers) omahony@tcdcs.uucp
Computer Science Dept.,
Trinity College,
Dublin,
Ireland
∂22-Mar-88 0722 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU editing
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 22 Mar 88 07:22:12 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 22 Mar 88 09:58:25 EST
Date: Tue, 22 Mar 88 09:58:55 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: editing
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <345726.880322.JAR@AI.AI.MIT.EDU>
This message is to inform everyone that I'm willing to edit the
Revised↑4 Report, even if it has to be put into a form constrained by some
standards organization. I'm keeping track of changes, typos, and other
edits that need to be made.
The main language changes on which I perceive consensus so far are
(1) addition of PEEK-CHAR
(2) changes to number syntax (GJS, GLS, and others have already made
appropriate edits to numbers section)
(3) changes to description & semantics of EQ? and EQV? to
allow multiple empty vectors & strings
Have I forgotten anything?
I also intend to add a more precise description of quasiquote, which of
course will have to be approved first.
∂22-Mar-88 1235 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: xscheme
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 22 Mar 88 12:35:43 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 22 Mar 88 15:33:24 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA21491; Tue, 22 Mar 88 04:37:21 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 21 Mar 88 23:31:20 GMT
From: hpcea!hpccc!ga@hplabs.hp.com (G.A. Gordon)
Organization: HP Corporate Computing Center
Subject: Re: xscheme
Message-Id: <160001@hpccc.HP.COM>
References: <1538@ncsuvx.ncsu.edu>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
/ hpccc:comp.lang.scheme / gjs@ZOHAR.AI.MIT.EDU (Gerald Jay Sussman) / 8:20 pm Mar 2, 1988 /
You said:
I'm just an undergraduate, my opinion doesn't matter.
Why do you feel that way? You have an unhealthy self-image problem.
Your opinion does matter, at least it does to me.
----------
∂23-Mar-88 1510 NET-ORIGIN@MC.LCS.MIT.EDU How can you do things like ?X -> (*var* x) without Read Macros ?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 23 Mar 88 15:10:38 PST
Received: from EDDIE.MIT.EDU by MC.LCS.MIT.EDU via Chaosnet; 23 MAR 88 18:07:02 EST
Received: by EDDIE.MIT.EDU with UUCP with smail2.5 with sendmail-5.45/4.7 id <AA28724@EDDIE.MIT.EDU>; Wed, 23 Mar 88 18:03:43 EST
From: pierce@golfer.Dayton.NCR.COM
Received: by XN.LL.MIT.EDU; Wed, 23 Mar 88 15:00:06 EST
Posted-Date: Wed, 23 Mar 88 13:29:00 EST
Received: by SCUBED.ARPA (1.2/5.20b)
id AA16664; Wed, 23 Mar 88 11:41:57 pst
Message-Id: <8803231941.AA16664@SCUBED.ARPA>
To: scheme@mc.lcs.mit.edu
Date: Wed, 23 Mar 88 13:29:00 EST
Subject: How can you do things like ?X -> (*var* x) without Read Macros ?
Cc: gene.pierce%dayton.ncr.com@relay.cs.net
X-Mailer: Elm [version 1.5]
Sometimes it is very useful to hide some underlying implementation details
when writing systems such as inference engines. Since Scheme doesn't have
ability to handle read macros then is it possible to do
something like the following in a differnet way ?
where "x" is a variable and "?" is a read macro and the "?" read macro
reads the next character, which is "x" and transforms "?X" into
the following list structure (*var* x) . This representation
is useful to the underlying code and the "?x" is useful to
a user to designate unifiable variables in a backward or forward chaining
rule.
Any and all responses are appreciated.
thanks in advance,
Gene Pierce
--
∂24-Mar-88 0933 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU [camp: [OMAHONY: Clyde Camp's Utilities]]
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 24 Mar 88 09:32:54 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 24 Mar 88 10:54:03 EST
Date: Thu, 24 Mar 88 10:54:36 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: [camp: [OMAHONY: Clyde Camp's Utilities]]
To: scheme@MC.LCS.MIT.EDU
Message-ID: <346781.880324.JAR@AI.AI.MIT.EDU>
Date: Wed, 23 Mar 88 13:26:18 CST
From: Clyde Camp <camp at mips.csc.ti.com>
Re: [OMAHONY: Clyde Camp's Utilities]
Organization: TI Computer Science Center, Dallas
The PCS utilities I began distributing some time back have been
upgraded to take advantage of some of the features of PC Scheme 3.0.
For those of you interested in PCS, a set of these utilities and
documentation is available (free) from:
Clyde R. Camp
Texas Instruments, Inc.
P.O.Box 655474, MS 238
Dallas, TX 75266
*=======================================================================*
Send two blank, FORMATTED disks and a SELF-ADDRESSED, STAMPED envelope.
*=======================================================================*
Although written primarily for the TIPC, everything except the
graphics should work on IBMs and IBM clones. The directories are:
UTILITY - Various text windowing, file printing and keyboard handlers
which simplify writing application programs (includes a file
pretty-printer and a new top-level read-eval-print loop which uses an
emacs-like line-editor with the capability to scroll through and edit
previous entries)
SWI - A convenient mechanism for invoking 8086 ASSY routines via SWI-INT.
HELP - A user-extendable on-line help facility which includes all of
the PCS functions and syntax as well as other information on PCS
specific quirks.
GRAF - A graphics package for creating graphics "windows" somewhat
analogous to text windows
PLOT - A general purpose function plotter
GAME1 - Self explanatory - non-graphics for IBM or TIPC
GAME2 - for TIPC graphics
ERR_STAT - more utilities for controlling the status window, testing
for directories and disabling the gc-message
MENUSHEL - two general purpose menu driven command shells handy for
application development.
∂24-Mar-88 1009 @MC.LCS.MIT.EDU,@dewey.udel.edu,@localhost:saunders@UDEL.EDU Re: Scheme as an introductory programming language
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 24 Mar 88 10:09:29 PST
Received: from UDEL.EDU (TCP 1200000140) by MC.LCS.MIT.EDU 24 Mar 88 13:05:34 EST
Received: from dewey.udel.edu by Louie.UDEL.EDU id aa00431; 24 Mar 88 12:53 EST
Received: from localhost by Dewey.UDEL.EDU id aa01681; 24 Mar 88 12:50 EST
To: Vincent Manis <manis%instr.camosun.bcc.cdn%ean.ubc.ca@relay.cs.net>
cc: scheme@mc.lcs.mit.edu
Subject: Re: Scheme as an introductory programming language
In-reply-to: Your message of 07 Mar 88 11:35:00 -0800.
<568*manis@instr.camosun.bcc.cdn>
Date: Thu, 24 Mar 88 12:50:07 -0500
From: David Saunders <saunders@UDEL.EDU>
Message-ID: <8803241250.aa01681@Dewey.UDEL.EDU>
I'm responding rather late to your inquiry on Scheme use.
We use scheme and SICP in our first course here at Delaware. We follow it
with a course which uses Modula2. Together, they seem to provide a good
basis for the rest of the program. We don't push extremely hard. From,
Ableson and Sussman we cover the first 3 chapters, and introduce the
interpreter of chapter 4 in the last week. Some of the students' mathematics
backgrounds are weak, but that has not been a major obsticle. Many take the
course concurrently with Calculus and that works fine. The use of "big O"
and logs gives trouble too, but that is essential CS and we regard it as
our job to build a modicum of skill with those things. Actually, I think
that scheme/lisp is much gentler in its mathematical demands on novices
than pascal. It allows them to get to the essence of programming without
having to fight past artificial distinctions about types of numbers.
The students program in C-scheme on a vax.
-david saunders
∂24-Mar-88 1213 @MC.LCS.MIT.EDU:bh@ernie.Berkeley.EDU How many Schemes can your Vax take?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 24 Mar 88 12:13:20 PST
Received: from ernie.Berkeley.EDU (TCP 20010104415) by MC.LCS.MIT.EDU 24 Mar 88 14:41:14 EST
Received: by ernie.Berkeley.EDU (5.58/1.26)
id AA20285; Thu, 24 Mar 88 11:40:26 PST
Date: Thu, 24 Mar 88 11:40:26 PST
From: bh@ernie.Berkeley.EDU (Brian Harvey)
Message-Id: <8803241940.AA20285@ernie.Berkeley.EDU>
To: scheme@mc.lcs.mit.edu
Subject: How many Schemes can your Vax take?
At Berkeley we have been using Sun (3/50) systems to run
rather large introductory courses. Students use Emacs, C-scheme,
X-windows. While this is a noble experiment and has many
advocates, it is also money-intensive and slow. We are interested in
comparing this to various hypothetical alternatives. One
presumably lower-cost configuration for which others may have useful
experience is time-shared access to a (probably largish) VAX (ULTRIX).
Can you offer data points on how many users can be supported reasonably?
To make the data collection simpler, perhaps you could fill
in the following table:
VAX model #:
megs of memory:
Do you use Emacs? Jove? Vi?
Do you use C-Scheme, Chez Scheme, T, other?
Typical number of users for "good" response:
Typical number for "marginally acceptable" response:
Major advantages or disadvantages:
Any other comments or advice:
Please respond directly to me, rather than to the mailing list. I will
summarize responses.
Thanks.
∂24-Mar-88 1420 @MC.LCS.MIT.EDU:Pavel.pa@Xerox.COM Re: How can you do things like ?X -> (*var* x) without Read Macros ?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 24 Mar 88 14:20:28 PST
Received: from Xerox.COM (TCP 1500006350) by MC.LCS.MIT.EDU 24 Mar 88 16:41:47 EST
Received: from Salvador.ms by ArpaGateway.ms ; 24 MAR 88 13:37:00 PST
Date: Thu, 24 Mar 88 13:36:31 PST
From: Pavel.pa@Xerox.COM
Subject: Re: How can you do things like ?X -> (*var* x) without Read Macros ?
In-reply-to: <8803231941.AA16664@SCUBED.ARPA>
To: pierce@golfer.Dayton.NCR.COM
Cc: scheme@mc.lcs.mit.edu
Message-ID: <880324-133700-4063@Xerox>
You preprocess the input from the user, checking each symbol for a
first-character of "?" and transforming all such uses into the list you
mentioned. Alternatively, you write a parser/scanner for your input language
that has nothing to do with the Scheme function READ.
I prefer the latter idea myself. To my mind, READ's only legitimate purpose is
the reading of real Scheme programs and data.
Pavel
∂24-Mar-88 1616 @MC.LCS.MIT.EDU:gjc%bucsf.bu.edu@buita.BU.EDU How can you do things like ?X -> (*var* x) without Read Macros ?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 24 Mar 88 16:16:14 PST
Received: from buita.BU.EDU (TCP 20061212055) by MC.LCS.MIT.EDU 24 Mar 88 19:13:33 EST
Received: from BU-IT.BU.EDU by buita.BU.EDU (5.58/4.7)
id AA24397; Thu, 24 Mar 88 19:07:20 EST
Received: from bucsf (bucsf.bu.edu) by bu-it.bu.edu (3.2/4.7)
id AA28602; Thu, 24 Mar 88 19:10:12 EST
Return-Path: <gjc@bucsf.bu.edu>
Received: by bucsf (4.12/4.7)
id AA23522; Thu, 24 Mar 88 19:10:07 est
Date: Thu, 24 Mar 88 19:10:07 est
From: gjc%bucsf.bu.edu@buita.BU.EDU (George J. Carrette)
Message-Id: <8803250010.AA23522@bucsf>
To: pierce@golfer.Dayton.NCR.COM
Cc: scheme@mc.lcs.mit.edu, gene.pierce%dayton.ncr.com@relay.cs.net
Subject: How can you do things like ?X -> (*var* x) without Read Macros ?
(1) if you are implementing your own read/eval/print loop for a random
language you can write your own read, or use that CGOLREAD that
someone on this list may have already ported to scheme.
(1.5) you may be able to get away with a read/mung/eval/print loop.
Just mung the result of read before you pass it along.
I teach just this technique to transform ?x into the result of
(make-variable :name 'x) (common lisp, sigh...) in a problem
set on pattern matching and pattern compilation.
(2) If you have evaluation macros, you can always have them mung
the passed-in-structure without mercy, e.g. using the technique (1.5)
(assert (append ?x () ?x))
(assert (append ?x (?a . ?y) (?a . ?y))
(append ?x ?y ?y))
(3) If you dont have evaluation macros, big deal, just quote the arguments,
(assert '(append ?x () ?x))
as long as can call EVAL or COMPILE yourself there is no loss of
generality.
(4) In drastic situations use strings,
(fortran "FUNCTION F(X,Y)
F = X*Y+SIN(X)
RETURN
END")
Note that FORTRAN 77 uses 'FOO BAR' for strings, so this actually works
ok, without having to escape-quote internal double quotes.
-gjc
∂26-Mar-88 1627 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Saving a continuation
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 26 Mar 88 16:27:37 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 26 Mar 88 19:25:18 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA19763; Sat, 26 Mar 88 01:28:42 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 24 Mar 88 14:25:59 GMT
From: pacbell!att-ih!alberta!calgary!jameson@AMES.ARC.NASA.GOV (Kevin Jameson)
Organization: U. of Calgary, Calgary, Ab.
Subject: Saving a continuation
Message-Id: <1488@vaxb.calgary.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
When a continuation is saved, what else must be preserved?
1) Surely the stack history prior to the save?
2) The environment at the time of the save (this is not done, as far as
I can figure out)
3) Anything else?
Thanks
Kevin ...!{ihnp4,ubc-vision}!alberta!calgary!jameson
∂26-Mar-88 1700 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu MIT C-Scheme design info
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 26 Mar 88 17:00:12 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 26 Mar 88 19:26:55 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA19659; Sat, 26 Mar 88 01:23:12 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 24 Mar 88 14:18:52 GMT
From: pacbell!att-ih!alberta!calgary!jameson@AMES.ARC.NASA.GOV (Kevin Jameson)
Organization: U. of Calgary, Calgary, Ab.
Subject: MIT C-Scheme design info
Message-Id: <1487@vaxb.calgary.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I have just been looking through the source for C Scheme v4.1.1 (via the Gnu
distribution), and am almost overcome with the size of the task at hand (to
understand it so I can write my a simpler version for my pc). I recognize
that I could cut away code until I could isolate the major components, but
I would still be left wondering why things were done the way they were.
Did anyone write any design info down when it was being constructed? If so,
is there any way I could obtain a copy to read? Failing that, could anyone
post a design summary if they have one?
Could anyone in the know suggest a starting place and method toward
understanding this implementation?
Is 4.1.1 the latest version?
Thanks
Kevin ...!{ihnp4,ubc-vision}!alberta!calgary!jameson
∂27-Mar-88 1046 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: T operations, etc
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 27 Mar 88 10:46:34 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 27 Mar 88 13:00:35 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA29063; Sat, 26 Mar 88 10:34:53 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 24 Mar 88 22:14:27 GMT
From: mcvax!ukc!its63b!aiva!jeff@uunet.uu.net (Jeff Dalton)
Organization: Dept. of AI, Univ. of Edinburgh, UK
Subject: Re: T operations, etc
Message-Id: <304@aiva.ed.ac.uk>
References: <574814312.20004@minster.york.ac.uk>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
In article <574814312.20004@minster.york.ac.uk> martin@minster.york.ac.uk
writes:
>I've just discovered that T version 3 has an as-far-as-I-can-tell
>undocumented syntax for operations. [...]
> ((operation-name (self op-name next first) . args) . body)
I'd just noticed that myself. Perhaps it is "unreleased", as the T
2.8 release notes used to say of experimental things.
> How many other wonderful things are hiding in T3.0 that people
>don't know about because of the (lack of up-to-date) documentation?
It works the other way too: the LOCALE special form has stopped
working despite being documented in the manual and in Stephen Slade's
book. Nonetheless, I suspect the release notes cover most of the
changes (they cover the LOCALE one) and so expect that the number of
further surprises will be small.
>On a similar note... Has anyone succeeded in re-compiling & linking T3.0,
>or of suspending a T system?
I have not tried rebuilding T, but I have no trouble suspending it
with csh job control on a Sun.
> Has anyone else in Europe/UK got T3.0?
Why, yes: I have one, and I know of at least two others. We should
keep in touch.
Jeff Dalton, JANET: J.Dalton@uk.ac.ed
AI Applications Institute, ARPA: J.Dalton%uk.ac.ed@nss.cs.ucl.ac.uk
Edinburgh University. UUCP: ...!ukc!ed.ac.uk!J.Dalton
∂27-Mar-88 1202 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Where can I get Scheme?
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 27 Mar 88 12:02:07 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 27 Mar 88 13:13:37 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA04295; Sat, 26 Mar 88 17:02:52 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 26 Mar 88 23:46:29 GMT
From: darrell@sdcsvax.ucsd.edu (Darrell Long)
Organization: University of California, San Diego
Subject: Where can I get Scheme?
Message-Id: <4806@sdcsvax.UCSD.EDU>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Hi there! Where can I get sources to Scheme? I can ftp, MILnet prefered.
Thanks, DL
--
Darrell Long
Department of Computer Science & Engineering, UC San Diego, La Jolla CA 92093
ARPA: Darrell@Beowulf.UCSD.EDU UUCP: darrell@sdcsvax.uucp
Operating Systems submissions to: comp-os-research@sdcsvax.uucp
∂27-Mar-88 1421 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu T operations, etc
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 27 Mar 88 14:20:53 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 27 Mar 88 16:31:04 EST
Received: by ucbvax.Berkeley.EDU (5.58/1.26)
id AA08205; Thu, 24 Mar 88 07:51:45 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 19 Mar 88 22:38:32 GMT
From: mcvax!ukc!reading!onion!minster!SoftEng!martin@uunet.uu.net
Organization: Department of Computer Science, University of York, England
Subject: T operations, etc
Message-Id: <574814312.20004@minster.york.ac.uk>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
I've just discovered that T version 3 has an as-far-as-I-can-tell
undocumented syntax for operations. The documentation gives:
(object procedure . method-clauses)
where a method-clause is:
((operation-name self . args) . body)
well, it turns out that a method-clause can also be:
((operation-name (self op-name next first) . args) . body)
where 'self' is bound to the 'object' in which the method-clause was
defined, as before, 'op-name' is bound to the operation being carried out,
'next' is bound to the next 'object' in the 'join' which would have been
asked to field this operation if the present 'object' had not got it, and
'first' is bound to the first 'object' of the 'join' that was asked to
field the operation.
It seems obvious that these are intended to allow more control
over the inheritance of operations. 'first' is the Smalltalk equivalent
of self, and 'next' the equivalent of super! 'op-name' appears to allow
the forwarding of operations.
How many other wonderful things are hiding in T3.0 that people
don't know about because of the (lack of up-to-date) documentation?
On a similar note... Has anyone succeeded in re-compiling & linking T3.0,
or of suspending a T system? Whenever I try to compile things I get syntax
errors (or worse!), and whenever I try to suspend I get an indefinite
recursion in vgc! Help!
Martin
usenet: ...!mcvax!ukc!minster!martin
surface:
Martin C. Atkins
Department of Computer Science
University of York
Heslington
York Y01 5DD
ENGLAND
PS
I'm using the Sun-3 version of T
PPS
Despite the above gripes, I like T very much... It's just that I can't
use it for the things I want unless I can link in some more C routines!
PPPS
Has anyone else in Europe/UK got T3.0?
∂28-Mar-88 0728 @MC.LCS.MIT.EDU:JAR@AI.AI.MIT.EDU T discussion and newsgroups
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 28 Mar 88 07:28:13 PST
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 28 Mar 88 10:23:41 EST
Date: Mon, 28 Mar 88 10:24:22 EST
From: Jonathan A Rees <JAR@AI.AI.MIT.EDU>
Subject: T discussion and newsgroups
To: mcvax!ukc!reading!onion!minster!SoftEng!martin@UUNET.UU.NET
cc: scheme@MC.LCS.MIT.EDU
In-reply-to: Msg of 19 Mar 88 22:38:32 GMT from mcvax!ukc!reading!onion!minster!SoftEng!martin at uunet.uu.net
Message-ID: <348649.880328.JAR@AI.AI.MIT.EDU>
Discussion pertaining T can be carried out on the T-Discussion
mailing list. Send mail to t-discussion-request@MC.LCS.MIT.EDU to
be added. Similarly for C Scheme; info-cscheme-request%OZ@MC.LCS.MIT.EDU.
... unless you do not have access to the Internet, as I understand many
Usenet people do not. In that case, please carry on the conversation
here (or on comp.lang.scheme), as there is no "comp.lang.t" newsgroup to
my knowledge. Or lobby Berkeley to create one. The same goes for C
Scheme (I have repeatedly requested that they create a C Scheme
newsgroup, but they say they are too busy).
And speaking of comp.lang.scheme: please correct me if I'm wrong, but
it's my understanding that messages sent to the Scheme mailing list on
the Internet are forwarded to comp.lang.scheme on Usenet, but not vice
versa. It's possible that there is interesting discussion happening on
comp.lang.scheme that us Internet users are missing out on, but I
wouldn't know. I hear rumors that there exist mailing lists for which
there is mutual forwading between Internet and Usenet (without infinite
loops), but I don't know how to set one up. If anyone would like to
volunteer to do so, please speak up by sending a message to me at
scheme-request@mc.lcs.mit.edu.
- humble moderator.
∂28-Mar-88 1117 @MC.LCS.MIT.EDU:RPG@SAIL.Stanford.EDU CLOS Error Terminology
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 28 Mar 88 11:17:04 PST
Received: from SAIL.Stanford.EDU (TCP 1200000013) by MC.LCS.MIT.EDU 28 Mar 88 14:12:26 EST
Date: 28 Mar 88 1039 PST
From: Dick Gabriel <RPG@SAIL.Stanford.EDU>
Subject: CLOS Error Terminology
To: rrrs-authors@MC.LCS.MIT.EDU
The following is the current section on error terminology in the CLOS
document. I should point out that this section is currently
under debate. The areas of debate are the definitions of ``undefined''
and ``unspecified,'' along with the general philosophy that extensions
are disallowed by default (which is the opposite to Common Lisp):
\beginSection{Error Terminology}
The terminology used in this document to describe erroneous
situations differs from the terminology used in {\it Common Lisp:
The Language}, by Guy L. Steele Jr. This terminology involves {\bit
situations}; a situation is the evaluation of an expression in some
specific context. For example, a situation might be the invocation of
a function on arguments that fail to satisfy some specified
constraints.
In the specification of the \CLOS, the behavior of programs in all situations
is described, and the options available to the implementor are defined. No
implementation is allowed to extend the syntax or semantics of the \OS\ except
as explicitly defined in the \OS\ specification. In particular, no
implementation is allowed to extend the syntax of the \OS\ in such a way that
ambiguity between the specified syntax of \OS\ and those extensions is
possible.
``When situation $S$ occurs, an error is signaled.''
This terminology has the following meaning:
\beginlist
\item{\bull} If this situation occurs, an error will be signaled in
the interpreter and in code compiled under all compiler safety
optimization levels.
\item{\bull} Valid programs may rely on the fact that an error will be
signaled in the interpreter and in code compiled under all compiler
safety optimization levels.
\item{\bull} Every implementation is required to detect such an error
in the interpreter and in code compiled under all compiler safety
optimization levels.
\endlist
``When situation $S$ occurs, an error should be signaled.''
This terminology has the following meaning:
\beginlist
\item{\bull} If this situation occurs, an error will be signaled at
least in the interpreter and in code compiled under the safest
compiler safety optimization level.
\item{\bull} Valid programs may not rely on the fact that an error will be
signaled.
\item{\bull} Every implementation is required to detect such an error
at least in the interpreter and in code compiled under the safest
compiler safety optimization level.
\item{\bull} When an error is not signaled, the results are undefined (see
below).
\endlist
``When situation $S$ occurs, the results are undefined.''
This terminology has the following meaning:
\beginlist
\item{\bull} If this situation occurs, the results are unpredictable. The
results may range from harmless to fatal.
\item{\bull} Implementations are allowed to detect this situation and
signal an error, but no implementation is required to detect the
situation.
\item{\bull} No valid program may depend on the effects of this
situation, and all valid programs are required to treat the effects
of this situation as unpredictable.
\endlist
``When situation $S$ occurs, the results are unspecified.''
This terminology has the following meaning:
\beginlist
\item{\bull} The effects of this situation are not specified in
the \OS, but the effects are harmless.
\item{\bull} Implementations are allowed to specify the effects of
this situation.
\item{\bull} No portable program can depend on the effects of this
situation, and all portable programs are required to treat the situation
as unpredictable but harmless.
\endlist
``The \CLOS\ may be extended to cover situation $S$\negthinspace.''
The meaning of this terminology is that an implementation is free to treat
situation $S$ in one of three ways:
\beginlist
\item{\bull} When situation $S$ occurs, an error is signaled at least
in the interpreter and in code compiled under the safest compiler
safety optimization level.
\item{\bull} When situation $S$ occurs, the results are undefined.
\item{\bull} When situation $S$ occurs, the results are defined and
specified.
\endlist
In addition, this terminology has the following meaning:
\beginlist
\item{\bull} No portable program can depend on the effects of this
situation, and all portable programs are required to treat the situation
as undefined.
\endlist
``Implementations are free to extend the syntax $S$\negthinspace.''
This terminology has the following meaning:
\beginlist
\item{\bull} Implementations are allowed to define unambiguous extensions
to syntax $S$\negthinspace.
\endlist
The \CLOS\ specification may disallow certain extensions while allowing others.
\endSection%{Error Terminology}
∂28-Mar-88 1240 @MC.LCS.MIT.EDU:Pavel.pa@Xerox.COM More for R4RS
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 28 Mar 88 12:40:47 PST
Received: from Xerox.COM (TCP 1500006350) by MC.LCS.MIT.EDU 28 Mar 88 14:27:22 EST
Received: from Semillon.ms by ArpaGateway.ms ; 28 MAR 88 10:43:39 PST
Date: Mon, 28 Mar 88 10:43:18 PST
From: Pavel.pa@Xerox.COM
Subject: More for R4RS
To: rrrs-authors@MC.LCS.MIT.EDU
Message-ID: <880328-104339-3618@Xerox>
A little while ago, Jon asked for any other subjects to be included in R4RS.
Jon, did you mention Will's proposal to make the empty list (optionally) true?
Also, as a new proposal, I'd like to see the functions
CHAR?, INTEGER->CHAR, and CHAR->INTEGER
renamed to
CHARACTER?, INTEGER->CHARACTER, and CHARACTER->INTEGER.
The reason has to do with the contrast between predicate names like BOOLEAN?,
INTEGER?, and RATIONAL? (as opposed to BOOL?, INT?, and RAT?) and the name
CHAR?.
I had a bit of trouble recently trying to find a predicate for character-ness
because I naturally wanted to use the full name of the type, consistently with
the rest of Scheme. I was mildly disgusted when I discovered that the name was
actually the abbreviation, not the full name.
I don't suggest changing the names of the other character operations because
they don't seem to be naming the type itself as explicitly. I know this sounds
fuzzy, but it seems alright to me to have the names CHARACTER->INTEGER and
CHAR-NUMERIC? side-by-side.
Comments?
Pavel
∂30-Mar-88 1005 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: MIT C Scheme design info
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 30 Mar 88 10:05:02 PST
Received: from ucbvax.berkeley.edu (TCP 1200400116) by MC.LCS.MIT.EDU 30 Mar 88 08:39:13 EST
Received: by ucbvax.berkeley.edu (5.59/1.26)
id AA02604; Tue, 29 Mar 88 14:15:20 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 29 Mar 88 00:17:52 GMT
From: att-ih!alberta!calgary!jameson@gargoyle.uchicago.edu (Kevin Jameson)
Organization: U. of Calgary, Calgary, Ab.
Subject: Re: MIT C Scheme design info
Message-Id: <1499@vaxb.calgary.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
The following is a list of most C files used in the MIT C Scheme
interpreter, along with a brief statement of function. Most of the
information is gleaned from the short comment at the beginning of each
file. This list gives a flavor of how the interpreter is organized,
and should help new readers of the code to find their way around.
Note that much (half?) of C Scheme is written in Scheme, and is not
listed here. The microcode interpreter files below actually
interpret many runtime functions which are written in Scheme (such
as the main read-eval-print loop). The Scheme runtime files + the
host interpreter below offer a complete system to the user.
Of course some of the information below may be wrong, though to
the best of my knowledge it is correct. Any mistakes are my own.
- Kevin Jameson, 28 March 88
..!{ihnp4,ubc-vision}!alberta!calgary!jameson
FILE Brief Function
============= ==================================================
scheme.h defs for the interpreter in interpre.c
config.h configuration file describes stk size,heap size, etc
const.h global named constants
fixobj.h format (offsets) of fixed object vector
extern.h extern machine and many other interface dcls
scode.h describes byte code format
sdata.h describes user data object formats
types.h list of object type codes TC_xxx
returns.h list of return codes used by interpreter RC_xxxx
errors.h list of error codes
prims.h list of ids and names (PC_xxx) for all system primitives
object.h defs & access macros for scheme objects
primitive.h macros for defining and handling primitives
boot.c main boot program for scheme interpreter
interpre.h macros for interpreter
zones.h time zones for performance metering
hooks.c hooks into the interp - apply,catch,throw, etc
storage.c prim, arg count tbls, global storage allocs
interpre.c byte code interp coded in continuation passing style
utils.c utils used by interpreter (backout_of_primitive,etc)
lookup.c symbol lookup and manipulation
usrdef.c table of external primitives produced by findprim
extern.c external primitives defined by user
findprim.c builds table of external prims from users files
nihil.c defines unimplemented primitives reqd by scheme
default.h unimplemented default hooks not def'd by user in config.h
cross.doc some doc on the cross syntaxer (byte code compiler)
readme.unx tells where things are in unix version
MATH CODE
generic.c mostly generic math funs for various numeric types
missing.c math utils which wouldn't fit anywhere else
mul.c portable fixnum multiplication
flonum.c floating pt funs, mostly superceded by generic.c
flonum.h defs for flonum.c
fixnum.c fixnum (24 bit) funs, mostly superceded by generic.c
bignum.c bignum arithmetic functions
bignum.h bignum arithmetic declarations
bitops.c extended bitops for infinite precision arithmetic
bitstr.c bitstring functions
DEBUGGING CODE
step.c support for the debugger stepper
xdebug.c useful prims for scheme memory prim debugging
bkpt.c debugger breakpoint functions
bkpt.h debugger breakpoint definitions, macros
debug.c printing and listing functions used by debugger
GARBAGE COLLECTOR
purify.c much like gc, only purifies (whatever that is) instead
daemon.c two gc daemons (obj hash tbl & file closer)
gc.h macros for all gc code (and maybe others)
gccode.h macros for code which does gc-like loops
gcloop.c low level gc stuff
gctype.c maps type codes into gc object type codes
PRIMITIVE FUNCTIONS
fetchpar.c makes implementation parms available to scheme
file.c file i/o primitive scheme functions
hunk.c funs to handle triplet hunk3's for file blocks
io.c scheme io primitives, channel grabbing, etc
list.c list manipulation functions (memq, cons, car, etc)
prim.c primitives which won't fit elsewhere
string.c string primitives, cv strings to/from lists
vector.c vector handling and conversion (to lists) code
FASTLOADER (FASL) FUNCTIONS
translate.h macros for psbtobin, bintopsb (psb=portable scheme binary)
schloader.c standalone prog to load a dumped scheme core?
load.c common code for reading fasl files
bintopsb.c converts fasl files to portable ascii
breakup.c used for fasl conversion?
ppband.c pretty prints fasl files in human format
psbtobin.c converts portable ascii files to fasl format
dump.c common code for dumping fasl files
dumpworld.c core save routine, calls gnu unexec
fasdump.c holds fasdump, fasload, and bandload functions
fasl.h defs for fasl file format
fasload.c reads fasl files, relocates and interns symbols
SCHEME CODE (not related to the Scheme runtime stuff)
chapter1.code from Structure and Interpretation of Computer Programs
chapter2.code from SICP (Abelson & Sussman)
chapter3.code from SICP
chapter4.code from SICP
chapter5.code from SICP
MISCELLANEOUS
ChangeLog only two entries
install main installation notes
Install.unx unix installation notes
Install.vms vms installation notes
Makefile main makefile
Makefile.200 for the 200 series of some machine
Makefile.500 for the 500 series of some machine
Makefile.ind for some other operating system
Makefile.unk for an unknown operating system
Makefile.vax for vax
Readme.vms tells where things are in vms version
TO_DO a wish list
UPGRADE diffs between CScheme release 3 and 4
Wsize.c tests out compiler/machine for bit & math ops
athena.c athena graphics primitives for special terminals
bobcat.c bobcat graphics interface for starbase package
config.dst same as config.h
locks.h for locking heap, etc
os.c selects appropriate operating system file for build
process.c utils to fork inferior processes in unix
regblock.c defines registers used by compiler
unexec.c from gnu-emacs. dumps core on unix systems
unix.c unix specific prims (completed version of unknown.c)
unknown.c os specific blank prim stubs for unknown op system
valret.c emulates ITS valret on a unix system
vms.c vms specific prims (completed version of unknown.c)
vmsall.com vms batch file for compilation
<several other vms batch files have been omitted>
SPECIAL CODE (to handle Scheme language features)
future.c support code for futures
futures.h macros for futures code
history.h defines history data structures
intercom.c single process simulation of futures stuff
∂31-Mar-88 0022 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu availability of Scheme on Atari STs
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 31 Mar 88 00:21:54 PST
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 31 Mar 88 03:19:28 EST
Received: by ucbvax.Berkeley.EDU (5.59/1.26)
id AA27837; Wed, 30 Mar 88 19:21:19 PST
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 28 Mar 88 18:54:22 GMT
From: trwrb!aero!venera.isi.edu!saus@ucbvax.Berkeley.EDU (Mark Sausville)
Organization: Information Sciences Institute, Univ. of So. California
Subject: availability of Scheme on Atari STs
Message-Id: <5148@venera.isi.edu>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Does anybody know if there is a version of Scheme available
for the Atari ST? I know there's something called MacScheme
and it seems like those people could adapt there product
without too much trouble.
thanks,
Mark.
∂31-Mar-88 0619 @MC.LCS.MIT.EDU,@MITVMA.MIT.EDU:MIKEMAC@UNB.BITNET Porting Scheme to our IBM3090 running MVS/XA
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 31 Mar 88 06:19:45 PST
Received: from MITVMA.MIT.EDU (TCP 2227000003) by MC.LCS.MIT.EDU 31 Mar 88 09:15:21 EST
Received: from MITVMA.MIT.EDU by MITVMA.MIT.EDU ; Thu, 31 Mar 88 09:12:57 EST
Received: from UNB by MITVMA.MIT.EDU (Mailer X1.25) with BSMTP id 1391; Thu, 31
Mar 88 09:12:52 EST
Received: by UNBMVS1 (Mailer 1.04.14) id 8112; Thu, 31 Mar 88 10:10:45 AST
Date: Thu, 31 Mar 88 10:10:51 AST
To: SCHEME@MC.LCS.MIT.EDU
Subject: Porting Scheme to our IBM3090 running MVS/XA
From: "Michael J. MacDonald" <MIKEMAC%UNB.BITNET@MITVMA.MIT.EDU>
Message-ID: <ID3536.D880331.T101052.MIKEMAC@UNB>
We are considering porting Scheme to our IBM3090-180/VF. I am seeking
information on a number of items. We currently have the source from MIT
Scheme Version 4.1.1 microcode version 8.2.
What is the latest release of Scheme?
What problems can I expect?
Has anyone ported it to an IBM 370 (MVS) machine?
Does anyone have any advice?
Should we do it from scratch?
Please respond direct, I am not on the List.
Michael MacDonald
Software Specialist, School of Computer Science
University of New Brunswick
Po. Box 4400
Fredericton, New Brunswick
CANADA E3B 5A3
(506) 453-4566
Netnorth/BITNET: MIKEMAC@UNB
∂03-Apr-88 2327 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Re: MIT C Scheme design info
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 3 Apr 88 23:27:36 PDT
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 4 Apr 88 00:15:32 EDT
Received: by ucbvax.Berkeley.EDU (5.59/1.26)
id AA07726; Sun, 3 Apr 88 09:42:54 PDT
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 2 Apr 88 02:37:27 GMT
From: ncc!alberta!calgary!jameson@uunet.uu.net (Kevin Jameson)
Organization: U. of Calgary, Calgary, Ab.
Subject: Re: MIT C Scheme design info
Message-Id: <1520@vaxb.calgary.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
The following is a list (part 2 of 2) of most Scheme files used in the
MIT C Scheme interpreter circa verson 4.1, along with a brief statement
of their function. Most of the information has been gleaned
gleaned from the short comment at the beginning of each
file. This list gives a flavor of how the interpreter is organized,
and should help new readers of the code to find their way around.
Note that much (half?) of C Scheme is written in C, and is not
listed here. The list of C files (part 1 of 2) for the microcode
interpreter was posted earlier.
I know now that the earlier posting of C files contained minor errors,
and at the very least is somewhat out of date (my version is 4.1,
vs. the current version of 6.2.0). (No doubt the same two facts will
hold for this file too, but it's a start...) Any mistakes are my own.
- Kevin Jameson, 31 March 88
..!{ihnp4,ubc-vision}!alberta!calgary!jameson
FILE Brief Function
============= ==================================================
SCHEME SYSTEM TYPES
xbuild.scm build a cross syntaxer system
abuild.scm build a system for athena
ubuild.scm build a unix interface scheme system
sbuildmd.scm build a student (MIT 6.001 course) scheme system
studentmd.scm env,syntax,& read tbl mods for 6.001 students
featmd.scm std features scheme system
INTERPRETER
error.scm rep (read-eval-print) interface,error defs,definers,handlers
parse.scm scheme parser for The REP Reader (ch class tbls,macros,atoms)
print.scm The REP (read-eval-print) Printer
read.scm The REP Reader (tyi/eof/input streams,with-input-from-file)
rep.scm the read-eval-print loop,history,and history access funs
repuse.scm REP user interface (prompts, drivers, proceeds)
CROSS SYNTAXER (the byte code (scode) compiler)
syntax.scm the Cross Syntaxer (byte code (scode) generator/compiler)
scan.scm definition scanner reduces n of "real auxilary" vars in env
xconv.scm convert declarations into integrations
xpatch.scm special lambda interface
xsubst.scm integration of primitives (merger, dispatcher)
unsyn.scm unsyntaxer converts scode back to sexprs
MISC DEFINITIONS and Data Type Stuff
adapt.scm compatability defs (true/#!true,nil/'(),list*/cons*)
crock.scm defs of special obj types (state & syntax tables, type obj)
stypes.scm scode type setup (TC's: symbols,conditions,proctypes,etc)
scode.scm scode grab bag (consts,many predicates for data types)
sdata.scm abstract data field funs(ctl pts,set!s,refs,pairs,vects,etc)
types.scm abstract typing funs (supremum/infimums?,lattice theory stuff)
ustruc.scm microstruc? (follows scode abstraction in boot sequence)
utabmd.scm ucode type tables (fixed,types,returns,prims,externs,errors)
utabs.scm ucode tbl intrfc (fixed obj vec,type detection,TC,RC,TERMC..)
PRIMITIVES
bitvec.scm 1 bit vector ops (cons,set,size,ref,1b? predicates)
char.scm character defs, bit tables, charscan table generator funs
equals.scm many equality funs (eqv?,equal?,etc)
explode.scm maclisp style printname utils (explode,implode,readch,ascii)
format.scm output string formatters, format dispatch table
gensym.scm uninterned symbol generator
gprims.scm global primitives list (defs funs in global env for compiler)
hash.scm object hashing, unhashing, population functions
io.scm primitive io utils (channel stuff, files vector/locks,hunk3s)
list.scm lisp ops (cons,pair?,length,cxr,mappers,assocs,members,etc)
load.scm program loading
lambda.scm lambda abstraction (lambda,lexpr,extended-lambda)
narith.scm scheme math funs (+,-,trigs,floats,polys,min/max,etc)
oldio.scm old io procedure names (channel io stuff)
pathnm.scm pathname utils (make,drive,directroy,type,conversion funs)
primlist.scm primitive list ops (cons,memq,assoc,cxr,etc)
scomb.scm scode combinator abstractions
stream.scm stream utilities (append,filter,accumulate,merge,etc)
string.scm character string ops
strmac.scm stream macros
uio.scm useful file io funs (read,copy,rn,dl,exists?)
unpars.scm unparsers for converting objects to string representations
vector.scm vector ops (make,copy,vector references..)
xlist.scm extended list ops (mapcan,mapcan*,or,and)
PACKAGES
advice.scm tools to advise funs (trace,break,other advice wrappers)
pp.scm scheme pretty printer
rrrs.scm revised report on Scheme compatability defs,macro definers
wind.scm state space world model (state pts,dynamic wind,protectors..)
DEBUGGER
comand.scm debugger command loop support
debug.scm scm level debugger w/ display,history,motion,continuation cmds
stackp.scm scheme control stack parser for debugger
where.scm the environment inspector(show,show-frame,print bindings...)
xdebug.scm debugging primitives
SYSTEM
boot.scm bootload utils, run after coldmd. defs of global primitve funs
datime.scm date time utils
events.scm event distribution system
file.scm file package (catalog,floppy,volumn,directory,misc funs)
gc.scm scheme garbage collector, gc-daemon list, suspension funs
gcstat.scm garbage collector meters, history modes, etc
history.scm history manipulation (backbone & ribs, push/pop history, etc)
intrpt.scm interrupt system (timers,keyboard ints,default handlers)
link.scm links compiled byte code ?
photo.scm ? takes an internal photo or something (whatever that is)
sysclk.scm system clock utils (set,read,interval calculations)
system.scm system funs (world dumpers,disk savers)
world.scm world ops (save, disk restore, quit, exit..)
MACHINE DEPENDENT (md)
implmd.scm defs for implementation dependencies (mostly whtspc ch codes)
spmd.scm control stack/control point funs
xusermd.scm cross syntaxer user interface (pathname and string funs)
coldmd.scm first scm code runs early, builds obarray, fixed obj vector
runmd.scm loads compiled code for runtime system
MISCELLANEOUS
bgraph.scm bobcat (starbase) graphics interface
emacs.scm emacs interface to scheme system
future.scm part of butterfly basic band load (atom macros)
graphics.scm graphics system interface (draw-line,line styles, etc)
process.scm interface to unix primitives (signal,spawn,wait,pause,etc)
qsort.scm a scheme quicksort
sample.scm shows how microcode C funs are linked into scheme
unix.scm unix scheme interface (cwd,mkdir,kill-eol,getenv,etc)
6.001 Course
login.scm student login/logout utils
logout.scm student logout utils (resets 6.001 student environment)
namelist.scm machine names for 6.001 lab
EXAMPLES
chapter1.cod Scheme code from text by Abelson & Sussman,
chapter2.cod Structure and Interpretation of Computer Programs
chapter3.cod
chapter5.cod
chapter4.cod
PROBLEM SETS (mostly related to SICP)
adventure.scm a game
compiler.scm simple scheme compiler (see Struc & Interp of Comp Progms)
eceval.scm explicit control evaluator (see SICP)
ecevsyn.scm expr & env defs used by explicit ctl eval (see SICP)
regsim.scm register machine simulator (see SICP)
ps4.scm huffman encoding funs
ps5.scm basic generic math funs (ints,polys,rationals, see SICP)
ps6.scm imaginary world defs (deans,trolls,etc)
ps7.scm stream utils
ps8eval.scm evaluator funs for explicit ctl evaluator (see SICP)
ps8mods.scm environment, binding utils (see SICP)
ps8putget.scm put/get procs (see SICP)
ps9data.scm database for query language interpreter (see SICP)
ps9query.scm query language interpreter (see SICP)
ps10load.scm program loader
∂05-Apr-88 1304 @MC.LCS.MIT.EDU:SCHREQ@AI.AI.MIT.EDU test message, ignore
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 5 Apr 88 13:04:46 PDT
Received: from AI.AI.MIT.EDU (CHAOS 3130) by MC.LCS.MIT.EDU 5 Apr 88 16:01:17 EDT
Date: Tue, 5 Apr 88 16:02:28 EDT
From: Scheme Requestee <SCHREQ@AI.AI.MIT.EDU>
Subject: test message, ignore
To: scheme@MC.LCS.MIT.EDU
Message-ID: <353958.880405.SCHREQ@AI.AI.MIT.EDU>
Weeding out bad addresses again, and testing many new additions.
If a long time (several weeks) goes by and you haven't received any
scheme mail, this is probably because you've been removed from the list.
The policy is ruthless: addresses that are unreachable even once are
generally removed from the list.
∂05-Apr-88 1908 @MC.LCS.MIT.EDU:uunet!utai!calgary!vaxb!jameson@rutgers.edu
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 5 Apr 88 19:08:33 PDT
Received: from rutgers.edu (TCP 20001402007) by MC.LCS.MIT.EDU 5 Apr 88 22:05:50 EDT
Received: by rutgers.edu (5.54/1.15) with UUCP
id AA02295; Tue, 5 Apr 88 20:26:04 EDT
Received: by mimsy.UMD.EDU (smail2.5)
id AA29519; 5 Apr 88 20:12:37 EDT (Tue)
Received: from watmath.UUCP by uunet.UU.NET (5.54/1.14) with UUCP
id AA03924; Tue, 5 Apr 88 19:55:41 EDT
Received: from csc.uucp by watmath; Tue, 5 Apr 88 19:51:10 EDT
Received: by csc.UUCP (smail2.5)
id AA03303; 5 Apr 88 21:32:55 EST (Tue)
Received: from calgary.uucp by watmath; Fri, 1 Apr 88 19:55:03 EST
Received: from vaxb by calgary.UUCP (5.51/3.1x)
id AA15372; Fri, 1 Apr 88 17:55:54 MST
Received: by vaxb.LOCAL (5.51/2.1i)
id AA15368; Fri, 1 Apr 88 17:55:49 MST
Message-Id: <8804020055.AA15368@vaxb.LOCAL>
Date: Fri, 1 Apr 88 17:55:49 MST
From: Kevin Jameson <uunet!utai!calgary!vaxb!jameson@rutgers.edu>
To: scheme@mc.lcs.mit.edu
This is a test message mailed from the usenet to scheme@mc.lcs.mit.edu to
see if it gets forwarded from the Internet to comp.lang.scheme on the
usenet.
∂05-Apr-88 1937 @MC.LCS.MIT.EDU:uunet!utai!calgary!vaxb!jameson@rutgers.edu
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 5 Apr 88 19:37:19 PDT
Received: from rutgers.edu (TCP 20001402007) by MC.LCS.MIT.EDU 5 Apr 88 22:06:16 EDT
Received: by rutgers.edu (5.54/1.15) with UUCP
id AA02298; Tue, 5 Apr 88 20:26:07 EDT
Received: by mimsy.UMD.EDU (smail2.5)
id AA29522; 5 Apr 88 20:12:40 EDT (Tue)
Received: from watmath.UUCP by uunet.UU.NET (5.54/1.14) with UUCP
id AA03929; Tue, 5 Apr 88 19:55:49 EDT
Received: from csc.uucp by watmath; Tue, 5 Apr 88 19:51:38 EDT
Received: by csc.UUCP (smail2.5)
id AA03325; 5 Apr 88 21:33:25 EST (Tue)
Received: from calgary.uucp by watmath; Fri, 1 Apr 88 19:55:03 EST
Received: from vaxb by calgary.UUCP (5.51/3.1x)
id AA15372; Fri, 1 Apr 88 17:55:54 MST
Received: by vaxb.LOCAL (5.51/2.1i)
id AA15368; Fri, 1 Apr 88 17:55:49 MST
Message-Id: <8804020055.AA15368@vaxb.LOCAL>
Date: Fri, 1 Apr 88 17:55:49 MST
From: Kevin Jameson <uunet!utai!calgary!vaxb!jameson@rutgers.edu>
To: scheme@mc.lcs.mit.edu
This is a test message mailed from the usenet to scheme@mc.lcs.mit.edu to
see if it gets forwarded from the Internet to comp.lang.scheme on the
usenet.
∂06-Apr-88 1652 @MC.LCS.MIT.EDU:hal@MURREN.AI.MIT.EDU forwarded message from Clyde Camp
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 6 Apr 88 16:52:01 PDT
Received: from murren (TCP 2206400263) by MC.LCS.MIT.EDU 6 Apr 88 19:53:25 EDT
Received: by MURREN.AI.MIT.EDU; Wed, 6 Apr 88 19:56:19 edt
Date: Wed, 6 Apr 88 19:56:19 edt
From: hal@MURREN.AI.MIT.EDU (Hal Abelson)
Message-Id: <8804062356.AA06370@murren>
To: rrrs-authors@mc
Subject: forwarded message from Clyde Camp
Reply-To: hal@ai.ai.mit.edu
Date: Wed, 6 Apr 88 16:43:41 CDT
From: Clyde Camp <camp@mips.csc.ti.com>
To: hal@mc.lcs.mit.edu
Cc: camp@mips.csc.ti.com
In-Reply-To: Hal Abelson's message of Tue, 5 Apr 88 21:16:17 edt <8804060116.AA05307@murren>
Subject: Scheme
OOPS -
I sent Chris a status message to forward to the group, but it
evidently never got to him (or he hasn't forwarded it yet). So will
you please forward this to the net for me.
The ballot was sent out this morning (I got the foil updates yesterday
from Chris) and I requested results back by the 22nd. Chris did not
send the article, but it is not really needed for the ballot and I was
running out of time to allow time for response. It will be needed
before June.
- Clyde
Date: Mon, 4 Apr 88 11:44:27 EST
From: camp
To: iuvax!chaynes@EE.ECN.PURDUE.EDU
CC: camp@csc.ti.com
In-reply-to: Chris Haynes's message of Tue, 29 Mar 88 12:10:43 EST <8803291746.AA26210@ee.ecn.purdue.edu>
Subject: one more thing
Chris, please forward this to the authors for me. The enclosures
referred to are the 1-2 page article and whatever updates to the foils
you wish to make.
- Clyde
=============================
I finally (after several volleys of telephone ping-pong) talked with
Andrew Salem, Director of Standards for the IEEE. He has no problems
with the plan we proposed - specifically that the Scheme community
churns out RnRS documents at some (non-specified) rate and that
selected versions become the basis from which the IEEE standard is
developed. The IEEE retains copyright to the standard while the
Scheme community retains copyright (or lack thereof) to the report.
He felt that this was entirely appropriate. Although he also
questioned why the community would want to retain the report after the
standard was published, he had no problems with its doing so.
With that potential problem being a non-problem, we are ready to
start. I have the mail ballot ready to go and will send it out as
soon as I get the enclosures from Chris. The current voting
membership is 34, so I need to get back at least 26 returns with at
least 20 positive votes to get the PAR request in by the May 1st
deadline. Assuming that it passes, there will probably be no need for
anyone to attend the May meeting.
I enjoyed meeting all of you who attended the March 26 meeting and I
look forward to a continued relationship.
Regards,
Clyde
∂08-Apr-88 1544 @MC.LCS.MIT.EDU:chaynes@iuvax.cs.indiana.edu Scheme standarization
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 8 Apr 88 15:44:26 PDT
Received: from iuvax.cs.indiana.edu (TCP 30003147300) by MC.LCS.MIT.EDU 8 Apr 88 18:41:34 EDT
Received: by iuvax.cs.indiana.edu; id AA13722; Fri, 8 Apr 88 11:08:49 EST
Received: by iuvax.cs.indiana.edu (iuvax/MX/4.5/02-10-87)
id AA13722; Fri, 8 Apr 88 11:08:49 EST
Date: Fri, 8 Apr 88 11:08:49 EST
From: Chris Haynes <chaynes@iuvax.cs.indiana.edu>
To: scheme@mc.lcs.mit.edu, rrrs-authors@mc.lcs.mit.edu
Subject: Scheme standarization
On March 25, 1988, a majority of the authors of the "Revised↑3 Report
on the Algorithmic Language Scheme" (SIGPLAN Notices, December, 1986),
together with representatives of IEEE and X3 standardization
committees, met at Indiana University as a study group to consider
initiation of a formal standardization effort for Scheme. It was
concluded that a formal standard was desirable to improve code
portability, publication uniformity, and language visibility. It was
recommended that a PAR be submitted through the IEEE Microprocessor
Standards Committee to initiate the formal standardization effort and
establish a Scheme Working Group. Christopher Haynes and William
Clinger were nominated for Chair and Vice-Chair of the Working Group,
respectively. It is expected that the Working Group will meet
approximately twice a year, with the first meeting to be held on July
27, 1988, following the ACM Conference on Lisp and Functional
Programming at Snowbird, Utah.
The study group felt strongly that the informal group that produced
the existing Scheme reports should continue its language design work
by holding workshops and publishing further revised reports. While
these reports are likely to form the basis for future revisions of the
standard, they will probably be less conservative than is appropriate
for a standards document and may, for example, include experimental
features that should be withheld from standardization.
The study group also concluded that Scheme standardization does
not conflict in any way with existing or contemplated standardization
efforts for other members of the Lisp family, such as X3J13. It was
recommended that liaison be maintained with these efforts, and in
particular that the views of the Scheme community be taken into
account by the ANSI delegate to the ISO ISLISP standardization
meetings, and that an observer from the Scheme community be present at
such meetings if possible.
-- Chris Haynes
chaynes@iuvax.cs.indiana.edu
∂09-Apr-88 0911 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu emacs/scheme
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 9 Apr 88 09:11:33 PDT
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 9 Apr 88 12:09:01 EDT
Received: by ucbvax.Berkeley.EDU (5.59/1.28)
id AA15847; Sat, 9 Apr 88 06:59:31 PDT
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 8 Apr 88 23:41:59 GMT
From: decvax!sunybcs!ugwiles@ucbvax.Berkeley.EDU (Dale Wiles)
Organization: SUNY/Buffalo Computer Science
Subject: emacs/scheme
Message-Id: <10040@sunybcs.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
Has any one run into any problems using scheme and Emacs. When
I try to use scheme (MIT v 10) and emacs (v 18) I get the header with
no prompt and can send functions in. But when I get an error, and it
drops me to level 2, I can't get back up to level 1.
When I remove the "-emacs" option from "run-scheme" then
everything seems to work unless I send a region to the scheme process.
Only the first function is entered, and then some times it locks up.
If anyone has fixxed this problem, let me know.
Thanks;
Dale Wiles.
∂10-Apr-88 2052 @MC.LCS.MIT.EDU:scheme-request@mc.lcs.mit.edu Scheme Bibliography database (BIB/REFER format)
Received: from MC.LCS.MIT.EDU by SAIL.Stanford.EDU with TCP; 10 Apr 88 20:52:10 PDT
Received: from ucbvax.Berkeley.EDU (TCP 1200400116) by MC.LCS.MIT.EDU 10 Apr 88 23:50:58 EDT
Received: by ucbvax.Berkeley.EDU (5.59/1.28)
id AA17748; Sun, 10 Apr 88 19:35:44 PDT
Received: from USENET by ucbvax.Berkeley.EDU with netnews
for scheme@mc.lcs.mit.edu (scheme@mc.lcs.mit.edu)
(contact usenet@ucbvax.Berkeley.EDU if you have questions)
Date: 10 Apr 88 20:04:40 GMT
From: pacbell!att-ih!alberta!mnetor!utzoo!yunexus!oz@ames.arpa (Ozan Yigit)
Organization: York U. Computing Services - Magic Group
Subject: Scheme Bibliography database (BIB/REFER format)
Message-Id: <399@yunexus.UUCP>
Sender: scheme-request@mc.lcs.mit.edu
To: scheme@mc.lcs.mit.edu
BIB/REFER Database on SCHEME
The posting contains is a reasonable bibliography database on Scheme
(a *crystal* in the muddy language landscape), in BIB/REFER format,
containing 50 entries sorted by date and first author, for your
perusal, corrections and enjoyment. I do not consider it complete
nor correct, but I am posting it nevertheless to get some feedback,
new entries, corrections etc.
It is somewhat surprising that such a bib database has not been made
available earlier, so I had to borrow + steal (:-) some entries from
on-line documents, and did a lot of typing.
In this database, I have tried to keep the entries very
Scheme-specific, but I am not certain about some of the entries, as
I have not yet been able to track them.
[Speaking of *tracking references*, the most critical MIT tech
reports are also the hardest to get a hold of... I still do not have
a copy of the "RABBIT" report. I kinda wonder why MIT folks never
put these tech reports into a collection book, and publish it thru
MIT press. It would be a great service to the Scheme/Lisp community.]
-------------------------------------------------------------------
Along with this posting, I am volunteering to keep this database
up-to-date (hopefully with your help) for the benefit of this
newsgroup. I will also a post pre-formatted version as well as a
bibTeX version of the database once corrections and missing entries
are in. [Please send all corrections, new entries, etc. via e-mail]
-------------------------------------------------------------------
Happy Scheming...
oz
Usenet: ....utzoo!yunexus!oz
....!uunet!mnetor!yunexus!oz
Bitnet: oz@[yulibra|yuyetti]
Phonet: +1 416 736-5257x3976
-----cut here-----cut here-----cut here-----cut here-----
#!/bin/sh
# shar: Shell Archiver
# Run the following text with /bin/sh to create:
# scheme.bib
# tags.doc
# This archive created: Sun Apr 10 15:48:21 1988
echo shar: extracting scheme.bib '(9125 characters)'
sed 's/↑XX//' << \SHAR_EOF > scheme.bib
XX
XX%A John Reynolds
XX%T Definitional Interpreters for Higher Order Programming Languages
XX%J ACM Conference Proceedings
XX%P 717-740
XX%I ACM
XX%D 1972
XX
XX%A Gerald Jay Sussman
XX%A Guy Lewis Steele, Jr.
XX%T Scheme: an Interpreter for Extended Lambda Calculus
XX%R MIT Artificial Intelligence Memo 349
XX%C Cambridge, Mass.
XX%D December 1975
XX
XX%A Guy Lewis Steele, Jr.
XX%A Gerald Jay Sussman
XX%T Lambda, the Ultimate Imperative
XX%R MIT Artificial Intelligence Memo 353
XX%C Cambridge, Mass.
XX%D March 1976
XX%K imperative
XX
XX%A Guy Lewis Steele, Jr.
XX%T Lambda, the Ultimate Declarative
XX%R MIT Artificial Intelligence Memo 379
XX%C Cambridge, Mass.
XX%D November 1976
XX%K declarative
XX
XX%A Guy Lewis Steele, Jr.
XX%T Debunking the ``Expensive Procedure Call'' Myth, or Procedure Call
XXImplementations Considered Harmful, or LAMBDA, the Ultimate GOTO
XX%J ACM Conference Proceedings
XX%P 153-162
XX%I ACM
XX%D 1977
XX
XX%A Guy Lewis Steele, Jr.
XX%T Macaroni is Better than Spaghetti
XX%J Proceedings of the Symposium on Artificial Intelligence and
XXProgramming Languages
XX%P 60-66
XX%O Special joint issue of SIGPLAN Notices 12(8) and SIGART Newsletter 64.
XX%D August 1977
XX
XX%A Mitchell Wand
XX%T Continuation-Based Program Transformation Strategies
XX%J Journal of the ACM
XX%V 27
XX%N 1
XX%P 174-180
XX%D 1978
XX
XX%A Guy Lewis Steele, Jr.
XX%A Gerald Jay Sussman
XX%T The Revised Report on Scheme, a Dialect of Lisp
XX%R MIT Artificial Intelligence Memo 452
XX%C Cambridge, Mass.
XX%D January 1978
XX
XX%A Guy Lewis Steele, Jr.
XX%T Rabbit: a Compiler for Scheme
XX%R MIT Artificial Intelligence Laboratory Technical Report 474
XX%C Cambridge, Mass.
XX%D May 1978
XX
XX%A Guy Lewis Steele, Jr.
XX%A Gerald Jay Sussman
XX%T The Art of the Interpreter, or the Modularity Complex
XX(parts zero, one, and two)
XX%R MIT Artificial Intelligence Memo 453
XX%C Cambridge, Mass.
XX%D May 1978
XX%K modularity
XX
XX%A Drew McDermott
XX%T An Efficient Environment Allocation Scheme in an Interpreter
XXfor a Lexically-Scoped Lisp
XX%J Conference Record of the 1980 Lisp Conference
XX%P 154-162
XX%I The Lisp Conference, P.O. Box 487, Redwood Estates CA.
XX%D 1980
XX%O Proceedings reprinted by ACM
XX
XX%A Steven S. Muchnick
XX%A Uwe F. Pleban
XX%T A Semantic Comparison of Lisp and Scheme
XX%J Conference Record of the 1980 Lisp Conference
XX%P 56-65
XX%I The Lisp Conference, P.O. Box 487, Redwood Estates CA.
XX%D 1980
XX
XX%A Guy Lewis Steele, Jr.
XX%T Compiler Optimization Based on Viewing LAMBDA as RENAME + GOTO
XX%B AI: An MIT Perspective
XX%E Patrick Henry Winston
XX%E Richard Henry Brown
XX%I MIT Press
XX%C Cambridge, Mass.
XX%D 1980
XX
XX%A Guy Lewis Steele, Jr.
XX%A Gerald Jay Sussman
XX%T The Dream of a Lifetime: a Lazy Variable Extent Mechanism
XX%J Conference Record of the 1980 Lisp Conference
XX%P 163-172
XX%I The Lisp Conference
XX%D 1980
XX
XX%A Mitchell Wand
XX%T Continuation-Based Multiprocessing
XX%J Conference Record of the 1980 Lisp Conference
XX%P 19-28
XX%I The Lisp Conference
XX%D 1980
XX
XX%A Guy Lewis Steele, Jr.
XX%A Gerald Jay Sussman
XX%T Design of a Lisp-based Processor
XX%J CACM
XX%V 23
XX%N 11
XX%P 628-645
XX%D November 1980
XX
XX%A Gerald Jay Sussman
XX%A Jack Holloway
XX%A Guy Lewis Steele, Jr.
XX%A Alan Bell
XX%T Scheme-79 - Lisp on a Chip
XX%J IEEE Computer
XX%V 14
XX%N 7
XX%P 10-21
XX%D July 1981
XX%I IEEE
XX
XX%A John Batali
XX%A Edmund Goodhue
XX%A Chris Hanson
XX%A Howie Shrobe
XX%A Richard M. Stallman
XX%A Gerald Jay Sussman
XX%T The Scheme-81 Architecture - System and Chip
XX%J Proceedings, Conference on Advanced Research in VLSI
XX%P 69-77
XX%E Paul Penfield, Jr.
XX%C Artech House, Dedham MA.
XX%D 1982
XX%K scheme81
XX
XX%A Peter Henderson
XX%T Functional Geometry
XX%J Conference Record of the 1982 ACM Symposium on Lisp and
XXFunctional Programming
XX%P 179-187
XX%D 1982
XX
XX%A Jonathan A. Rees
XX%A Norman I. Adams
XX%T T: A Dialect of Lisp or, LAMBDA: The Ultimate Software Tool
XX%J Conference Record of the 1982 ACM Symposium on Lisp and
XXFunctional Programming
XX%P 114-122
XX%D 1982
XX
XX%A Carol Fessenden
XX%A William Clinger
XX%A Daniel P. Friedman
XX%A Christopher T. Haynes
XX%T Scheme 311 version 4 Reference Manual
XX%R Computer Science Technical Report 137
XX%I Indiana University
XX%D February 1983
XX%O Superceded by Computer Science Technical Report 153, 1985
XX
XX%A William Clinger
XX%T The Scheme 311 compiler: An Exercise in Denotational Semantics
XX%J Conference Record of the 1984 ACM Symposium on Lisp and
XXFunctional Programming
XX%P 356-364
XX%D 1984
XX%K comp311
XX
XX%A Daniel P. Friedman
XX%A Christopher T. Haynes
XX%A Eugene E. Kohlbecker
XX%T Programming with Continuations
XX%B Program Transformation and Programming Environments
XX%P 263-274
XX%E P. Pepper
XX%I Springer-Verlag
XX%D 1984
XX
XX%A Christopher T. Haynes
XX%A Daniel P. Friedman
XX%T Engines Build Process Abstractions
XX%J Conference Record of the 1984 ACM Symposium on Lisp and
XXFunctional Programming
XX%P 18-24
XX%D 1984
XX
XX%A Christopher T. Haynes
XX%A Daniel P. Friedman
XX%A Mitchell Wand
XX%T Continuations and Coroutines
XX%J Conference Record of the 1984 ACM Symposium on Lisp and
XXFunctional Programming
XX%P 293-298
XX%D 1984
XX
XX%A Jonathan A. Rees
XX%A Norman I. Adams
XX%A James R. Meehan
XX%T The T manual, fourth edition
XX%I Yale University Computer Science Department
XX%D January 1984
XX
XX%A Guillermo J. Rozas
XX%T Liar, an Algol-like Compiler for Scheme
XX%I S. B. Thesis, MIT Department of Electrical Engineering and Computer
XXScience
XX%D January 1984
XX
XX%T MIT Scheme Manual, Seventh Edition
XX%I Department of Electrical Engineering and Computer Science, MIT
XX%C Cambridge, Mass.
XX%D September 1984
XX
XX%T MacScheme Reference Manual
XX%I Semantic Microsystems
XX%C Sausalito, Calif.
XX%D 1985
XX
XX%A Harold Abelson
XX%A Gerald Jay Sussman
XX%A Julie Sussman
XX%T Structure and Interpretation of Computer Programs
XX%I MIT Press
XX%C Cambridge, Mass.
XX%D 1985
XX%K sicp
XX
XX%A Amitabh Srivastava
XX%A Don Oxley
XX%A Aditya Srivastava
XX%T An (other) Integration of Logic and Functional Programming
XX%J Proceedings of the Symposium on Logic Programming
XX%P 254-260
XX%I IEEE
XX%D 1985
XX
XX%E William Clinger
XX%T The Revised Revised Report on Scheme, or An Uncommon Lisp
XX%R MIT Artificial Intelligence Memo 848
XX%C Cambridge, Mass.
XX%O Also published as Computer Science Department Technical Report 174,
XXIndiana University, June 1985.
XX%D August 1985
XX%K rrrs
XX
XX%A Daniel P. Friedman
XX%A Christopher T. Haynes
XX%T Constraining Control
XX%J Proceedings of the Twelfth Annual Symposium on Principles of
XXProgramming Languages
XX%P 245-254
XX%I ACM
XX%D January 1985
XX
XX%A Daniel P. Friedman
XX%A Christopher T. Haynes
XX%A Eugene E. Kohlbecker
XX%A Mitchell Wand
XX%T Scheme 84 Interim Reference Manual
XX%R Computer Science Technical Report 153
XX%I Indiana University
XX%D January 1985
XX%K scheme84
XX
XX%T TI Scheme Language Reference Manual
XX%I Texas Instruments, Inc.
XX%O Preliminary version 1.0
XX%D November 1985
XX
XX%A Michael A. Eisenberg
XX%T Bochser: An Integrated Scheme Programming System
XX%R MIT Computer Science Technical Report 349
XX%C Cambridge, Mass.
XX%D October 1985
XX%K bochser
XX
XX%A David H. Bartley
XX%A John C. Jensen
XX%T The Implementation of PC Scheme
XX%J Proceedings of the 1986 ACM Conference on Lisp
XXand Functional Programming
XX%P 86-93
XX%D 1986
XX%K pcscheme
XX
XX%A R. Kent Dybvig
XX%A Daniel P. Friedman
XX%A Christopher T. Haynes
XX%T Expansion-Passing style: Beyond Conventional Macros
XX%J Proceedings of the 1986 ACM Conference on Lisp and
XXFunctional Programming
XX%P 143-150
XX%D 1986
XX
XX%A Marc Feeley
XX%A Guy LaPalme
XX%T Closure Generation based on viewing LAMBDA as EPSILON plus COMPILE
XX%O Submitted for Publication. Not yet available.
XX%D 1986
XX
XX%A Matthias Felleisen
XX%A Daniel P. Friedman
XX%T A Closer Look At Export and Import Statements
XX%J Computer Languages
XX%V 11
XX%N 1
XX%P 29-37
XX%I Pergamon Press
XX%D 1986
XX
XX%A Matthias Felleisen
XX%A Daniel P. Friedman
XX%A Eugene E. Kohlbecker
XX%A Bruce Duba
XX%T Reasoning with Continuations
XX%J Proceedings of the Symposium on Logic in Computer Science
XX%P 131-141
XX%I IEEE Computer Society Press
XX%C Washigton DC
XX%D 1986
XX
XX%A Christopher T. Haynes
XX%A Daniel P. Friedman
XX%A Mitchell Wand
XX%T Obtaining Coroutines With Continuations
XX%J Computer Languages
XX%V 11
XX%N 3/4
XX%P 143-153
XX%I Pergamon Press
XX%D 1986
XX
XX%A Mitchell Wand
XX%T From Interpreter to Compiler: A Representational Derivation
XX%B Programs as Data Objects
XX%I Springer-Verlag Lecture Notes
XX%D 1986
XX
XX%A Eugene E. Kohlbecker
XX%T Syntactic Extensions in the Programming Language Lisp
XX%I PhD thesis, Indiana University
XX%D August 1986
XX
XX%A Christopher T. Haynes
XX%T Logic Continuations
XX%J Proceedings of the Third International Conference on
XXLogic Programming
XX%P 671-685
XX%I Springer-Verlag
XX%D Jul 1986
XX
XX%A David Kranz
XX%A Richard Kelsey
XX%A Jonathan A. Rees
XX%A Paul Hudak
XX%A James Philbin
XX%A Norman I. Adams
XX%T Orbit: An Optimizing Compiler for Scheme
XX%T Proceedings of the SIGPLAN '86 Symposium on Compiler
XXConstruction
XX%P 219-233
XX%I ACM
XX%O Published as SIGPLAN Notices 21(7), July 1986
XX%D June 1986
XX%K orbit
XX
XX%A Marc Feeley
XX%T Deux Approches a' L'implantation du Language Scheme
XX%I M.Sc. Thesis, De'partement d'Informatique et de Recherche
XXOpe'rationelle, University of Montreal
XX%D May 1986
XX
XX%A R. Kent Dybvig
XX%T The Scheme Programming Language
XX%I Prentice-Hall, Inc.
XX%C Englewood Cliffs, New Jersey
XX%D 1987
XX%K splang
XX
XX%A Marc Feeley
XX%A Guy LaPalme
XX%T Using Cloures for Code Generation
XX%J Computer Languages
XX%V 12
XX%N 1
XX%P 47-66
XX%I Pergamon Press
XX%D 1987
XX
XX%A Daniel P. Friedman
XX%A Matthias Felleisen
XX%T The Little LISPer
XX%I MIT Press
XX%D Trade Edition 1987
XX%K littlelisper
SHAR_EOF
if test 9125 -ne "`wc -c scheme.bib`"
then
echo shar: error transmitting scheme.bib '(should have been 9125 characters)'
fi
echo shar: extracting tags.doc '(422 characters)'
sed 's/↑XX//' << \SHAR_EOF > tags.doc
XXBIB (UofArizona) Field Tags
XX
XX%A - Author's name
XX%B - Title of the book containing item
XX%C - City of publication
XX%D - Date
XX%E - Editor(s) of book containing item
XX%F - Caption
XX%G - Government (NTIS) ordering number
XX%I - Issuer (publisher)
XX%J - Journal name
XX%K - Keys for searching
XX%N - Issue number
XX%O - Other information
XX%P - Page(s) of article
XX%R - Technical report number
XX%S - Series title
XX%T - Title
XX%V - Volume number
SHAR_EOF
if test 422 -ne "`wc -c tags.doc`"
then
echo shar: error transmitting tags.doc '(should have been 422 characters)'
fi
# End of shell archive
exit 0
--
... and they will all Usenet: [decvax|ihnp4]!utzoo!yunexus!oz
bite the dust ... ......!seismo!mnetor!yunexus!oz
comprehensively. ... Bitnet: oz@[yusol|yulibra|yuyetti]
Archbishop Tutu Phonet: +1 416 736-5257 x 3976